Delphi Wie Start-Icon ins Programm holen?

Thema durchsuchen

Ansicht

Themen-Optionen

Wie Start-Icon ins Programm holen?

Ein Thema von Daniel B · begonnen am 23. Aug 2006 · letzter Beitrag vom 24. Aug 2006

Vorheriger Beitrag

Nächster Beitrag

chaosben

Registriert seit: 27. Apr 2005
Ort: Görlitz
1.358 Beiträge

Delphi XE2 Professional

Re: Wie Start-Icon ins Programm holen?

23. Aug 2006, 09:51

Warum das Startmenu öffnen?

zusammenfalten · markieren

Delphi-Quellcode:

			var

  SB : HWND;

  CR : TRect;

begin

  SB:=FindWindow('Shell_TrayWnd',nil);

  SB:=FindWindowEx(sb,0,'BUTTON',nil);

  Windows.GetClientRect(SB,CR);

  BitBlt(PaintBox1.Canvas.Handle,0,0,cr.Right-cr.Left,cr.Bottom-cr.Top,GetDC(Sb),0,0,SRCCOPY);

end;