Проблема с процедурой ObjectsDeleteAll
Добавлено: Пн окт 17, 2011 8:55 am
Не хочет компилироваться файл StrategyInterfaceUnit.pas
Ругается на вот этот участок кода:
Вот что выдает компилятор Delphi7:
[Error] StrategyInterfaceUnit.pas(1513): Default value required for 'ObjType'
[Fatal Error] ObjectsTest.dpr(9): Could not compile used unit 'StrategyInterfaceUnit.pas'
Помогите разобраться в чем дело?
Ругается на вот этот участок кода:
Код: Выделить всё
procedure ObjectsDeleteAll(window: integer = 0; ObjType: TObjectType);
begin
if assigned(IntrfProcsRec.ObjectsDeleteAll) then
IntrfProcsRec.ObjectsDeleteAll(window, integer(ObjType));
end;
[Error] StrategyInterfaceUnit.pas(1513): Default value required for 'ObjType'
[Fatal Error] ObjectsTest.dpr(9): Could not compile used unit 'StrategyInterfaceUnit.pas'
Помогите разобраться в чем дело?