Forum: Object-Pascal / Delphi-Language
by SaFu,
7. Jun 2007
Achso was z.b heist das
IncludeTrailingPathDelimiter
????????????
Forum: Object-Pascal / Delphi-Language
by SaFu,
7. Jun 2007
Also Praktischer wäre natürlich denn zeitstempel dem ich den Ordner selber gebe wie du ja bereits erwähnt hast(wenn es einfacher ist).
naja ich weis nicht genau wie ich das anwenden soll.
Es nutzt mir auch teilweise nichts wenn ich was kopiere und es dann nichteinmal versteh das meiste wissen was ich über delphi habe, habe ich hier im forum gelernt.
kann man das nicht einfacher...
Forum: Object-Pascal / Delphi-Language
by SaFu,
7. Jun 2007
Hi
Jetzt bin ich total verwirt welcher code macht was, welcher ist besser und wie gehe ich mit dem um, um ein brauchbares ergebnis zu erziehlen
sorry das ich so bescheuert frage kannmir nicht einer den Code erklären??
Forum: Object-Pascal / Delphi-Language
by SaFu,
6. Jun 2007
Also wenn ich erhlich bin verstehe ich den code nicht ganz :(
Forum: Object-Pascal / Delphi-Language
by SaFu,
6. Jun 2007
Ja genau das habe ich vor ich lasse mir die Ordner in einem ShellTreeView anzeigen, und alle die älter sind als die Aktuelle KW werden verschoben.
Ich Habe halt gedacht es wäre einfacher darüber weil ich ja die Ordner vergleichen wollte und hätte somit anstatt einen String mit einem Integer einen Integer mit integer verglichen?
Aberr w enn es so geht soll es mir auch recht sein muss...
Forum: Object-Pascal / Delphi-Language
by SaFu,
5. Jun 2007
Ok stimmt so gehts
aber bekomme ich jetzt nicht das datum zurück vom VertretungsplanOrdner
procedure TForm7.Button11Click(Sender: TObject);
begin
datord:= GetDirDate((ExtractFilePath(ParamStr(0)))+'Vertretungspläne');
end;
Forum: Object-Pascal / Delphi-Language
by SaFu,
5. Jun 2007
Mach ich da was falsch
function TForm7.GetDirDate(const Dir: string): TDateTime;
var Rec: TSearchRec;
i: integer;
a :String;
begin
Result := 0;
i := FindFirst(Dir,faDirectory,Rec);
Forum: Object-Pascal / Delphi-Language
by SaFu,
5. Jun 2007
nee das kenne ich leider noch nicht beschäftige mich gerade mit so sachen wie ordner verschieben löschen, kopieren unw.
in der Delphi hilfe steht ja nicht soviel drin
Forum: Object-Pascal / Delphi-Language
by SaFu,
5. Jun 2007
Ja habe es gerade versucht es bezieht sich auf dateien wie gesagt ich brauch das Datum vom Ordner (mehrere)
Datei := ExtractFilePath(ParamStr(0))+'Vertretungspläne\test.txt';
Datum := fileDateToDateTime(FileAge(datei));
so habe ich jetzt es mal versucht gibt es da sowas wie DirectoryDateToDateTime
Forum: Object-Pascal / Delphi-Language
by SaFu,
5. Jun 2007
bezieht sich das nicht auf eine datei ??
Ich brauch aber das datum von einem mehreren Ordnern
die in einem Übergeordneten ordner stecken.
Forum: Object-Pascal / Delphi-Language
by SaFu,
5. Jun 2007
Guten morgen
Ich würde gerne in einem Ordner alle dorner verschieben die ein niedriegeres datum haben wie das aktuelle datum wie lese ich jetzt aus einem Pfad diese angaben raus.
" if DirectoryExists ((ExtractFilePath(ParamStr(0)))+'Vertretungspläne\')<= DateToStr(Date);
so nicht das weiss ich aber wie bekomme ich davon das datum zurück??