Cursor laden

[storm1988]

Seas

Ich bin gerade dabei in meinen Programm eigene Cursor reinzuladen doch irgend wie will das nicht funktionieren.
Hab bis jetzt folgenden Source Code geschrieben.

Screen.Cursors[crMyCursor2] := LoadCursorFromFileA(ExtractFilePath(Application.ExeName) + '\winbut.cur'); Doch da die funktion LoadCursorFromFileA einen PAnsiChar benötigt funktioniert das ganze halt nicht.
Wie schaff ich das jetzt, dass ich einen Cursor lade, bzw. wie kann ich den String in einen PAnsiChar konvetieren??

MFg st0rm

[Flocke]

1. Lass den Backslash in '\winbut.cur' weg (ist nicht nötig)
2. Mache einfach einen Cast herum
Screen.Cursors[crMyCursor2] := LoadCursorFromFileA(PChar(ExtractFilePath(Application.ExeName) + 'winbut.cur')); Wenn's so nicht geht, dann musst du zuerst einer lokalen Variablen den Pfad zuweisen und diese dann casten.

[storm1988]

Thx, so gehts