Malformed String Hatası

[ThE-yLmZ]

Merhaba Arkadaşlar;

Delphi 7 / Firebird 2.1 kullanarak yeni bir proje geliştiriyorum. Sorunum ise şu;

Bir ibtable ile yeni veri eklemesi yapıyorum;

Kod: Tümünü seç

IBTable1.Open;
IBTable1.Append;
IBTable1CHESAP_TANIM.Value:=suiedit1.Text;
IBTable1CHESAP_TUR.Value:=suiDBLookupComboBox1.KeyValue;
IBTable1CHESAP_DAIREID.Value:=suiDBLookupComboBox2.keyvalue;
IBTable1CHESAP_KOD.Value:=suiEdit2.Text;
IBTable1CHESAP_ALACAK.Value:=RxCalcEdit1.Value;
IBTable1CHESAP_BORC.Value:=RxCalcEdit2.Value;
ibtable1.Post;

Ancak post satırında "Malformed String" hatası veriyor ve veri eklenmiyor. Bunun nedeni ne olabilir?

Yaptıklarım;
* ibtable 'ı kaldırıp tekrar ekledim
* Aynı satırlar başka bir alanda çalışıyor.
* Verilerin tiplerini tek tek kontrol ettim uyumsuzluk yok.

Teşekkür ederim.

[sadettinpolat]

http://www.firebirdfaq.org/faq342/

[ThE-yLmZ]

Burayı zaten okumuştum. "SET NAMES WIN1254;" komutunu versemde düzelmiyor. Zaten ibexpert den de içinde ki collate ve charset i düzenledim 1254'e, önceden UTF8 di. Gene olmadı. Benim anlamadığım aynı özelliklerde diğer tablolar da sorun yok ancak burada hata veriyor sürekli.

[Lost Soul]

Merhaba Arkadaşlar;

Delphi 7 / Firebird 2.1 kullanarak yeni bir proje geliştiriyorum. Sorunum ise şu;

Bir ibtable ile yeni veri eklemesi yapıyorum;

Kod: Tümünü seç

IBTable1.Open;
IBTable1.Append;
IBTable1CHESAP_TANIM.Value:=suiedit1.Text;
IBTable1CHESAP_TUR.Value:=suiDBLookupComboBox1.KeyValue;
IBTable1CHESAP_DAIREID.Value:=suiDBLookupComboBox2.keyvalue;
IBTable1CHESAP_KOD.Value:=suiEdit2.Text;
IBTable1CHESAP_ALACAK.Value:=RxCalcEdit1.Value;
IBTable1CHESAP_BORC.Value:=RxCalcEdit2.Value;
ibtable1.Post;

Ancak post satırında "Malformed String" hatası veriyor ve veri eklenmiyor. Bunun nedeni ne olabilir?

Yaptıklarım;
* ibtable 'ı kaldırıp tekrar ekledim
* Aynı satırlar başka bir alanda çalışıyor.
* Verilerin tiplerini tek tek kontrol ettim uyumsuzluk yok.

Teşekkür ederim.

belki tip dönüşümünde sorun olabilir
value ve referans kayıt alanları yerine doğrudan aşağıdaki gibi deneyin.

Kod: Tümünü seç

uses db

With IbTable1 Do
  Begin
  if not Active then Open;
  if state in [dsedit,dsinsert] then cancel;
  Append;
  fieldbyname('CHESAP_TANIM').AsString:=suiedit1.Text;
  fieldbyname('CHESAP_TUR').AsString:=suiDBLookupComboBox1.KeyValue;
  fieldbyname('CHESAP_DAIREID').AsInteger:=suiDBLookupComboBox2.keyvalue;
  fieldbyname('CHESAP_KOD').AsString:=suiEdit2.Text;
  fieldbyname('CHESAP_ALACAK').AsCurrency:=RxCalcEdit1.Value;
  fieldbyname('CHESAP_BORC').AsCurrency:=RxCalcEdit2.Value;
  Post;
  End;//With