Einzelnen Beitrag anzeigen

Darlo

Registriert seit: 28. Jul 2008
Ort: München
1.196 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#2

AW: mit Delphi Faxen über Fritz-Box

  Alt 7. Nov 2012, 16:55
Kannst Du nicht auf das Handle des Dialogs zugreifen und bestätigen?

Hatte da mal irgendwas für ein anderes Programm mit "enum & FindWindow" gemacht.

EDIT: Schau mal hier http://www.swissdelphicenter.ch/de/showcode.php?id=327
Delphi-Quellcode:
{
  Example how to search for a window that contains the
  word "notepad" and maximize it.

  Beispiel, wie man ein Fenster "notepad" findet
  und es anschliessend maximiert.
}


procedure TForm1.Button1Click(Sender: TObject);
var
  h: hwnd;
begin
  h := FindWindowByTitle('notepad');
  if h <> 0 then // if we found notepad
    ShowWindow(h, SW_MAXIMIZE)
  else
    ShowMessage('not found.');
end;
Philip

Geändert von Darlo ( 7. Nov 2012 um 16:59 Uhr)
  Mit Zitat antworten Zitat