sorgu sonucunu değişkene aktarma

MS SQL Server veritabanı ve SQL komutlarıyla ilgli sorularınızı sorabilirsiniz. Delphi tarafındaki sorularınızı lütfen Programlama forumunda sorunuz.
Cevapla
harezmi
Üye
Mesajlar: 11
Kayıt: 20 Oca 2018 08:03

sorgu sonucunu değişkene aktarma

Mesaj gönderen harezmi »

merhaba arkadaşlar
basit bir sql sorgusundan dönen sonucu bir değişkene aktarmak istiyorum. adoquery kullnarak yapılabilir mi?
şöyle bir kod yazdım ama sonuç alamadım yardımlarınız için şimdiden tşk

procedure TForm1.Button1Click(Sender: TObject);
var
a:integer;
begin
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select a=personel_sicil_no from personel_tbl where personel_ad=:i');
adoquery1.Parameters[0].Value:=edit1.Text;
adoquery1.ExecSQL;
edit2.Text:=inttostr(a);
end;
Kullanıcı avatarı
m_ekici
Kıdemli Üye
Mesajlar: 563
Kayıt: 11 Haz 2003 06:49
Konum: Adana
İletişim:

Re: sorgu sonucunu değişkene aktarma

Mesaj gönderen m_ekici »

procedure TForm1.Button1Click(Sender: TObject);
var
a:integer;
begin
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select personel_sicil_no as a from personel_tbl where personel_ad=:i');
adoquery1.Parameters[0].Value:=edit1.Text;
adoquery1.Open;
edit2.Text:=inttostr(adoquery1.FieldValues['a']);
end;

olarak denermisin
Cevapla