SQL Sorgu Sonucu Dönmüyor

Firebird ve Interbase veritabanları ve SQL komutlarıyla ilgli sorularınızı sorabilirsiniz. Delphi tarafındaki sorularınızı lütfen Programlama forumunda sorunuz.
Cevapla
kafkasyali
Üye
Mesajlar: 75
Kayıt: 04 Nis 2008 01:03

SQL Sorgu Sonucu Dönmüyor

Mesaj gönderen kafkasyali »

Kod: Tümünü seç

procedure TForm1.lbledt1Change(Sender: TObject);
begin
  if lbledt1.Text <> '' then
  begin
    with datamodule.DM.ibqry2 do
    begin
      Close;
      SQL.Clear;
      SQL.Add('Select * from ONEMLI where ISIM like ' +
        QuotedStr('%' + lbledt1.Text + '%'));
      Open;
    end;
  end
  else
  begin
    if lbledt1.Text = '' then
    begin
      with datamodule.DM.ibqry2 do
      begin
        Close;
        SQL.Clear;
        SQL.Add('Select * from ONEMLI');
        Open;
      end;
    end;
  end;
end;
Bir telefon rehberi uygulaması yapmaya çalışıyorum. Kullandığım derleyici Delphi XE6. Interbase bileşenleri ile veritabanına bağlanıyorum. Firebird Sürümü 2.5.

Daha önce çalıştırdığım kodu şimdi çalıştıramıyorum. Sorgu sonucu dönmüyor. Daha doğrusu hiç bir tepki ya da hata vermiyor. ibquery'nin içerisine sorgumu yazdığımda ise sorgu sonucunu alabiliyorum. Nerede hata yapıyorum?
visualbasic.stupid:=true;
Kullanıcı avatarı
freeman35
Admin
Mesajlar: 2356
Kayıt: 12 Haz 2003 04:05
Konum: merkez camii yanı

Re: SQL Sorgu Sonucu Dönmüyor

Mesaj gönderen freeman35 »

"datamodule.DM.ibqry2.sql.text" bunu bir kontrol et. query yi kapatıp açıyorsan transactionlarıda kapat aç
kolay gele
ZAGOR TENAY TÜRK'tür... TÜRK kalacak...
Zoru başarırım, İmkansız zaman alır
FreeMan 35.5

Soru sormaya üşenmiyorsan, sorunun çözümünü yazmaya da üşenme !!!
kafkasyali
Üye
Mesajlar: 75
Kayıt: 04 Nis 2008 01:03

Re: SQL Sorgu Sonucu Dönmüyor

Mesaj gönderen kafkasyali »

Evet. Datamodule'ü yeninden yaptığımda sorunu çözdüm. Teşekkürler freeman35.
visualbasic.stupid:=true;
Cevapla