есть в моей программе 2 окна. в главном окне, чтобы загрузить данные из таблици я использую код
Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 | procedure sqlRefresh(curQuery: TIBQuery; curDB:TIBDatabase; sqlRequest: string );
begin
curDB . Connected := False ;
curDB . Connected := True ;
curQuery . Database := curDB;
curQuery . SQL . Clear;
curQuery . SQL . Add(sqlRequest);
curQuery . Active := True ;
end ;
* * *
DataSource1 . DataSet := IBQuery1;
DBGrid1 . DataSource := DataSource1;
sqlRefresh(IBQuery1,IBDatabase1,AGENTS);
|
если в дочернем окне в такой же DBGrid1 я пытаюсь загрузить данный по средствам этого же кода, ничего не происходит. в чем может быть проблема ?