kod hatası

   var 
MyForm:TclForm;
edtRegionID,edtRegionDesc:TCLEdit;
buton:TCLButton;
InsertQuery:TclSqlQuery;

void InsertToDatabase;
{
  try 

    Clomosy.DBSQLServerQuery.Sql.Text = 'INSERT INTO Region (RegionID,RegionDescripption) VALUES('+edtRegionID.Text+', '+QuotedsStr(edtRegionDesc.Text)+')';   
    Clomosy.DBSQLServerQuery.ExecSql;
    ShowMessage('Veri Ekleme Başarılı');

  except
    ShowMessage('Exception Class: ' + LastExceptionClassName+'Exception Message: '+ LastExceptionMessage);

}
{

MyForm=TclForm.Create(Self);

MyForm.AddNewEvent(MyForm,'edtRegionID','ingilizcesi');
edtRegionID.Margins.Right=150;

MyForm.AddNewEvent(MyForm,'edtRegionDesc','turkcesi');
edtRegionID.Margins.Left=150;

MyForm.AddNewButton(MyForm,'buton', 'kaydet');
buton.Align=albottom;
MyForm.AddNewEvent(buton, tbeOnClick,'InsertToDatabase');

InsertQuery =TclSqlQuery.Create(nil);
Clomosy.DBSQLServerConnect('SQL Server','(localdb)\MSSQLLocalDB','ClomosyUser','123456','NorthWind',1433);
InsertQuery.Connection=Clomosy.DBSQLServerConnection;

MyForm.Run;
}

Hata olarak sondaki boş satırı yada olmayan ilk satırı veriyor. Kodda 38 satır var ama hata kodu:
Syntax error.
Source position: 39,1
Clomosy Build : 20240709.111531

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
Gulsen Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 21 Mayıs 2025 Durum: Aktif Değil Puanlar: 11	Mesaj Seçenekleri Yanıt Yaz Alıntı Gulsen Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: kod hatası Gönderim Zamanı: 5 Saat 39 Dakika Önce Saat 20:26
	var MyForm:TclForm; edtRegionID,edtRegionDesc:TCLEdit; buton:TCLButton; InsertQuery:TclSqlQuery; void InsertToDatabase; { try Clomosy.DBSQLServerQuery.Sql.Text = 'INSERT INTO Region (RegionID,RegionDescripption) VALUES('+edtRegionID.Text+', '+QuotedsStr(edtRegionDesc.Text)+')'; Clomosy.DBSQLServerQuery.ExecSql; ShowMessage('Veri Ekleme Başarılı'); except ShowMessage('Exception Class: ' + LastExceptionClassName+'Exception Message: '+ LastExceptionMessage); } { MyForm=TclForm.Create(Self); MyForm.AddNewEvent(MyForm,'edtRegionID','ingilizcesi'); edtRegionID.Margins.Right=150; MyForm.AddNewEvent(MyForm,'edtRegionDesc','turkcesi'); edtRegionID.Margins.Left=150; MyForm.AddNewButton(MyForm,'buton', 'kaydet'); buton.Align=albottom; MyForm.AddNewEvent(buton, tbeOnClick,'InsertToDatabase'); InsertQuery =TclSqlQuery.Create(nil); Clomosy.DBSQLServerConnect('SQL Server','(localdb)\MSSQLLocalDB','ClomosyUser','123456','NorthWind',1433); InsertQuery.Connection=Clomosy.DBSQLServerConnection; MyForm.Run; } Hata olarak sondaki boş satırı yada olmayan ilk satırı veriyor. Kodda 38 satır var ama hata kodu: Syntax error. Source position: 39,1 Clomosy Build : 20240709.111531
	gll1453