Ordnerattribute festlegen

[Kompon Ente]

Hi,

kann ich einen Ordner sozusagen verschlüsseln bzw. wie bei FileGetAttr ausblenden, damit man ihn nicht sehen kann (wenn in den Einstellungen "Versteckte Systemdateien anzeigen" deaktiviert ist)?

[MrKnogge]

ja kann man, hier im Forum müsstest du etliches finden.

[Kompon Ente]

Hi,

habe schon gesucht, blicke aber nicht ganz durch - ziemlich verwirrend alles.

Welcher Code ist denn nun der korrekte? :roll:

[MrKnogge]

GetFileAttributes

In folgendem Beispiel wird ein Ordner auf readOnly gesetzt,
das musst du dann nur auf versteckt abändern:
http://www.delphipraxis.net/internal...=198176#198176

[Kompon Ente]

Hi,

mein Ordner heißt "data".

Habe nun:

Delphi-Quellcode:

if DirectoryExists('data\') then
  ...

Wie geht's weiter? Will ihn verstecken!

[MrKnogge]

Zitat:

Zitat von Kompon Ente

Wie geht's weiter?

auf obigen link klicken und lesen :wink:

Im letzten posting findest du dann ein link zum DF

gruss

[edit]Tippfehler :roll: [/edit]

[Kompon Ente]

Hi,

ohje, ich komme nicht weiter:

Delphi-Quellcode:

  if DirectoryExists(PChar('data\') then
    (SetFileAttributes(PChar('data\'),FILE_ATTRIBUTE_HIDDEN));

Fehlermeldung:

Delphi-Quellcode:

[Fehler] Unit1.pas(327): Undefinierter Bezeichner: 'DirectoryExists'
[Fataler Fehler] Unit1.pas(7): Verwendete Unit 'Unit1' kann nicht compiliert werden

[Kompon Ente]

Hat sich erledigt! :wall:

Man sollte die Implementierung der FileCtrl in den uses nicht vergessen. :roll: :mrgreen:

[r2c2]

Zitat:

Zitat von Kompon Ente

Hi,

mein Ordner heißt "data".
...

Delphi-Quellcode:

if DirectoryExists('data\') then
  ...

Jo, dein Ordner heißt data, meiner aber nicht. :mrgreen: Bitte verwende keine relativen Pfade(außer du willst n Russisch-Roulette-Prog schreiben :lol:). Besser:

Delphi-Quellcode:

ExtractFilePath(ParamStr(0)) + 'data\'; // oder so ähnlich, kommt dreauf an, wo "dein" Ordner liegt.

mfg

Christian

[MrKnogge]

Zitat:

Zitat von r2c2

Zitat:

Zitat von Kompon Ente

Hi,

mein Ordner heißt "data".
...

Delphi-Quellcode:

if DirectoryExists('data\') then
  ...

Jo, dein Ordner heißt data, meiner aber nicht. :mrgreen: Bitte verwende keine relativen Pfade(außer du willst n Russisch-Roulette-Prog schreiben :lol:). Besser:

Delphi-Quellcode:

ExtractFilePath(ParamStr(0)) + 'data\'; // oder so ähnlich, kommt dreauf an, wo "dein" Ordner liegt.

mfg

Christian

Und wo ist da nun bitte der unterschied ?