Нахождение Разницы Между датами

[reihtmonbern]

Разница нужна в количестве дней. без секунд и наносекунд
а не кто не может пояснить как это дело реализовать с dbedit1 и dbedit2
а то я чёто не врубаюсь ( на форме есть два dbedit-та тип данных дата не строка и как по нажатию на батон выводился результат???

[asmodey1]

а не кто не может пояснить как это дело реализовать с dbedit1 и dbedit2

А 6-й пост я для кого написал ?

[vovk]

в общем то тоже самое что и 6 пост, только данные берём не из TDBEdit.text, а из связанного поля таблицы(по моему просто както логичнее, первоисточник всётаки. А то туда сюда из даты в текст, из текста в дату, потом опять из даты в текст )

Edit1.Text:=FloatToStr( DBEdit2.Field.AsDateTime-DBEdit1.Field.AsDateTime);

[reihtmonbern]

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

в общем то тоже самое что и 6 пост, только данные берём не из TDBEdit.text, а из связанного поля таблицы(по моему просто както логичнее, первоисточник всётаки. А то туда сюда из даты в текст, из текста в дату, потом опять из даты в текст )

Edit1.Text:=FloatToStr( DBEdit2.Field.AsDateTime-DBEdit1.Field.AsDateTime);

а что тут надо писать в var и как правильно процедуры прописать ?
и вывести в ShowMessage?

[vovk]

procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage(FloatToStr( DBEdit2.Field.AsDateTime-DBEdit1.Field.AsDateTime));
end;

[reihtmonbern]

Всем огромное спасибо точно как окопалось всё просто одна строчка заклинания и всё работает

[Sheeby]

а что за Field? мой делфи ругается на него(
Undeclared identifier: 'Field'