Dbgrid içerisinde

[AliRiza]

Delphi'de adoquery ile parametreye bağlı olarak arama yaptırıyorum.Veritabanında resimlerin yolunu aşağıdaki gibi çağırıyorum.Benim şöyle bir problemim var.Formun show 'una aşağıdaki sql sorgusunu yazdım..

Kod: Tümünü seç

adoquery1.sql.Clear;
adoquery1.close;
adoquery1.SQL.Add('select * from product order by ntno');
adoquery1.Open;

Veritabanında aslında resimlerde var.Ben ayrıca bir edit'e girilene göre sorgulama yapan sorgu yazıp bunu bir butonun click olayına yazdım.

Kod: Tümünü seç

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
    adoquery1.SQL.Clear;
    adoquery1.Close;
    adoquery1.SQL.Add('select * from product where ntno LIKE'+QuotedStr('%'+maskedit2.Text+'%'));
    adoquery1.Open;
    label1.Caption:=adoquery1.Fields[1].AsString;
    picture:=label1.Caption+'.jpg';
    edit4.text:=picture;
     if adoquery1.RecordCount<>0 then
     Begin
      image1.Picture.LoadFromFile('C:\resimler\'+edit4.text);
     end;
    if adoquery1.RecordCount=0 then
    begin
    ShowMessage('Search query record not found');
   end;
  dbgrid1.ReadOnly:=false;
end;

end.

Bu şekilde butuna bastıkça kayıt ve resmi geliyor.Benim istediğim dbgrid içerisinde yön tuşları ile dolaşıldıkça kayıta bağlı resmin gelmesi.
Yukarıdaki mantıkla yapmayı düşünüyorum.dbgrid üzerinde seçilen veriyi hangi komut ile alabilirim.****yardımınızı bekliyorum...

*** kodları CODE tagı içine alalım.
*** mesajda acil, önemli, gibi ifadeler kullnamayalım. mege

[aslangeri]

S.A.
Buttonun click olayına yazdığın kodları
dbgrid in bağlı olduğu datasetin afterscrool olayına yazarsan olması lazım.
Yanlız dataset in after scrolunda resimleri göstereceğin pencerenin görünüp görünmediğinide kontrol etmen gerekebilir.
Kolay gelsin.

[Misafir]

belki absurt bir metod ama, ben forma bir dbedit koyuyorum . visible := false yapıyorum. bunu ilgili dataset birincil anahtar alanına bağlıyorum ve onchange olayına yazıyorum kodu.

[NetZero]

s.a

ilahi mikrocu.... ilahi ...