[delphicoding]

Здравствуйте!
Вопрос как правильно передать Дату из одного окна в другое окно?
Пробую при помощи function так:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

type   TfBaseForm = class(TForm)    edDate: TJvDateEdit;    procedure FormCreate(Sender: TObject); public   function GetDateShift:TDate; // (а)   procedure TfBaseForm.FormCreate(Sender: TObject); begin  edDate.Date:=Date; // прекрасно работает end;   // юзер изменяет дату итд   function GetDateShift:TDate; begin   Result:=edDate.Date; // (б) end;

Постоянно ругается:
а) на строку объявления функции: [DCC Error] uBaseForm.pas(45): E2065 Unsatisfied forward or external declaration: 'TfBaseForm.GetDateShift'
б) всё время подчёркивает второе слово Date говорит неизвестная щняга O_o , попробовал даже: StrToDateTime(TimeToStr(edDate.Date)), edDate.Value.Date, edDate.FieldDate, итд. - всё не нравится!

В шоке, не могу понять что за ерундистика...

Сам метод передачи даты правильный? Или есть правильнее?

[delphicoding]

решено,решено,решено (>10символов)