Показать сообщение отдельно
  #11  
Старый 15.02.2011, 17:42
gisol gisol вне форума
Прохожий
 
Регистрация: 06.02.2011
Сообщения: 11
Репутация: 10
По умолчанию

Да я наверно в Парадоксе сделаю, щаа пробую с разных сайтов, тоже что предлагают.
Цитата:
Table1.Last;
try
Table1.AppendRecord([
Table1.IndexFields['id'],
StrToDate(Edit1.Text),
StrToDate(Edit2.Text),
// StrToInt(Edit_Cost.Text),
// StrToInt(Edit_Amount.Text),
ComboBox1.Text:=Table1.GotoKey,
ComboBox2.Text,
ComboBox3.Text]);
except
MessageDlg('В поля формы введены недопустимые данные',
mtError,[mbOK],0);
Exit;
Вот так делал, выдает ошибку, хотел чтобы выбранная запись после диагностики заносилась в таблицу, не получается, щаа на других сайтах поищу.
Ответить с цитированием