Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вот такой странный вопрос? [D6, IB6.x]

Big_Rom © (2003-01-18 13:42:00)
доброго дня!

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

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

Big_Rom (2003-01-18 15:47:00) [1]
а кто сказал что не хочет учиться просто это к фразе
что борланд не прав :))

gsu (2003-01-18 15:41:00) [2]
дурак тот, кто не хочет на ошибках учиться, своих али чужих

Big_Rom (2003-01-18 15:37:00) [3]
to
Anatoly Podgoretsky
Так я что дурак свои ошибки признавать :))

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

Anatoly Podgoretsky (2003-01-18 14:59:00) [4]
Не ты первый который говорит, что ошибка не в моей программе а у Борланда.

kaif (2003-01-18 14:52:00) [5]
А почему имеено число 5 ?
Почему, скажем, не 387 ?

Delirium^.Tremens (2003-01-18 14:17:00) [6]
Перед ExecSQL сделай
ShowMessage(IntToStr(Qtemp.ParamByName("fromot").AsInteger));

TTCustomDelphiMaster (2003-01-18 14:15:00) [7]
Да нет скорее всего ошибка в программе.

Big_Rom (2003-01-18 14:02:00) [8]
так сколько я не ловил перед присвоением параметру процедуры
значение отдела все ОК так мож если рассуждать чисто телепатически
глюк дальше в компонетах доступа к дб кстати использую
IBx

gsu (2003-01-18 13:56:00) [9]
>> Если рассуждать чисто телепатически
круто

TTCustomDelphiMaster (2003-01-18 13:54:00) [10]
Если рассуждать чисто телепатически то получается что значение переменной otdel где-то изменяется.

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

gsu (2003-01-18 13:49:00) [11]
?

Big_Rom (2003-01-18 13:48:00) [12]
так всетаки с чекетом проблема ?

gsu (2003-01-18 13:45:00) [13]
для проверки используй checkBox.state

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »