ürünler tablomuz ve ülkeler tablomuz olduğunu varsayalım.
ürünler tablede ülkeler tablenin ID si ni kayıt etmiş olalım.
DBGride çift tıkladığımızda bize ürünün hangi ülkeye ait olduğunu Edit2.Text kutusu içerisinde göstersin.
dm ---> DataModul,
gnl --> ADOQuery
DBGridimizde ürünler listeli iken,
dm.gnl.Close;
dm.gnl.SQL.Clear;
dm.gnl.SQL.Add('select * from ulkeler where ID_Land= '
+IntToStr(DBGrid1.DataSource.DataSet.FieldByName('Id_Land').AsInteger));
dm.gnl.Open;
if not dm.gnl.IsEmpty then
Edit2.Text:=dm.gnl.fieldByName('ulkeadi').AsString
else
Edit2.Text:='';