Parent- / Child-Form Wechsel

[Martoeng]

Hi DP,

ich habe das Problem gehabt, dass ich ein Formular zwingend vor einem anderen Formular anzeigen wollte (aber erst, wenn es aufgerufen wird). Also habe ich mal ein paar Foren durchsucht und das hier gefunden (ich glaube sogar hier irgendwo):

Delphi-Quellcode:

  private
    { Private-Deklarationen }
  public
    procedure CreateParams(var Params: TCreateParams); override;
    { Public-Deklarationen }

  end;

var
  frm_Texte: Tfrm_Texte;

implementation

{$R *.dfm}

procedure TFrm_texte.CreateParams(var Params: TCreateParams);
begin

  inherited CreateParams(Params);
  if Assigned(Application.MainForm) then
  begin
    Params.Style := Params.Style or WS_CHILD;
    Params.WndParent := Application.MainForm.Handle;
  end;

end;

Funktioniert auch wunderbar, bis auf eine Kleinigkeiten:

Wenn ich nun von dieser Child-Form auf das Parent wechsle (indem ich dort ein Edit anklicke) komme ich nur mit der RECHTEN Maustaste wieder zurück in ein Edit, das auf dem Child liegt.
Das ist natürlich nicht so toll, kann man da was machen?


Wäre für Hilfe sehr dankbar...

MfG

Martoeng