destructor THIWin.Destroy;
begin
if not NoKill then begin
Split.Free;
Control.Visible := false; //for Global_Align(Parent) <<<<< в этой строке.
Control.Free;
end;
inherited;
end;
Возможно поможет кто то из старших. Galkov?
[size=-2]------ Добавлено в 08:15
Пока выяснил, что виноват HiMathParse.
HiMath просто использует две функции из него ArcTan2 и LogN. Убираем uses HiMathParse, копируем эти функции ручками и ошибки нет.
---
Далее ...
в hiMathParse.pas, в начале пишем {$define F_P}. т.е. делаем сборку под freepascal. замечаем, что ошибка исчезла. как вывод напрашивается вопрос
uses Kol,
{$ifndef F_P}err,{$endif}
Поиск
Друзья
Администрация