Hint erscheint hinter Form. Aber wieso?

[Armageddon]

Hi himitsu,

also den Internetexplorer rufe ich so auf:

Delphi-Quellcode:

procedure TForm1.Image1Click(Sender: TObject);
var 
  Reg: TRegistry;
  KeyName: string;
  ValueStr: string;
begin
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CLASSES_ROOT;
    KeyName     := 'htmlfile\shell\open\command';
    if Reg.OpenKey(KeyName, False) then
    begin
      ValueStr := Reg.ReadString('');
      Reg.CloseKey;
    end
    else
      ShowMessage('Kein Browser angegeben!');
  finally
    Reg.Free;
  end;
  ValueStr := Copy(ValueStr, Pos('"', ValueStr) + 1, Length(ValueStr) -
    Pos('"', ValueStr));
  ValueStr := Copy(ValueStr, 1, Pos('"', ValueStr) - 1);
  ShowMessage(ValueStr);
  ShellExecute(0, 'open', PChar(ValueStr), 'http://www.cnc-maschinenmacros.de',
    nil, sw_Show);
end;

Das funktoniert auch soweit. Nur glaube ich hat das mit dem Fenster der I-Explorers und dem Hint wohl etwas damit zu tun das mein Fenster wohl immer an erster Stelle dargestellt wird. Egal was für ein Fenster ich auch daneben anklicke! Komisch.