Cursor

Alt er muligt *S*

Har du være omkring Online hjælpen

Hmmm... Jeg har sat og kigget lidt rundt omkring, men jeg kan ikke lige finde det :-(

Prøv denne her:

procedure TForm1.FormCreate(Sender: TObject); 
begin 
  Screen.Cursors[crArrow]:=LoadCursorFromFile(\'c:\\Dokumenter\\Markør.ani\'); 
  Cursor := crArrow; 
end; 

ysubhi >> Ser fornuftigt ud

ysubhi>>
Det program jeg laver kører fra en cd, så jeg kan ikke definere noget drev. Men hvis jeg skriver følgende kan den ikke så loade i den mappe selve .exe filen ligger?

procedure TForm1.FormCreate(Sender: TObject); 
begin 
  Screen.Cursors[crArrow]:=LoadCursorFromFile(\'Markør.ani\'); 
  Cursor := crArrow; 
end; 

Det virker! Mage tak for hjælpen! :-)

Selv tak! 8-)