обновление данных в DBGrid2

← →
sergt (2004-07-21 09:54) [0]

Подскажите плз. Есть процедура которая выполняется при нажатии на одно из полей DBGrid1 и происходит обновление DBGrid2,
так вот если менять позицию курсора в пределах одного столбца то данные не обновляются, а если в следующей строке выбрать другой столбец тогда все рулез.
Подскажите плиз где грабли.

procedure TForm1.mouseclick(Sender: TObject);
var
row: integer;
x: string;
begin
with DBGrid1.DataSource.DataSet do
for row:=0 to DBGrid1.SelectedRows.Count-1 do
begin
GotoBookmark(pointer(DBGrid1.SelectedRows.Items[row]));
end;
x := orads1.Fields[0].AsString;
orads2.Close;
orads2.SQL.Clear;
orads2.SQL.Text := "select t.t1, t.t2 from table t where t.t1 = "+x+"";
orads2.Open;
orads2.Close;
DBGrid2.Refresh;
end;
end;

← →
Johnmen © (2004-07-21 09:58) [1]

>orads2.Open;
>orads2.Close;

А смысл ?

>DBGrid2.Refresh;

А смысл ?

Про Master/Detail связки слышал?

обновление данных в DBGrid2 Найти похожие ветки