Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.07.16;
Скачать: CL | DM;

Вниз

help: При закрытии таблицы, в поля на форме лезет первая запись   Найти похожие ветки 

 
patrick   (2006-05-16 23:30) [0]

При закрытии таблицы, в поля на форме лезет первая запись из таблицы (tbl_verstka)  как сделать чтоб связные поля (DBEdit, DBLookupComboBox) на форме при закрытии таблицы оставались пустые ?

procedure TForm2.ButtonPostClick(Sender: TObject);
begin
with dmsv.tbl_verstka do begin
   IF State in [dsInsert,dsEdit] THEN begin
   dmsv.tbl_verstka["id"] := DMmain.Q_n_zakaza["id"];
   if form2.DBCheckBox1.Checked then Post else Cancel;
   end;
   end;


 
ЮЮ ©   (2006-05-17 04:33) [1]

DataSource у DB контролов (а не связных полей) указать тот же, у которого DataSet = таблица, которую ты закрываешь. Кстати, что ты под этим понимаешь? Извени, но терминология у тебя какая то своя, могу и не понять.


> procedure TForm2.ButtonPostClick(Sender: TObject);
> begin
> with dmsv.tbl_verstka do begin
>    IF State in [dsInsert,dsEdit] THEN begin
>    dmsv.tbl_verstka["id"] := DMmain.Q_n_zakaza["id"];
>    if form2.DBCheckBox1.Checked then Post else Cancel;
>    end;
>    end;


А это вообще чудовищно: при редактировании доступных полей таблицы зачем-то изменять ключевое поле.



Страницы: 1 вся ветка

Текущий архив: 2006.07.16;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.033 c
3-1147782897
Karburator
2006-05-16 16:34
2006.07.16
Программное удаление индекса из dbf


15-1150463110
if then
2006-06-16 17:05
2006.07.16
Chto takoe iskustvennyj intelekt


15-1150350168
beta
2006-06-15 09:42
2006.07.16
Карманная цифровая фотокамера


2-1150819251
Windows
2006-06-20 20:00
2006.07.16
Таймер в консоли


15-1150277303
Nic
2006-06-14 13:28
2006.07.16
Я потрясён: Edward Yourdon "Death March"