Форум: "Основная";
Текущий архив: 2003.12.30;
Скачать: [xml.tar.bz2];

Вниз

Ошибка класса EDatabaseError   Найти похожие ветки 

← →
чайник   (2003-12-16 14:38) [0]

уважаемые мастера, в каких случаях выдает ошибку EDataBaseError с сообщением Message "". Не могу отловить, то все работает, то выдает сообщение "разрушительный сбой", помогите понять в чем дело, пожалуйста.. спасибо

---

← →
Skier   (2003-12-16 14:40) [1]

Код !

---

← →
чайник   (2003-12-16 14:57) [2]

код ошибки? код ошибки не выдает.

если код программы то вот кусок:

dat1.osn.Append;
osn.FieldByName("kod_unic").asinteger:=koli;
osn.fieldbyname("kod_kl").asinteger:=klkod.asinteger;
osn.fieldbyname("kod_z").asinteger:=q_zai1kod.asinteger;
osn.fieldbyname("kred").asfloat:=strtofloat(nowkred.l1.text);
osn.fieldbyname("sum_fact").asfloat:=strtofloat(nowkred.l2.text);
osn.fieldbyname("proz_stav").asfloat:=StrTofloat(nowkred.l3.text);
osn.fieldbyname("peni").asfloat:=StrTofloat(nowkred.l4.text);
osn.fieldbyname("nom_dog").asstring:=nowkred.l5.text;
osn.fieldbyname("date1").asdatetime:=StrToDate(vr1);
osn.fieldbyname("date2").asdatetime:=StrToDate(vr2);
osn.fieldbyname("dat_dog").asdatetime:=StrToDate(vr3);
osn.post;
osn.ApplyUpdates(0);
osn.Refresh;
kred.refresh;
s_zaim.Active:=true;
kred.Locate("kod_unic",znak,[]);
osn.Locate("kod_unic",fieldbyname("kod_unic").AsInteger,[]);

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.12.30;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.007 c