Устанавливает операции с именем OpName иконку с номером ImageIndex.

procedure SetOperationImageIndex(
AOpName: String;
AImageIndex: Integer
);

<PASCAL>

if getvar('bCanEdit#') = 1 then

begin

addvar('bCanEdit#',0,ftfloat);

Selection.SetOperationImageIndex('StartEdit', 88);

end;

else

begin

addvar('bCanEdit#',1,ftfloat);

Selection.SetOperationImageIndex('StartEdit', 118);

end;

</PASCAL>