chodzi mi o to zeby nie mozna bylo na nim klikac itd
Kolejny trojan?
Zrób screena pulpitu i formę walnij na pełny ekran, na formie image na algin allclient, i wczytujesz zrzut pulpitu na image.
tak ale na formie mam juz inne komponenty
<font color="green">tak ale na formie mam juz inne komponenty</span>
To daj im visible na false o ile mają ;-)
To główną formę zrób tak jak pisałem a zrób sobie jeszcze drugą - i na nią wrzuć komponenty [zeby]
no faktycznie:-) a jak ukryc pasek startu?
Niewiem czy dobrze rozumiem - chcesz zablokować pulpit całkowicie?
Jeżeli tak to należy odwołać się do rejestru. Oto przykład jak ukryć ikony z pulpitu:
REGEDIT4
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"NoDesktop"=dword:00000001
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\RestrictRun]
Zaś poniżej całkowite uniemożliwienie zrobienia cokolwiek. Jest to sposób jak ominąć problem z logowaniem DEFAULT w windows 9x.
Skrypt jest wycinkiem mojej magisterki tak więc mile widziane komentarze (samo źródło skryptu gdzieś leży w sieci ale niepamiętam adresu WWW).
Przed próbą radze (Prosze to wykonać koniecznie!!!) ZROBIĆ KOPIE REJESTRU ABY MOŻNA BYŁO PRZYWRÓCIĆ REJESTR.
Oto przykładowy skrypt ograniczający całkowity dostęp.
REGEDIT4
[HKEY_CURRENT_USER
Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"NoDesktop"=dword:00000001 ; wylacz puplpit
"NoNetHood"=dword:00000001 ; Ukryj ikone Otoczenie
"NoInternetIcon"=dword:00000001 ; ukryj ikone IE
"NoRun"=dword:00000001 ; brak w Menu Start RUN
"NoFind"=dword:00000001 ; brak polecenia SZUKAJ (ALT+F3)
"NoRecentDocsMenu"=dword:00000001 ; ukryj funkcje dokumenty
"NoStartMenuSubFolders"=dword:00000001 ; ukryj podfoldery Menu Start
"NoSetTaskbar"=dword:00000001 ; ukryj funkcje ustawienia->
panel sterowania i drukarki
"NoSetFolders"=dword:00000001 ; ukryj funkcje ustawienia->
pasek zadan i menu start
"NoSetActiveDesktop"=dword:00000001 ; ukryj funkcje ustawienia->
active desktop
"NoChangeStartMenu"=dword:00000001 ; wylacz menu kontekstwoe Menu
Start
"NoEditMenu"=dword:00000001 ; brak mozliwosci edycji Menu
Start
"NoPrinterTabs"=dword:00000001 ; ukryj strone Wlasciwosci
drukarki->„ogólne” i
„szczególy”
[HKEY_CURRENT_USER
Software\Microsoft\Windows\CurrentVersion\Policies\WinOldApp]
"Disabled"=dword:00000001 ; wylacz tryb MS-DOS
"NoRealMode"=dword:00000001 ; wylacz ponowne uruchomienie w
trybie MS-DOS
[HKEY_CURRENT_USER
Software\Microsoft\Windows\CurrentVersion\Policies\Network]
"NoNetSetup"=dword:00000001 ; wylacz karte siec
[HKEY_CURRENT_USER
Software\Microsoft\Windows\CurrentVersion\Policies\System]
"DisableRegistryTools"=dword:00000001 ; wylacz edycje rejestru
"NoDispCPL"=dword:00000001 ; wylacz karte „wlasciwosci
ekranu”
"NoSecCPL"=dword:00000001 ; wylacz karte „hasla”
"NoDevMgrPage"=dword:00000001 ; wylacz „menedzer urzadzen”
"NoConfigPage"=dword:00000001 ; ukryj strone „profile przetu”
"NoFileSysPage"=dword:00000001 ; ukryj przycisk „System
plików”
"NoVirtMemPage"=dword:00000001 ; ukryj przycisk „Pamiec
wirtualna”
[HKEY_CURRENT_USER
Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\RestrictRun]
"1"=""
Jak widzisz możesz tylko niektóre funkcje użyć.
Jak chowac TaskBar? masz: [cygaro]
//Schowac
procedure TForm1.Button1Click(Sender: TObject);
var
hTaskBar : THandle;
begin
hTaskbar := FindWindow('Shell_TrayWnd', Nil);
ShowWindow(hTaskBar, SW_HIDE);
end;
//Poakazac
procedure TForm1.Button2Click(Sender: TObject);
var
hTaskBar : THandle;
begin
hTaskbar := FindWindow('Shell_TrayWnd', Nil);
ShowWindow(hTaskBar, SW_SHOWNORMAL);
No to dziala, czy nie??? [hurra]