Mouszeiger auf monitor 2 steuern

[BadenPower]

Zitat von Sir Rufo:

In welcher Sprache programmierst du?

Delphi-Quellcode:

...
strtoint(label1.Caption):=mousepos.x;
...

Delphi ist das nicht ...

Zitat von Natcree:

englisch

warum fragste?

: cheer:
: cheer:
: cheer:
: cheer:
: cheer:
: cheer:
: cheer:
: cheer:
: cheer:
: cheer:

[baumina]

Schaut mal nach links oben, da wären Eiswürfel, helfen gegen Überhitzung

[Natcree]

macht euch ruhig lustig lol XDDDDD

ich arbeite mit delphi 7

[BadenPower]

Zitat von Natcree:

ich arbeite mit delphi 7

Und, hast Du Deinen Code, welchen Du gepostet hast schon einmal getestet?

[Valle]

Warum seid ihr denn alle so gehässig?

@Natcree: Du kannst einem Funktionsausdruck doch nichts zu weisen. Du schreibst ja folgendes:

strtoint(label1.Caption):=mousepos.x; Eine Anweisung sollte aber so aussehen:

Variable := Ausdruck; Du speicherst also den Wert des Ausdrucks auf der rechten Seite in die Variable auf der linken Seite.

Dass du hier einen Int in einen String umwandeln musst ist ja richtig. Aber überlege doch mal, wo hier der Int ist und wo ein String rein sollte.

[Natcree]

ja habe ich so habe es jetzt umgeschrieben da ich ohne die labels arbeiten kann

Delphi-Quellcode:

procedure TForm7.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var
mousepos:Tpoint;
x,y :integer;
begin
  getcursorpos(mousepos);
  x :=mousepos.x;
  y :=mousepos.y;
end;

damit bekomme ich die Cursor position. wie kann ich den cursor jetzt auf eine andere Form übertragen?

[Valle]

Dazu musst du dich erstmal damit beschäftigen, wie man Dinge malen kann. Dazu gibt es das TCanvas.

Am besten bemühst du mal Google und suchst nach delphi canvas tutorial.

Dort findest du genügend Material, das bereits anfängerfreundlich aufbereitet wurde.

[BadenPower]

Zitat von Natcree:

ja habe ich so habe es jetzt umgeschrieben da ich ohne die labels arbeiten kann

Delphi-Quellcode:

procedure TForm7.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var
mousepos:Tpoint;
x,y :integer;
begin
  getcursorpos(mousepos);
  x :=mousepos.x;
  y :=mousepos.y;
end;

damit bekomme ich die Cursor position. wie kann ich den cursor jetzt auf eine andere Form übertragen?

Und dieser Code läuft wirklich mit Delphi7.

Unter D2007 wird die Anwendung nicht einmal kompiliert.

[Natcree]

dann halt so

Delphi-Quellcode:

procedure TForm7.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
  var
  mousepos:TPoint;
  a,b:integer;
  begin
  getcursorpos(mousepos);
  a := Mouse.CursorPos.X;
  b := Mouse.CursorPos.Y;
end;

Aus den canvas tutorials werde ich nicht schlau was kann mann noch machen?

[Valle]

Dann musst du einen Schritt zurückrudern und dich mit mehr Basics befassen.

Konkrete Fragen können wir dir hier immer beantworten. Aber das Programm für dich schreiben nutzt keinem von uns was.

Da muss man dann eben ein bisschen mehr Geduld und Disziplin haben, wenn man etwas lernen möchte.