yardım delphi adoquery

[niyo]

delphi de adoconnection bağlantısı yaptım.bir data grid için parametrik sorgulama için adoquery denedim bir türlü yapamadım.
kodlar aynı şu şekilde yardımcı olursanız sevinirim.


procedure TForm1.Button1Click(Sender: TObject);
begin
ADOQuery1.Connection := ADOConnection1;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select * from şahıslar where adı =: isim') ; //parametre oluşturmak için
ADOQuery1.Parameters[0].Value := Edit1.Text ; //kutudan parametreyi çekmesi gerekiyor çalışmayan fonksiyon bu
end;

nesnenin kendi sql object inspector ında
select * from şahıslar ;
yazılı

şimdiden teşekkürler

[PowerSoft]

SQL := 'select * from şahıslar where adı = '+CHAR(39)+EDIT1.TEXT+CHAR(39);
ADOQuery1.SQL.Add(sQL);

BU KODU BIR DENERMISIN?

[niyo]

yok hocam çalışmadı ya.denemedik işaret kalmadı.yine de teşekkürler.

[PowerSoft]

Ben Kendi Yaptiğim Kodlara Bir Bakayim Sana Bir Sana Yollayacağim...

[niyo]

çok müteşekkir olurum sabırsızlıkla bekliyorum.

[PowerSoft]

SQL:='Select DRKODU,TC,AD,SOYAD,TEL1,TEL2 From DRTABLE Where DRKODU like '+chr(39)+'%'+UpperCase(Trim(ADRES.Edit1.Text))+ch r(39);

ADRES.AdsQuery1.Close;
ADRES.AdsQuery1.SQL.Clear;
ADRES.ADSQuery1.Sql.Add(SQL);
ADRES.AdsQuery1.Open;

[niyo]

hocam burda adres veritabanı adı mı yoksa başka bi nesne mi.bir de adsquery adoquery oluyo heralde.

[PowerSoft]

Nesne Ama Onun Yerine Ads Olmadan Yazarsan çalişir Adsquery Yerine Sadece Query Olacak O Benim Kullandiğim Bir Component Ondan Sende Sorun Veri Sen Query Kullan Sadece...

[niyo]

deniyorum hata veriyor.
hocam senin kodu uyarlaması şu şekilde mi oluyor.

'Select * from şahıslar Where adı like ' +chr(39)+ '%' + UpperCase(Trim(Edit1.Text))+ chr(39)

tırnakları ve chr 39 her ne ise birbirine karıştı.

[PowerSoft]

evet türkçe karakter kullanma ve sona ; koymayı unutma
bir de cevabı geç yazdım kusura bakma

KODDA MI HATA VERIYOR YOKSA CEVAP MI ÇIKMIYOR...


SANA KOD YAZARKEN IŞTEYDIM.
ŞİMDİ EVDEYİM...
BEN O ŞEKİLDE YAPIYORUM BİR SORUN VERMİYOR...