Einzelnen Beitrag anzeigen

TUX_der_Pinguin

Registriert seit: 1. Jun 2005
Ort: Anholt (NRW)
609 Beiträge
 
Delphi 11 Alexandria
 
#1

OnMouseMove ShiftState abfrage macht probleme

  Alt 2. Okt 2006, 14:49
Hi,

ich habe ein kleines Programm geschrieben, welches durch ein doppel klick ein neues Formular aufruft, welches eine Grafik
beinhaltet. Bei gedrückter Maustaste und bewegung der Maus soll etwas auf einer Zeichenfläche eingezeichnet werden.

Delphi-Quellcode:
procedure TfrmDialog.PaintBoxMouseMove(..);
begin
  If MausImZeichenBereich Then Begin
    If ssLeft IN Shift Then Begin
      //Zeichenoperation
    End;{if}
  End;{if}

end;
Jetzt zu meinem Problem, klicke ich nun doppelt in meinem Hauptformular und die Mausposition ist im Zeichenbereich des neuen
Formulars so wird sofort die Zeichenoperation ausgeführt, obwohl ich die Maustaste nicht gedrückt habe.

mfg

TUX
  Mit Zitat antworten Zitat