Neuer Ärger mit Vista TaskDialog

[Willie1]

Delphi-Quellcode:

procedure TForm1.Button6Click(Sender: TObject);
var
  Form3: TForm3;
begin
  Form3:=TForm3.Create(Form1);
  try
    ActivHandle:=Form3.Handle; //globale Variable
    Form3.ShowModal;
  finally
    Form3.Free
  end;
end;

So klappt es: Innerhalb von Form3 auf ActivHandle zugreifen. Ob das eine unverselle Lösung ist ... ?

Schönes Wochenende
Willie1