Официальный сайт студ.городка НГТУ
Программирование и БД » Delphi & BDE 

#1  27.09.10 12:50

Delphi & BDE

Код::

procedure TEditFlgForm.Button1Click(Sender: TObject);
begin
 if Dm.FLG.FieldByName('Soc').Value = null then
   begin
      MessageDlg('Íåçàïîëåíî ïîëå Öåëü!', mtError, [mbNo], 0);
      Exit;
   end;

      Dm.FLG.Append;
      Dm.FLG.FieldByName('Doza').AsInteger  := PatientId;

      Dm.FLG.Post;
      Close;


end;

выбираю в Dblookupcombox нужное поле .. это поле хочу записать в таблицу..как записать?
раньше пробывал чз look связывал пустое поле в табл FLG c полем из таблици SocSt что бы в комбоксе отображалось имя а не эти цифры=)..в комбоксе Look менял и соответственно пустое поле которое связанно c look тоже менялось и записывалось в таблицу..щас в код запутан и ничё понять не могу почему ничего не записывается в таблицу.помогите плз=)
надеюсь понятно объяснил-_-

Исправлено uN][t (27.09.10 12:51)

Offline

#2  27.09.10 13:50

Re: Delphi & BDE

аааааааааааааа....аппенд не туда вставил, надо внимательнее быть ...тема закрыта..

Offline

Программирование и БД » Delphi & BDE 

ФутЕр:)

© Hostel Web Group, 2002-2025.   Сообщить об ошибке

Сгенерировано за 0.034 сек.
Выполнено 14 запросов.