Änderung des Cursors

[Orpheus]

Hi Leute!
Ich wusste leider nicht genau, wo ich das hier hin schreiben soll. Bin noch nicht sooo Delphierfahren ...
Mein Problem: Ich möchte, sobald ich mit der Maus über ein Label gehe, dort der Cursor ein anders Symbol zeigt. Die Eigenschaft label.cursor kenn ich. Ich habe jetzt mithilfe des Bildeditors ein neues Cursoricon gemahlt. Jetzt möchte ich nur wissen, wie ich den Programmtext schreiben muss, damit der Mauszeiger meinen Cursor annimmt.

einfach mit label1.cursur:='Cursor1.cur'; geht das nicht -.-

[edit=Jelly]Personality korrigiert Mfg, Jelly[/edit]

[Jürgen Thomas]

Hallo,

unter C# heißt es (siehe SDK):

Code:

label1.Cursor = new Cursor(GetType(), "Cursor1.Cur");

Unter Delphi musst Du das new durch ein entsprechendes Create ersetzen.

Viel Erfolg! Jürgen

[Orpheus]

ok ich probiers gleich mal. Danke :)

[tankm26]

Moin!

Bei der Umsetzung von

Zitat:

label1.Cursor = new Cursor(GetType(), "Cursor1.Cur");

, bei mir zu

Delphi-Quellcode:

btneuesimulation.Cursor:= Create ( Cursor(GetType(), "helpm.Cur") )

[Error] Unit1.pas(120): Missing operator or semicolon
[Error] Unit1.pas(120): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(120): 'END' expected but ')' found
[Error] Unit1.pas(121): '.' expected but ';' found


Kann mir jemand bei der Lösung der Probleme helfen?

Danke schonmal, Wieland

[DGL-luke]

Hallo, das muss "... := TCursor.Create(...)" heißen.

[Khabarakh]

Da ich noch nie mit Delphi.Net gearbeitet habe: Muss/darf da wirklich der T-Präfix angehängt werden :gruebel: ?

[tankm26]

Leider hat auch folgendes nicht funktioniert. Ich weiß nicht weiter, habe alle Möglichkeiten durch.

Achja: Ich arbeite mit Delphi 6/7 (=>WIN 32?)

Delphi-Quellcode:

  btneuesimulation.Cursor:=Cursor.Create(Cursor, helpm.Cur);

[DGL-luke]

Delphi-Quellcode:

btneuesimulation.Cursor:=Cursor.Create(Cursor, 'helpm.Cur');

@Khabarakh: Ich glaube, die D.Net Sachen sind alle mit T-Präfix :gruebel:

[tankm26]

:wall: :wall: :wall: :lol: ´

Auch ne Möglichkeit ist

screen.Cursor:=-20;
screen.Cursor:=0;

in MouseMove.

Vielen Dank für eure Hilfe!

[Orpheus]

also bei mir klappt das noch nicht...

das Screen.Cursor klappt ja nur bei vorgefertigten Cursoren. Ich wollte ja meinen selbstgemachten haben.

Bei eurem Vorschlag

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Label1.Cursor:=Cursor.Create(Cursor, 'C2.Cur');
end;

kommen bei mir folgende Fehlermeldungen:

[Fehler] Unit1.pas(30): Record, Objekt oder Klassentyp erforderlich
[Fehler] Unit1.pas(30): Inkompatible Typen: 'TComponent' und 'TCursor'
[Fataler Fehler] Project1.dpr(5): Verwendete Unit 'Unit1.pas' kann nicht compiliert werden

Wenn ich schreibe statt Cursor.Create TCusor.Creat schreibe, also so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Label1.Cursor:=TCursor.Create(Cursor, 'C2.Cur');
end;

dann kommt:

[Fehler] Unit1.pas(30): Objekt oder Klassentyp erforderlich

[Umezawa]

Delphi-Quellcode:

const

  crMyCursor = 5;
procedure TForm1.FormCreate(Sender: TObject);
begin
  Screen.Cursors[crMyCursor] := LoadCursor(HInstance, 'NewCursor');
  Cursor := crMyCursor;
end;

Steht in der hilfe: TScreen.Cursors

[CalganX]

Hi Orpheus,
bist du sicher, dass sich deine Frage auf Delphi für .NET bezieht und nicht auf Delphi für Win32?

Chris

[Orpheus]

:roll: sry. Ich meine Win32 ...

[Orpheus]

gut hab jetzt die Delphi-Hilfe gefunden. Ich versteh das jedoch nicht ganz (Bin halt kein pro...)

"Vorausgesetzt wird, daß sich in der Ressourcendatei (.RES) der Anwendung bereits ein Cursor mit dem Namen NewCursor befindet. Sie können den Cursor mit dem Bildeditor hinzufügen (Tools / Bildeditor)"

Ich hab ja schon mit dem Bildeditor einen Cursor gemalt. Nur wie krieg ich den in die Ressourcendatei?

[EDatabaseError]

Zitat:

Zitat von Orpheus

gut hab jetzt die Delphi-Hilfe gefunden. Ich versteh das jedoch nicht ganz (Bin halt kein pro...)

"Vorausgesetzt wird, daß sich in der Ressourcendatei (.RES) der Anwendung bereits ein Cursor mit dem Namen NewCursor befindet. Sie können den Cursor mit dem Bildeditor hinzufügen (Tools / Bildeditor)"

Ich hab ja schon mit dem Bildeditor einen Cursor gemalt. Nur wie krieg ich den in die Ressourcendatei?

Am einfachten über einen Ressourceneditor

Mfg

[Orpheus]

endlich!!!!

SUPER es klappt!!!

Danke Leute, ich bin euch seeeehr dankbar!!!!