Warum funktioniert das nicht?
Was ist da Falsch
property AeroEmulate[FGetAeroEmulate, FSetAeroEmulate: Integer]: Integer read FGetAeroEmulate write FSetAeroEmulate;
Also die Funktion als property
Delphi-Quellcode:
function TSkinConfig.zAEROEMULATE(nMode, RW : Integer): Integer;
begin
if RW <> 0 then
WasMode := nMode;
Result := WasMode;
end;
gruss Emil