Hallo!
Tolle Idee mit dem kopieren
Delphi-Quellcode:
procedure TfrmDeskBand.FormPaint(Sender: TObject);
var
ReBar32Wnd: HWND;
DC: HDC;
begin
ReBar32Wnd := FindWindowEx(
FindWindow('
Shell_TrayWnd',
nil ), 0, '
ReBarWindow32',
nil );
if (ReBar32Wnd <> 0)
then
begin
DC := GetDC(ReBar32Wnd);
StretchBlt(Canvas.Handle,
0, 0, Width, Height,
DC,
0, Top, 1, Height,
SRCCOPY);
ReleaseDC(ReBar32Wnd,
DC);
end;
end;
hat jemand eine Idee wie das auf den IE7 anwendbar ist ?
Ich habe schon versucht das umzusetzen , klappt aber nicht
