[Delphi] pulpit

0

Jak "przykleić" formę do pulpitu (tzn żeby się stała częścią pulpitu)????

Z góry dzięki!

0

W windowsie jest coś takiego jak element pulpitu (98, ME na pewno jest) weź zrób sobie coś takiego np z rysunkiem. Wcześniej jednak odpal regedita i wyeksportuj cały rejestr. Jak już zrobisz sobie jakiś element pulpitu to wyeksportuj ponownie cały rejestr. Najlepiej gdyby jedno i drugie eksportowanie odbyło się nie później niż w odstępie 2-3 minut. Wtedy odpal program windows comander i w menu plik jest polecenie porównaj wg zawartości. Zauwarzysz kilka zmian w rejestrze. Poszukaj tego co będzie odpowiadało temu elementowi który stał sie elementem pulpitu( coś na to bedzie wskazywało np nazwa pliku itp) wejdź do tego klucza (w regedicie) i sobie go wyeksportuj popatrz co tam jest ciekawego i spróbuj z tym coś wykąbinować powinno coś się dać zrobić. Ja tak doszedłem doadministarcji systemem i teraz u mnei w sieci mam 2 dodatkowe kompy. :D

Powodzenia. :-)-- Waldi Koronowo
[email protected]

0

Function Pulpit:THandle;
Begin
Result:=FindWindow('Progman',Nil);
Result:=FindWindowEx(Result,0,'SHELLDLL_DefView',Nil);
Result:=FindWindowEx(Result,0,'SysListView32',Nil);
End;

Procedure TForm1.FormCreate;
Begin
Windows.SetParent(Self.Handle,Pulpit);
End;

Musisz tylko zablokować poruszanie formy.
--Szymek

Prawo Bolingsa - jeżeli czujesz się świetnie, nie martw się, to minie.

1 użytkowników online, w tym zalogowanych: 0, gości: 1