Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Programme aus der Taskleiste aufrufen? (https://www.delphipraxis.net/89823-programme-aus-der-taskleiste-aufrufen.html)

smart 6. Apr 2007 09:04


Programme aus der Taskleiste aufrufen?
 
Hallo Alle!

Wie kann man Prgramme oder Fenster aus der Taskleiste aufrufen?

Gruß
Heike

Bernhard Geyer 6. Apr 2007 09:22

Re: Programme aus der Taskleiste aufrufen?
 
Was willst du machen? Nur Aufrufen (maximieren)?

smart 6. Apr 2007 09:55

Re: Programme aus der Taskleiste aufrufen?
 
Zitat:

Zitat von Bernhard Geyer
Was willst du machen? Nur Aufrufen (maximieren)?

Ja, nur maximieren.

Gruß
Heike

smart 7. Apr 2007 11:19

Re: Programme aus der Taskleiste aufrufen?
 
Allo!

Keiner einen Tipp?

Gruß
Heike

SirThornberry 7. Apr 2007 12:00

Re: Programme aus der Taskleiste aufrufen?
 
die Fenster in der Taskleiste kannst du minimieren wie alle anderen auch. Einfach mit wm_syscommand

bitsetter 7. Apr 2007 13:00

Re: Programme aus der Taskleiste aufrufen?
 
Hi,

wenn du das Handle das kennst, dann könnte man es so machen:
Delphi-Quellcode:
  if IsIconic(hWnd) then//ist das Fenster minimiert
    showWindow(hWnd, SW_RESTORE);//SW_MAXIMIZE
Oder hast du nur die Button's in der Taskleiste ausgelesen, dann kennst du das Handle eventuell gar nicht?

smart 7. Apr 2007 13:52

Re: Programme aus der Taskleiste aufrufen?
 
Also mit
Delphi-Quellcode:
SendMessage(Handle, WM_SYSCOMMAND, SC_RESTORE, 0);
geht es nicht.


Gruß
Heike

smart 7. Apr 2007 13:53

Re: Programme aus der Taskleiste aufrufen?
 
Zitat:

Zitat von bitsetter
Hi,

wenn du das Handle das kennst, dann könnte man es so machen:

Wie komme ich an das Handle?

Gruß
Heike

Alexander 7. Apr 2007 15:03

Re: Programme aus der Taskleiste aufrufen?
 
Versuch mal mit FindWindow das Handle zu bestimmen.

bitsetter 7. Apr 2007 20:00

Re: Programme aus der Taskleiste aufrufen?
 
Zitat:

Zitat von smart
Wie komme ich an das Handle?

Bei deinem Problem würde sich wohl EnumWindows() anbieten:
Delphi-Quellcode:
function EnumWin(hWnd: THandle; FindWin: PString): Boolean; stdcall;
var
  WinText: AnsiString;
begin
  Result := True;
  if IsWindowVisible(hWnd) and not boolean(GetWindowLong(hWnd, GWL_HWNDPARENT)) then
  begin
    SetLength(WinText, SendMessage(hWnd, WM_GETTEXTLENGTH, 0, 0));
    SendMessage(hWnd, WM_GETTEXT, Length(WinText)+ 1, integer(WinText));
    if (length(WinText)> 0) and (WinText <> 'Program Manager') then
    begin
      if IsIconic(hWnd) then//ist das Fenster minimiert
        if WintExt = FindWin^ then//DEMO
          ShowWindow(hWnd, SW_RESTORE);//SW_MAXIMIZE
      //Form1.ListBox1.Items.Add(WinText);
    end;
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  FindWin: String;
begin
  FindWin:= 'Unbenannt - Editor';
  EnumWindows(@EnumWin, integer(@FindWin));
end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:10 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz