Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by bitsetter,
1. Jul 2007
Wenn du im onMouseDown Event das 2. Formular anzeigen tust, müsste es doch eigentlich egal sein wie schnell du die Maus bewegst. Oder hast du ein anderes Event genommen?
Was hast du denn für ein Betriebsystem? Bei mir wird das Formular unter WinXP mit der richtigen Farbe und auch transparent angezeigt.
procedure TForm1.FormCreate(Sender:TObject);
var
HR: HRGN;
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by bitsetter,
1. Jul 2007
Hi,
den Event onMouseDown und onMouseUp deines Formulars könntest du folgenden Code hinzufügen:
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
FormHinweis.Left:= mouse.CursorPos.X;
FormHinweis.Top:= mouse.CursorPos.Y;
FormHinweis.Show
end;