![]() |
Programme aus der Taskleiste aufrufen?
Hallo Alle!
Wie kann man Prgramme oder Fenster aus der Taskleiste aufrufen? Gruß Heike |
Re: Programme aus der Taskleiste aufrufen?
Was willst du machen? Nur Aufrufen (maximieren)?
|
Re: Programme aus der Taskleiste aufrufen?
Zitat:
Gruß Heike |
Re: Programme aus der Taskleiste aufrufen?
Allo!
Keiner einen Tipp? Gruß Heike |
Re: Programme aus der Taskleiste aufrufen?
die Fenster in der Taskleiste kannst du minimieren wie alle anderen auch. Einfach mit wm_syscommand
|
Re: Programme aus der Taskleiste aufrufen?
Hi,
wenn du das Handle das kennst, dann könnte man es so machen:
Delphi-Quellcode:
Oder hast du nur die Button's in der Taskleiste ausgelesen, dann kennst du das Handle eventuell gar nicht?
if IsIconic(hWnd) then//ist das Fenster minimiert
showWindow(hWnd, SW_RESTORE);//SW_MAXIMIZE |
Re: Programme aus der Taskleiste aufrufen?
Also mit
Delphi-Quellcode:
geht es nicht.
SendMessage(Handle, WM_SYSCOMMAND, SC_RESTORE, 0);
Gruß Heike |
Re: Programme aus der Taskleiste aufrufen?
Zitat:
Gruß Heike |
Re: Programme aus der Taskleiste aufrufen?
Versuch mal mit FindWindow das Handle zu bestimmen.
|
Re: Programme aus der Taskleiste aufrufen?
Zitat:
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 07:24 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz