[iegrec]

PHP код:

procedure TForm3.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
  DataModule4.ADOTable1.Open;
  Edit1.Text:= DataModule4.ADOTable1.FieldByName('n').Value;
  DateTimePicker1.Date:=DataModule4.ADOTable1d.Value;

end; 


Вот пытаюсь в ставить даные из таблицы...там где поля заполнены проблем нет работает обработка на ура....но там где поля пустые...вылезает ошибка...как сдеалть так что бы ..ошибки не было.????

где проверь допускает ли поле пустые (null) значения??????

[Black Raider]

использовать asString и asDate за место Value.
Либо перед присвоением проверять

Код:

if DataModule4.ADOTable1.FieldByName('n').isNull then Edit1.Text:=''
else Edit1.Text:= DataModule4.ADOTable1.FieldByName('n').asString;

[iegrec]

спасибо за совет.....но я уже нашол решение....просто забыл написать в форуме ...РЕШЕНИЕ НАЙДЕНО.........