Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
das heisst
wenn ich das so schreibe
procedure TForm1.Button1Click(Sender: TObject);
var Rec: TSearchRec;
begin
if FindFirst('C:\Windows\*.ini',faAnyFile,Rec) = 0 then//da eins gefunden = 0
begin
repeat
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
ahh
und alles was ich jetzt über die dateien wissen will muss einfach mit einem komma hinten dran gehäng werden??
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
naja cardinal ist da ja das richtige da es ja keine negativen größen gibt :-D
und wie lasse ich mir jetzt z.b die größen der dateien ausgeben vom beispiel
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
dateientyp repräsentieren????
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
z.b so
procedure TForm1.Button1Click(Sender: TObject);
var Rec: TSearchRec;
groesse : size;
begin
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
Stimmt klaus
muss ich das record dann selber schreiben um z.b die große der dateien zu ermitteln???
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
hab ich doch schon aber von dem name steht z.b nichts drin
Konstante Wert Beschreibung
faReadOnly 1 Schreibgeschützte Datei
faHidden 2 Verborgene Datei
faSysFile 4 Systemdatei
faVolumeID 8 Laufwerks-ID
faDirectory 16 Verzeichnisdatei
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
also kannich anstatt denn namen mir auch andere atributte der dateien anzeigen lassen??
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
alle zwei cods gehen
hab ich das mit meiner erklärung richtig verstanden
procedure TForm1.Button1Click(Sender: TObject);
var Rec: TSearchRec;
begin
if FindFirst('C:\Windows\*.ini',faAnyFile,Rec) = 0 then//da eins gefunden = 0
begin
repeat
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
kannst du mir vielleicht ein beispiel geben wie z.b alle .ini dateien aus dem ordenr windows gelesen werden und in der listbox angezeigt werden vieleicht verstehe ich es dann besser
sorry für meine dumme fragen will es aber verstehen
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
Also muss ich erstmal ein Record vm typ TSearchRect ertsellen und die FileListbox muss ich auch schon auf einen ordner setzen??
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
ok ich habe jetzt ein neues projekt gemacht in dem habe ich eine DirectoryListBox jetzt will ich mir alle ordner anzeigen lassen im Windows ordner
mach ich dann so
procedure TForm1.FormCreate(Sender: TObject);
Var pfad :string;
begin
pfad:= FindFirst('C:\Windows\*',faDirectory,Rec);
DirectoryListBox1:= (pfad);
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
ok
FindFirst sucht im Verzeichnis Path nach dem ersten Eintrag, der mit dem angegebenen Dateinamen und den festgelegten Attributen übereinstimmt. Das Ergebnis wird im Parameter F zurückgegeben. Den Feldern dieses Datensatzes können Sie die benötigten Informationen entnehmen. FindFirst gibt im Erfolgsfall 0 zurück, ansonsten einen Fehlercode.
Der Konstantenparameter Path enthält das...
Forum: Object-Pascal / Delphi-Language
by SaFu,
23. Jul 2007
hi
da ich in der letzten zeit ziemlich oft probleme habe mehrere dateien aus einem ordner zu kopieren oder aufeinmal auszulesen bitte ich euch darum mir mal ne kleine schulung zu geben da ich das nich ganz versteh wie ich das mache.
ich weis zwar das es mit findfirst, findnext usw geht aber wie realiesiere ich das
z.b.
ich lade mir einen ordner eine fileListBox1 und will drei...