Не корректно выводит дату в таблице?

@Schtrich · Регистрация: 13.08.2010

Author24 — интернет-сервис помощи студентам

Delphi

procedure putdata(zDate:TDate;zTime:TTime;zName:String);
 begin
 Form1.ClientDataSet1.Edit;
 Form1.ClientDataSet1.Append;
 Form1.ClientDataSet1['zdate']:=zDate;
 Form1.ClientDataSet1['ztime']:=zTime;
 Form1.ClientDataSet1['zname']:=zName;
 Form1.ClientDataSet1.Post;
 end;
 
 
procedure TForm1.Button1Click(Sender: TObject);
begin
putdata(13/01/2011,20.30,'some text');
end;

итог:

а че оно мне в таблице выводит не пойму.

@Romantik_FM · 14.01.2011, 13:54

Сообщение от AlienNation

Form1.ClientDataSet1['zdate']:=zDate;

Delphi

1	Form1.ClientDataSet1['zdate']:=(now);

так попробуйте

	14.01.2011, 13:54