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

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

← →
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 ?

---

← →
Anatoly Podgoretsky ©   (2003-01-18 14:59) [10]

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

---

← →
Big_Rom ©   (2003-01-18 15:37) [11]

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

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

---

← →
gsu ©   (2003-01-18 15:41) [12]

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

---

← →
Big_Rom ©   (2003-01-18 15:47) [13]

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

---

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

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



Память: 0.47 MB
Время: 0.012 c