Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Ошибка StackOverflow в FIBDataSet


costya ©   (2007-09-26 06:06:00) 

Здравствуйте!
В моём проекте присутствует строка кода:
 dm.DSetSaleDetailsGOOD_COUNT.AsFloat:= StrToFloat(strGOOD_COUNT);
Вчера обнаружил, что при попытке его выполнения возникает ошибка
Project raise exception class EStackOverflow with message 'Stack overflow'
нажимаю "ОК"
переходит в код на строку

procedure TFIBCustomDataSet.DataEvent(Event: TDataEvent; Info: Longint);
begin
if Event = deFieldChange then
  if Assigned(FOnFieldChange) then FOnFieldChange(TField(Info));
inherited DataEvent(Event,Info);
if ControlsDisabled then  <======================================= сюда
при нажатии F9 продолжают возникать ошибки переполнения стека на поле GOOD_COUNT
Ошибка возникает да же если присвоить полю значение(dm.DSetSaleDetailsGOOD_COUNT.AsFloat:= 1)
Если в проекте написать так:
dm.DSetSaleDetails.QInsert.ParamByName('GOOD_COUNT').AsFloat:=
то ошибки не возникает.
Помогите выяснить причину, так как в во всём проекте я использую присваивание вида dm.DSetSaleDetailsGOOD_COUNT.AsFloat и не хочется чтобы в остальных местах возникла подобная ошибка


Desdechado   (2007-09-26 10:53:00) [1]

Думаю, ошибка не здесь. Ошибка в "замусоривании" стека до этого, а тут только последняя капля (могла быть и в другом месте, так уж сложилось).


costya   (2007-09-26 06:46:00) [2]

Ошибку нашёл. Вопрос снят с обсуждения.


Наверх

Титульная страница Поиск, карта сайта Написать письмо