Thema: Delphi anderes Programm beenden

Einzelnen Beitrag anzeigen

Gambit

Registriert seit: 28. Mai 2003
680 Beiträge
 
Delphi 7 Professional
 
#25

Re: anderes Programm beenden

  Alt 12. Feb 2005, 15:41
Zitat von Sprint:
[...bietet Windows dir API Funktionen an. Also nicht mit SendMessage versuchen.
Jau, habe ich auch gerade erfahren müssen...magst du mir die API-Funktion sagen?

So würde es gehen...zumindest versuchsweise...

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  AppHWnd: HWND;
begin

  AppHWnd := FindWindow(nil, 'Unbenannt - Editor');
  if IsWindow(AppHWnd) then
    BringWindowToTop(AppHWnd)else ShowMessage('Pech gehabt')
end;
  Mit Zitat antworten Zitat