Einzelnen Beitrag anzeigen

Benutzerbild von sui
sui

Registriert seit: 1. Jun 2004
Ort: Neben mir...
108 Beiträge
 
#5

Re: Hilfe für Ordnerschutzprogramm

  Alt 2. Jun 2004, 14:10
Hierbei wird doch der ausgewählte Ordner in der Variable Pfad als String gespeichert, oder?

Delphi-Quellcode:
uses FileCtrl;

...
procedure TForm1.Button1Click(Sender: TObject);
var Pfad: string;
begin
  SelectDirectory('Ordner auswählen', '' ,Pfad);
end;
Den Code hier hab ich jetzt benutzt zum Attribute ändern.
Geh ich richtig in der Annahme, das ich jetzt dort wo der Pfad steht die Varialbe mit
dem Ordner einlesen muss?

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  if SetFileAttributes('C:\Dokumente und Einstellungen\sui\Desktop\Homepage',
                       FILE_ATTRIBUTE_NORMAL) then
    Showmessage('Attribut wurde geändert')
  else
    Showmessage('Attribut wurde nicht geändert');

end;
Kann mir nebenbei auch noch jemand erklären wie ich dieses Prob mittels der Delphi-Hilfe lösen kann?
Wo ich da gucken muss und so?
Das Leben ist ein einziger Trip.
  Mit Zitat antworten Zitat