Einzelnen Beitrag anzeigen

CocoPops
(Gast)

n/a Beiträge
 
#1

Form wird nicht korrekt positioniert

  Alt 30. Apr 2014, 22:42
Ich erstelle zum Test folgendermaßen ein neues Formular aus Form2 heraus:

Delphi-Quellcode:
var
 aForm: TForm;
begin
 aForm := TForm.Create(nil);

 aForm.Left := Form1.Left;
 aForm.Top := Form1.Top;
 aForm.Width := Form1.Width;
 aForm.Height := Form1.Height;
 aForm.Color := clBlack;

 aForm.AlphaBlend := True;
 aForm.AlphaBlendValue := 185;

 aForm.ShowModal;

 // ein bisschen Code

 aForm.Hide;
 aForm.Free;
Durch diesen Code möchte ich ein Formular mit Transparenz über das Hauptformular legen. Es wird logischerweise auch genau so erstellt.
Aber seltsamerweise ist dieses neue Formular NICHT an den Koordinaten wie das Form1. Es ist etwas über und etwas weiter links neben dem Form1.

Woran liegt das?
  Mit Zitat antworten Zitat