IBDATASET ile stringgride kayıt aktarma..

[ercere]

Merhaba arkadaşlar
FB database kullanıyorum.Tablodan IBDATASET ile

Kod: Tümünü seç

 CARhar.Active:=true;
    CARHAR.Close;
    CARHAR.SelectSQL.Clear;
    CARHAR.SelectSQL.Add('SELECT * FROM CARHAR WHERE EVRNO =:NUM ORDER BY EVRNO');
    CARHAR.ParamByName('NUM').AsString:=edit12.Text;
    CARHAR.Open;

Yukarıdaki koddan da anlaşılacağı üzere CARHAR tablosundan aynı EVRNO özellikli 4 kayıtı stringgride aktarmak istiyorum.Nasıl bir yol izlemeliyim.

[oguzozturk74]

Kod: Tümünü seç

Query1.First; 
while not(Query1.Eof) do 
begin 
  // strGride gönderme işlemi yapılır
  StringGrid1.cells[Kolon,Satır] := ……………..
  ….
  ….
  Query1.Next; 
end;

gibi birşey kullanabilirsiniz..

[ercere]

Query1.First;
while not(Query1.Eof) do
....
....
end;

Bu yapı tüm kayıtları tarıyor.Ben where ile seçtiğim kayıtları kopyalamak istiyorum.
Bu şekilde if kontrolu ilede kayıt seçilebilir ama en sondaki kayıt için tüm kayıtlar taranır.

[husonet]

Query1.First;
while not(Query1.Eof) do
....
....
end;

Bu yapı tüm kayıtları tarıyor.Ben where ile seçtiğim kayıtları kopyalamak istiyorum.
Bu şekilde if kontrolu ilede kayıt seçilebilir ama en sondaki kayıt için tüm kayıtlar taranır.

Query SQL ile where yaptıktan sonra döngüyü kullanıacakcsın. String Gride atamanın başka yolu yok sanırım.

Kolay Gelsin...

[ercere]

Query SQL ile where yaptıktan sonra döngüyü kullanıacakcsın.

Evet Hüseyin Bey önce where yapıp sonra

Query1.First;
while not(Query1.Eof) do
....
....
end;

Yapınca sorun çözüldü.Ben döngüyü tümünde yapacağını düşünerek Oğuz arkadaşın önerisine sıcak bakmamıştım.Ama denediğimde gördümkü oluyormuş.İkinize de çok tşk.
Herkese Kolay Gelsin.İYİ Bayramlar.