Bildposition anzeigen...

Hallo... Ich habe ein BlackOut...
Ich möchte eigentlich nur von Image1 die x,y Koordinaten in einer Statusbar anzeigen lassen.

StatusBar1->Panels->Items[0]->Text = IntTostr(Image1->Canvas->PenPos);

Kann mir mal jemand helfen...???

Danke im Voraus

Klopfer

Hey also ich hab das auch vor kurzem gemacht und hab einfach die methode OnMouseMove von TImage benutzt, da die jedes mal die x und y koordinaten übergibt kannst du die dann einfach in der status bar anzeigen lassen.

DerAltenburger

StatusBar1->SimpleText=Image1->Canvas->PenPos.x;
oder
StatusBar1->SimpleText=Image1->Canvas->PenPos.y;
oder 'addiere' die zwei als String!
???

Was ist Dein Problem genau?

[ Dieser Beitrag wurde am 01.06.2003 um 20:49 Uhr von DerAltenburger editiert. ]

super hätte ich auch von selbst drauf kommen müssen

Danke

DerAltenburger

Stimmt!!!

Jetzt hab ich das ganze im MouseMove ereignis drin. er zeigt mir das ganze allerdings nur an, wenn ich mit der maus zeichne... gibt es da noch eine möglichkeit, das anzeigen zu lassen, wenn ich einfach nur mit der maus über das image fahre???
Ich denke mal es liegt an der PenPos funktion das er nur im zeichnen zustand die bildpukte anzeigt!!!

void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
  StatusBar1->SimpleText = Image1->Canvas->PenPos.x;
}

Klopfer

na benutze doch einfach das X und y was mousemove als parameter erhält ! ( du braust pen pos grar nicht.