![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Подскажите плиз [D6, XP]
maverick_man © (2006-10-05 18:24:00)Народ подскажите плиз как сделать! Есть таблица , содержащая столбцы Дата начала Дата окончания. Как сделать, чтобы если в таблице имеется строки, ранее вводимой, то автоматически Дата начала ставилась равной Дате окончания в предыдущей строке, а если нет, то сегодняшнюю дату?
Пробовал вот так:
procedure TForm6.DBGrid1Enter(Sender: TObject);
Var
a: string;
begin
Table2.Edit;
try Table2.prior
except table2.Fields[5].AsString:=datetostr(now);
end;
table2.prior;
a:=Table2.Fields[7].AsString;
table2.Next;
Table2.Fields[5].AsString:=a;
end;
ругается...
maverick_man (2006-10-05 21:45:00) [21]Мастера, вопрос в силе=)
maverick_man (2006-10-05 19:56:00) [22]Если в таблице на данный момент уже имеются строки,то Дата начала ставилась равной Дате окончания в предыдущей строке, а если нет, то в Дату начала записывается сегодняшняя дата
Джо (2006-10-05 19:46:00) [23]>> чтобы если в таблице имеется строки, ранее вводимой
Теперь, пожалуйста, по-русски.
maverick_man (2006-10-05 19:43:00) [24]Мастера,ну подскажите начинающему!=))