Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.453 Beiträge
Delphi 12 Athens
|
AW: ZipForge will Datei nicht schreiben.
8. Jun 2023, 11:32
Mal am Rande: Sollte das copy(Pfad1Edit.Text, 0, Length(Pfad1Edit.Text) - 11);
nicht bei 1 statt 0 anfangen? Immerhin sind Strings in Delphi in der Regel 1-basiert, solange man das nicht umstellt. In dem Fall wäre aber das folgende copy(Pfad1Edit.Text, 3, Length(Pfad1Edit.Text) - 13)
zu hinterfragen.
|