sql kodum çalışmıyo

[M_D_5]

form1.Query2.Close;
form1.Query2.SQL.Clear;
silinecek:=Edit14.Text;
Delete from veritablosu2
where Kayit_no = silinecek
form1.Query2.Open;

kayıt sildirmek istiyorum ama fromdan sonra hata veriyo bi gözümden kaçan bi hata varmı?

Bu hatayı veriyor...Anlamadım..yardımlarınızı bekliyorum...
[Error] Unit1.pas(1113): '(' expected but identifier 'from' found

[ovural]

form1.Query2.Close;
form1.Query2.SQL.Clear;
silinecek:=Edit14.Text;
Delete from veritablosu2
where Kayit_no = silinecek
form1.Query2.Open;

kayıt sildirmek istiyorum ama fromdan sonra hata veriyo bi gözümden kaçan bi hata varmı?

Bu hatayı veriyor...Anlamadım..yardımlarınızı bekliyorum...
[Error] Unit1.pas(1113): '(' expected but identifier 'from' found

form1.Query2.SQL.Clear;
form1.Query2.SQL.Text:='Delete from veritablosu2 where Kayit_no = '+Edit14.Text;
form1.Query2.Open;

birde böyle dene

[M_D_5]

kodları yazdık çalıştırdık...sorgulamak için Edit14. e bilgi girince bu hatayı verdi....

Valla hiçbişey anlamadım..bu hatadan yardımcı olursanız sevinirim..

[danaci]

query.execsql yapın silecektir. query.open mevcut değerleri gösterir.

[conari]

form1.Query2.Close;
form1.Query2.SQL.Clear;
silinecek:=Edit14.Text;
Delete from veritablosu2
where Kayit_no = silinecek
form1.Query2.Open;

kayıt sildirmek istiyorum ama fromdan sonra hata veriyo bi gözümden kaçan bi hata varmı?

Bu hatayı veriyor...Anlamadım..yardımlarınızı bekliyorum...
[Error] Unit1.pas(1113): '(' expected but identifier 'from' found

form1.Query2.SQL.Clear;
form1.Query2.SQL.Text:='Delete from veritablosu2 where Kayit_no = '+Edit14.Text;
form1.Query2.Open;

birde böyle dene

Kod: Tümünü seç

     form1.Query2.SQL.Text:='Delete from veritablosu2 where Kayit_no = '+Edit14.Text+'; // Burda tırnak kapatılmalı
    form1.Query2.SQL.execsql // Bu kod ile query çalıştırılmalı

[ikurt07]

Form1.Query2.SQL.TEXT := 'DELETE FROM veritablosu2 WHERE Kayit_No=:K'
Form1.Query2.Parameters.ParamByName('K').Value := Edit4.Text;
form1.Query2.ExecSQL;

[shadowmann]

with ifadesi ile kullanırsanız tekrar tekrar form1.query2 yazmazsınız. Ayrıca kodlarınız daha okunaklı, anlaşılır olur.

Kod: Tümünü seç

with form2.query2 do
begin
close;
      with sql do 
      begin
      clear;
      add ve devamına diğer kodlar . 
      end;
end;

Sonuç döndürmeyen sql cümleleri için execsql, geriye bir sonuç döndürenlerde ise open kullanılır.
Son olarak da "sql kodum çalışmıyo" şeklinde bir başlık hem dilbilgisine hem de forum kurallarına aykırı. Bırakın forum kurallarını mantığa da aykırı. Lütfen değiştirin.

[Lost Soul]

Kod: Tümünü seç

     form1.Query2.SQL.Text:='Delete from veritablosu2 where Kayit_no = '+Edit14.Text+'; // Burda tırnak kapatılmalı
    form1.Query2.SQL.execsql // Bu kod ile query çalıştırılmalı

Kod: Tümünü seç

     form1.Query2.SQL.Text:='Delete from veritablosu2 where Kayit_no ='''+Edit14.Text+''''; // Burda tırnak kapatılmalı + string tipi değer olduğu için tırnak sembolunu eklemek için 2 tırnak daha eklenmeli 

kolay gelsin