[Кодер]

Уважаемые, либо я сейчас под вечер не дружу с мозгом, либо причина иначе.
Проверяю файл на существо(в наличии есть), но программа всеравно не открывает его

Код:

var
  path:string;
begin
  path:=ExtractFilePath(ParamStr(0))+'data\note\'+DateToStr(notechdate.date)+'.rtf';
  if FileExists(DateToStr(NoteChDate.Date)) then
    note.Lines.LoadFromFile(DateToStr(NoteChDate.Date))
  else
    begin
    Application.MessageBox(Pchar(DateToStr(NoteChDate.Date)+'<Сообщение об ошибке открытия>'),'<Некая капча>');
    NoteChDate.Date:=Now;
    end;
end;