void InsertToDatabase;

{

  if (Length(proEditTedarikci.Text) == 0)

    {

      ShowMessage('Tedarikçi adı boş olamaz!');

      Exit;

    }

  

  try

    

    Clomosy.DBSQLServerQuery.Sql.Text = 'INSERT INTO Tedarikciler (TedarikciAdi) VALUES (' + QuotedStr(proEditTedarikci.Text) + ')';

    Clomosy.DBSQLServerQuery.ExecSql;

    ShowMessage('Kaydedildi.');

    proEditTedarikci.Text = ''; // Edit alanını temizle

    GetData; // ListView'i güncelle

  except

    ShowMessage('Hata oluştu: ' + LastExceptionClassName + ' - ' + LastExceptionMessage);

    }

}

----------------------------------------------------------
Veriyi yazıyor ama yazdıktan sonra bu hatayı veriyor.