Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi versteckte dateien immer wieder verstecken? (https://www.delphipraxis.net/37268-versteckte-dateien-immer-wieder-verstecken.html)

FlinkerFinger 3. Jan 2005 18:15


versteckte dateien immer wieder verstecken?
 
hi,
ich habe folgendes Problem und wäre für jede Hilfe dankbar -_-

ich habe ein Program geschrieben, was im hintergrund läuft und durch tastenkombination sichtbar wird. Es beinhaltet einen timer. Dieser timer soll nun aber noch mit einr Funktion ausgestattet werden und zwar :

er soll prüfen(wenn es geht) ob in windows die Option "versteckte dateien und ordner ANZEIGEN" aktiviert ist
wenn ja --> die option "verstecke dateien und Ordner AUSBLENDEN" aktivieren.

Halt das man nie versteckte Ordner zu gesicht bekommt

geht das überhaupt , wenn ja wäre ich für jeden Ratschlag dankbar ;)

FlinkerFinger 3. Jan 2005 18:31

Re: versteckte dateien immer wieder verstecken?
 
okay habs selbst gefunden ... für alle die es interessiert


Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
      var regist: TRegistry;
    begin
      regist := TRegistry.Create;
      regist.RootKey := HKEY_CURRENT_USER;
      regist.OpenKey('Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced',true);
      regist.WriteInteger('Hidden',1);
      regist.free;
    end;

    procedure TForm1.Button2Click(Sender: TObject);
      var regist: TRegistry;
    begin
      regist := TRegistry.Create;
      regist.RootKey := HKEY_CURRENT_USER;
      regist.OpenKey('Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced',true);
      regist.WriteInteger('Hidden',2);
      regist.free;
    end;
das eine schaltet die option ein , das andere die option aus ;D

[edit=Christian Seehase]Delphi-Tags gesetzt. Bitte künftig selber machen. Danke. Mfg, Christian Seehase[/edit]

Luckie 3. Jan 2005 20:02

Re: versteckte dateien immer wieder verstecken?
 
Und was macht was? :gruebel:

Airblader 3. Jan 2005 20:09

Re: versteckte dateien immer wieder verstecken?
 
Wäre Hidden=0 für nicht-verstecken nicht sinnvoller (mal rein aus technischer weise) :gruebel:

air

Luckie 3. Jan 2005 20:16

Re: versteckte dateien immer wieder verstecken?
 
Mir kommt das auch etwas spanisch vor. Eigentlich recht ungewöhnlich, auch für Microsoft.

Boombuler 4. Jan 2005 07:44

Re: versteckte dateien immer wieder verstecken?
 
Hi Leutz

Ungeprüfte Vermutung meinerseits:
Wert = 1 -> on
Wert <> 1 -> off

Weil 2 is wirklich n bischen seltsam!!!

Greetz
Boombuler

w3seek 4. Jan 2005 13:18

Re: versteckte dateien immer wieder verstecken?
 
Zitat:

Zitat von Boombuler
Weil 2 is wirklich n bischen seltsam!!!

Da geb ich dir voellig recht, allerdings nimmt Windows ebenfalls den Wert 2 :roll:

The-X 7. Jan 2005 12:50

Re: versteckte dateien immer wieder verstecken?
 
Unter W9x gab es wenn ich mich recht erinnere 3 Auswahlmöglichkeiten in dem Dialog Ordneroptionen
  • alle Dateien anzeigen (1)
  • versteckte Dateien ausblenden (2)
  • versteckte und Systemdateien ausblenden (unter 9x = 0)

hab leider kein 98 mehr drauf und hab dafür jemand im Irc gefragt weil ich mir nicht sicher war :roll:

und der hat die Optionen extra für mich eingestellt und im Registry-Editor nachgesehen :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:57 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz