ÇÖZÜLDÜ-daha önce çalışan kod hata veriyor firebird

[sadikacar60]

arkadaşlar kod daha önce çalışıyordu bir değişklik yaptım ama ne yaptım hatırlamıyorum
kod şu anda hata veriyor.

conversion error from string '' ''   şeklinde bir hata çıkıyor.

neyi gözden kaçırıyorum acaba saygılarımla.

procedure TBL_GUNLUK_COZUM_BISAAT_UPDATE_yap(BID,kolon,data:string);
var
s:string;
d:string;
yol:string;
begin
//VTbaglan;

yol:=ExtractFilePath(Application.ExeName);
DMvt.IBConnection1.Connected:=false;
DMvt.IBConnection1.DatabaseName:=yol+'system\db\LGS_DBV.FDB';
DMvt.IBConnection1.Connected:=True;
DMvt.SQLTransaction1.Active:=True;



if BID='' then begin ShowMessage('BID boş');  exit; end;
s:='UPDATE TBL_COZUM set '+kolon+'='''+data+''' where BID='+BID;
DMvt.SQLQuery1.Close;
DMvt.SQLQuery1.SQL.Clear;
DMvt.SQLQuery1.SQL.Add(s);
DMvt.SQLQuery1.ExecSQL;
DMvt.SQLTransaction1.CommitRetaining;
//ShowMessage('Ok');
end;  

[serdar]

s:='UPDATE TBL_COZUM set '+kolon+'='+data+'  where BID='+BID;

bu satırı bu sekilde kullanıp deneyebılırmısınız

[sadikacar60]

(24-08-2019, Saat: 14:55)serdar Adlı Kullanıcıdan Alıntı:

s:='UPDATE TBL_COZUM set '+kolon+'='+data+'  where BID='+BID;

bu satırı bu sekilde kullanıp deneyebılırmısınız

denedim -sql error code: 104 
token unknown  

şeklinde hata verdi

[meko]

s:='UPDATE TBL_COZUM set '+kolon+'='+data+'  where BID='+BID;

BID tipi string ise tırnak içine al
ben QuotedStr fonksiyonu kullanıyorum,

[sadikacar60]

(24-08-2019, Saat: 15:13)meko Adlı Kullanıcıdan Alıntı:

s:='UPDATE TBL_COZUM set '+kolon+'='+data+'  where BID='+BID;

BID tipi string ise tırnak içine al
ben QuotedStr fonksiyonu kullanıyorum,

dediğiniz gibi hocam tırnak içine aldım düzeldi.

s:='UPDATE TBL_COZUM set '+kolon+'='''+data+''' where BID='''+BID+'''  '; 

saygılar sunarım

[mcuyan]

Hocam sql i delhpiden yollarken ya 4 adet tek tırnak icinde yollamaniz gerekiyor yada @meko arkadasin bahsettigi quotedstr kullanmaniz lazim ki sorun yasamamaniz icin kesinlikle quotedatr yi mutlaka kullanin.