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

Вниз

n раз возникает событие OnNewRecord   Найти похожие ветки 

 
}|{yk ©   (2004-04-21 16:32) [0]

На OnNewrecord у меня такой код

 if Table_Kontragent.IsEmpty then Exit;
 Query_Kontragent_RSKONTRAGENT_ID.AsInteger := Table_KontragentKONTR_ID.AsInteger;
  with TFormKontragentRS.Create(Self) do
 begin
   Caption := "Ðàññ÷åòíûé ñ÷åò êîíòðàãåíòà " + Query_Kontragent_RSKONTRAGENT.AsString + " - äîáàâëåíèå";
   try
     ShowModal;
   finally
     Free;
   end;
 end;
 if (Query_Kontragent_RS.State = dsInsert) or (Query_Kontragent_RS.State = dsEdit) then
   Query_Kontragent_RS.Post;

но после появления формы любое изменение в ней приводит
к возбуждению события OnNewRecord. Почему???
DB - FireBird 1/5 Компоненты доступа FIBPlus 4.8.1


 
Vlad ©   (2004-04-21 17:09) [1]


> но после появления формы любое изменение в ней приводит
>
> к возбуждению события OnNewRecord. Почему???

Какие именно изменения приводят к OnNewRecord ?


 
}|{yk ©   (2004-04-21 17:16) [2]

Да любое изменение любого dbedit, изменение loockupcombobox etc


 
Соловьев ©   (2004-04-21 17:23) [3]


> }|{yk ©   (21.04.04 17:16) [2]

есть какая-то обработка событий у НД которые привязаны к этим контролам?


 
}|{yk ©   (2004-04-21 17:28) [4]

в datasource TableKontragent на OnDataChange испоняется запрос на выборку значений
вот он
 if Table_Kontragent.IsEmpty then Exit;
 if Table_Kontragent.State <> dsBrowse then Exit;
 Query_Kontragent_RS.Active := False;
 Query_Kontragent_RS.ParamByName("kontr_id").AsString := Table_KontragentKONTR_ID.AsString;
 Query_Kontragent_RS.Active := True;
Все


 
Соловьев ©   (2004-04-21 17:32) [5]


> к возбуждению события OnNewRecord.

какого НД?


 
}|{yk ©   (2004-04-21 17:39) [6]

Query_Kontragent_RS


 
Соловьев ©   (2004-04-21 17:42) [7]


> Query_Kontragent_RS

SQL?



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

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

Наверх




Память: 0.48 MB
Время: 0.029 c
6-1080036190
alexprozorov
2004-03-23 13:03
2004.05.16
Проблема нотификационных сообщений


14-1082641309
Digitman
2004-04-22 17:41
2004.05.16
Конструктивный же диалог ? Или - нет ? в тему LMD ... или НЕ LMD


8-1077199677
Bmouradov
2004-02-19 17:07
2004.05.16
Как на Canvas рисовать сглаженные прямые, окружности и т.п.?


7-1080644341
DelphiN!
2004-03-30 14:59
2004.05.16
Получить марку процессора


14-1082757538
Petr. A. V
2004-04-24 01:58
2004.05.16
Freecell