Вниз
Скачать: CL | DM;

Ошибка класса 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
1-99550
bushmen
2003-12-16 11:07
2003.12.30
Лицензия в Delphi7


1-99557
Intro
2003-12-17 23:42
2003.12.30
Как подключить принтер?


1-99638
Kvorubin
2003-12-16 16:21
2003.12.30
Помогите Ламеру!!! с PopupMenu1


14-99788
ИдиотЪ
2003-12-05 08:55
2003.12.30
резонанс


6-99665
St!ff
2003-10-28 23:39
2003.12.30
Поиск по фтп...




   Наверх