[delphicoding]

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

Код:

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символов)