Du hast recht
Habe zwar den Quelltext schon hochgeladen werde es aber trotzdem deinem Beispiel zu folgen noch ändern.
Danke schön.
Ist dann im nächsten Update enthalten. (Wenn noch eins kommt)
Moment
Nein geht nicht! (Bei normalen Classen schon)
Ich habe ja keine Class in herkömmlichen sinne.
Sondern nur meinen Record umbenannt.
Delphi-Quellcode:
TSprite = class
CtrlName: WideString;
CtrlIndex: Integer;
Left: Single;
Top: Single;
Width: Integer;
Height: Integer;
Scale: Single;
Opacity: Byte;
ShellTo: string;
IconPath: WideString;
WorkDir: WideString;
UseLabel: string;
CmdLine: WideString;
ShowCmd: longint;
h_Bitmap: HBitmap;
Visible: Bool;
end;
PSprite = ^TSprite;
gruss