Hilfe für Ordnerschutzprogramm

[alcaeus]

Also, es gibt hier auf dem Forum die [ delphi]-Tags, dadurch kann man Code leichter lesen. Nur damit du das mal kennst.
Zweitens, in der hilfe nimmst du die suche und suchst nach ordner, auswählen etc. dasselbe kannst du evtl. hier auf dem forum machen, dann bekommst du vielleicht schon 2-3 konkrete befehle.
Achja, und die Code-Lib gibts hier ja auch noch, da findet man so ziemlich alles.
Bezüglich deinem Problem, der Pfad des ausgewählten Ordners wird in der Pfad-Variable gespeichert. Das Ganze könnte dann so aussehen:

Delphi-Quellcode:

var Pfad: string; 
begin 
  SelectDirectory('Ordner auswählen', '' ,Pfad); 
  if SetFileAttributes(Pfad, FILE_ATTRIBUTE_NORMAL) then 
    Showmessage('Attribut wurde geändert') 
  else 
    Showmessage('Attribut wurde nicht geändert'); 
end;

Den Code habe ich nicht getestet, aber er müsste laufen...

Greetz
alcaeus