Передача значений для формы из отдельного класса

[bulldog5293]

Передаю из отдной формы в класс значения так

procedure TForm2.Button1Click(Sender: TObject);
begin
    truba.Получение(a,b,v);
end;

Сам клас и процедура получения

type
 Ttruba = class
///
 public
 procedure Отправка(const O, T, F: String);
  procedure Получение(const a,b,v: String);
 constructor Create;
 end;
///

constructor Ttruba.Create;
begin
 inherited Create;
SNB:=Tstringlist.create;
end;

destructor Ttruba.Destroy;
begin
  inherited;
SNB.clear;
end;


procedure Ttruba.Отправка(const O, T, F: String);
begin
///
end;

procedure Ttruba.Получение(const a,b,v: String);
begin
///данные приходят проверял и в отладке и через showmessage
end;

а как значения отправить на другую форму не пойму. Пробывал так

procedure Ttruba.Получение(const a,b,v: String);
begin
//
Отправка({обработаные данные});
end;

вылетает AV

код создания

uses
///
Unit3;


type
  TForm1 = class(TForm)
///
    procedure FormCreate(Sender: TObject);
   procedure FormDestroy(Sender: TObject);
///
  private
  truba:Ttruba;
end;

var
  Form1: TForm1;
//


procedure TForm1.FormCreate(Sender: TObject);
begin
truba := Ttruba.Create;
end;
implementation

procedure TForm1.FormDestroy(Sender: TObject);
begin
 FreeAndNil(truba);
end;

[STRELOK-2007]

Для начала, проверить создан ли экземпляр класса формы или нет. Ибо обращение к несуществующей сущности - и вызывает AV.

[bulldog5293]

///данные приходят проверял и в отладке и через showmessage

если бы я не создавал и не уничтожал его в другой форме то данные я бы не получал или эта я написал с потолка. AV вылетает при передаче с класса на форму

[evg_m]

именно с потолка, в приведенном коде нет ни одного обращения к методам никакого объекта, в т.ч. и несозданного или уничтоженрго.

[northener]

в приведенном коде нет ни одного обращения к методам никакого объекта

Какой код? Вместо кода приведены только названия методов.

[bulldog5293]

evg_m
именно с потолка, в приведенном коде нет ни одного обращения к методам никакого объекта, в т.ч. и несозданного или уничтоженрго.

Первый пост обновил, хотя как подметл northener это к вопросу значения не имеет, могу скинуть проект на форум, но не думаю что кому то будет интерестно скачивать и просматривать исходник

Спасиба за потраченое время на меня, вопрос снят, разобрался. Прикрепляю исходник, вдруг кому да пригодится

[northener]

А где объявлена переменная SNB? И хочется всё-таки чуть ближе познакомиться с методом Отправка.

[bulldog5293]

SNB я использовал как Tstringlist контейнер для обрабатываемых данных и создавал\уничтожал внутри класса, в приведённом проекте она отсутствует т.к. я сократил свой код для общего понимания