Empty SQL statament hatası

[YaPaY]

FB ile ısınma turları sırasında yapmaya çalıştığım ufak DB programında bu hatayı alıyorum. Kodlar şu şekilde:

Kod: Tümünü seç

procedure Tfrm_ana.Button1Click(Sender: TObject);
begin
frm_ana.IBDataSet1.Close;
frm_ana.IBDataSet1.insertSQL.Clear;
frm_ana.IBDataSet1.insertSQL.Add('insert into TBL_MUSTERI (SIRA,AD)');
frm_ana.IBDataSet1.insertSQL.Add('VALUES ('''+edit1.Text+''','''+edit2.Text+''')'); 
frm_ana.IBDataSet1.open;
frm_ana.IBDataSet1.Insert;
frm_ana.IBDataSet1.Post;
frm_ana.IBDataSet1.Transaction.CommitRetaining;

SIRA İnteger ve not null, ayrıca primary key
AD Varchar

Bu hata neden oluşuyor acaba?

TAŞIMA BİLGİSİ : Programlama formundan FIREBIRD formuna taşınmıştır

[serkan]

open yerine execsql kullan bence..

[sTb]

Dataset in selectsql i boş ise ondan yapabilir.

[sabanakman]

Bir sorgu sorunsuz çalışsa bile sonuç olarak kayıt döndürmeyen türden sorguların çalıştırılmasında (insert, update, delete vs.) open metodu kullanılırsa işlem çalıştırıldıktan sonra belirttiğiniz hata üretililir. Bu durumda @serkan'ın dediği gibi Open metodu yerine ExceSQL metodunu kullanın.

[aslangeri]

s.a.
hatayı selectsql boş olduğu için veriyor gibime geldi.
ibdatasetin insertsql ini buşekilde kullanma.
ibdataset in sql(ler)i ile oynamak bence doğru yol değil. eğer sqlleri değiştirerek işlem yapacaksanız ibquery veya ibsql bileşenlerini kullanın. ibdataset in sql(ler)ini bir defa hazırlayın ve tablo gibi kullanın.
benim naçizane önerilerim dir.
kolay gelsin.