Вот такой странный вопрос?

← →
Big_Rom © (2003-01-18 13:42) [0]

доброго дня!

вызов хп осуществляется следующим образом

qtemp.SQL.Clear;
qtemp.SQL.Add("EXECUTE PROCEDURE plat(:lzn,:summ,:oper,:dpl,:tpl,:dint,:ketg,:fromot)");

qtemp.ParamByName("lzn").Value:=Qdolglz.Value;
qtemp.ParamByName("summ").Value:=StrtoFloat(edit1.Text);
qtemp.ParamByName("oper").Value:=indefUser;
qtemp.ParamByName("dpl").Value:=Datetostr(date);
qtemp.ParamByName("tpl").Value:=Timetostr(Time);
qtemp.ParamByName("dint").Value:=dint;
Qtemp.ParamByName("fromot").AsInteger:=otdel;
пременнай otdel определяется если checkBox.checked=true
тогда otdel:=1 иначе 13
вопрос в том иногда когда not checkBox.checked вбазу вместо
13 пишется 5 почему не могу понять сколько у себя не тестировал
все ок
значение otdel принемает в обрободчике onclick в checkBox
otdel Public declarations

← →
gsu © (2003-01-18 13:45) [1]

для проверки используй checkBox.state

← →
Big_Rom © (2003-01-18 13:48) [2]

так всетаки с чекетом проблема ?

← →
gsu © (2003-01-18 13:49) [3]

← →
TTCustomDelphiMaster © (2003-01-18 13:54) [4]

Если рассуждать чисто телепатически то получается что значение переменной otdel где-то изменяется.

PS: Для экономии переменных и уменьшения ошибок изспользуй checkBox.Tag

← →
gsu © (2003-01-18 13:56) [5]

>> Если рассуждать чисто телепатически
круто

← →
Big_Rom © (2003-01-18 14:02) [6]

так сколько я не ловил перед присвоением параметру процедуры
значение отдела все ОК так мож если рассуждать чисто телепатически
глюк дальше в компонетах доступа к дб кстати использую
IBx

← →
TTCustomDelphiMaster © (2003-01-18 14:15) [7]

Да нет скорее всего ошибка в программе.

← →
Delirium^.Tremens © (2003-01-18 14:17) [8]

Перед ExecSQL сделай
ShowMessage(IntToStr(Qtemp.ParamByName("fromot").AsInteger));

← →
kaif © (2003-01-18 14:52) [9]

А почему имеено число 5 ?
Почему, скажем, не 387 ?

Не ты первый который говорит, что ошибка не в моей программе а у Борланда.

to
Anatoly Podgoretsky
Так я что дурак свои ошибки признавать :))

to
kaif
а вот этого я тоже не знаю, но всегда пять и ничего другого

дурак тот, кто не хочет на ошибках учиться, своих али чужих

а кто сказал что не хочет учиться просто это к фразе
что борланд не прав :))

Вот такой странный вопрос? Найти похожие ветки