OnMouseMove ShiftState abfrage macht probleme

**TUX_der_Pinguin**

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.

markieren

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

OnMouseMove ShiftState abfrage macht probleme

OnMouseMove ShiftState abfrage macht probleme

Forumregeln