Newsgroup: it.comp.lang.visual-basic
Titolo: Disabilitare Tutto II

Ho provato i sorgenti sul sito comune e direi che vanno benissimo, unico
problema:
Se disabilito la barra avvio, uno può comunque richiamarla con il tasto
apposito sulle tastiere per Win95>. Come faccio?
Ste

Prova (dovrebbe chiudere il tasto avvio), non ti assicuro che funzioni
perchč avevo fatto un sacco di prove e non ricordo se questa era quella
corretta; comunque se non va dovrebbe essere solo questione di sintassi.
Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
      (ByVal lpClassName As String, ByVal lpWindowName As Long) As Long
Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" _
(ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal
lpsz2 As String) As Long
Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As
Any) As Long
 x = FindWindow("Shell_TrayWnd", 0&)
 z = FindWindowEx(x, 0, "Button", nil)
 y = SendMessage(z, WM_CLOSE, 0, 0)

  y = SendMessage(z, WM_CLOSE, 0, 0)
Ho qualche problemino...
- cos'è il parametro "nil" che passo alla "FindWindowEx"
- Che valore rappresenta la costante "WM_CLOSE"
Grazie, Stefano.



Un'ultima cosa... e per riabilitarlo?
Grazie, Stefano.

I parametri che passi sono delle costanti che riconosce vb, da quel che
ricordo non devi settare nulla per fargliele riconoscere.
Riabilitarlo, se non ricordo male, non è possibile, occorre chiudere e
riaprire explorer ma non ricordo a memoria la sintassi esatta, devi trovare
handle di explorer con FindWindow, chiuderlo
(PostMessage(handle,WM_QUIT,0,0)) e riaprirlo
(Shellexecute(0,'open','Explorer',nil,nil,SW_SHOWNORMAL)).
Questo perchè non occorre limitarsi a nascondere il pulsante Start
(altrimenti, come dici te, lo si apre con ctrl-esc) ma deve essere
distrutto; lo ricrea explorer automaticamente quando viene riavviato.
E' possibile (ma non credo ti serva) nascondere solo il pulsante: una volta
trovato l'handle lo si nasconde con Showwindow(handle,SW_HIDE); in questo
caso credo che con SW_SHOW o simile lo si rivisualizza.

 wrote in message
news:7kqn38$fri$1...@nslave1.tin.it...

Devi lavorare sul registry: allego delle informazioni che possono esserti
utili.
---
   1.Go to HKEY_Current_User / Software / Microsoft /windows/ CurrentVersion
/ Policies
   2.There should already be at least an Explorer
   3.Additional keys that can be created under Policies are System,
     Network and WinOldApp
   4.You can then add DWORD values set to 1 in the appropriate
     keys
   5.In the Explorer key you can add:
          NoDeletePrinter - Disables Deletion of Printers
          NoAddPrinter - Disables Addition of Printers
          NoRun - Disables Run Command
          NoSetFolders - Removes Folders from Settings on Start Menu
          NoSetTaskbar - Removes Taskbar from Settings on Start Menu
          NoFind - Removes the Find Command
          NoDrives - Hides Drives in My Computers
          NoNetHood - Hides the Network Neighborhood
          NoDesktop - Hides all items on the Desktop
          NoClose - Disables Shutdown
          NoSaveSettings - Don't save settings on exit
          DisableRegistryTools - Disable Registry Editing Tools -
          NOTE: Be Careful of this one
   6.In the System key you can enter:
          NoDispCPL - Disable Display Control Panel
          NoDispBackgroundPage - Hide Background Page
          NoDispScrSavPage - Hide Screen Saver Page
          NoDispAppearancePage - Hide Appearance Page
          NoDispSettingsPage - Hide Settings Page
          NoSecCPL - Disable Password Control Panel
          NoPwdPage - Hide Password Change Page
          NoAdminPage - Hide Remote Administration Page
          NoProfilePage - Hide User Profiles Page
          NoDevMgrPage - Hide Device Manager Page
          NoConfigPage - Hide Hardware Profiles Page
          NoFileSysPage - Hide File System Button
          NoVirtMemPage - Hide Virtual Memory Button
   7.In the Network key you can enter:
          NoNetSetupSecurityPage - Hide Security Setup
          NoNetSetup - Disable the Network Control Panel
          NoNetSetupIDPage - Hide Identification Page
          NoNetSetupSecurityPage - Hide Access Control Page
          NoFileSharingControl - Disable File Sharing Controls
          NoPrintSharing - Disable Print Sharing Controls
   8.In the WinOldApp key you can enter:
          Disabled - Disable MS-DOS Prompt
          NoRealMode - Disables Single-Mode MS-DOS
--
Ciao
---
--
-
Maurizio Santaniello
MIX
170 links a siti VB
http://space.tin.it/computer/gaais/
http://web.tiscalinet.it/VBLINKS/
   <---  Nuovo server !
-
--
---
Il sito comune di it.comp.lang.visual-basic
http://www.murialdo.it/it_lang_vb/