Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.041 Beiträge
 
Delphi 12 Athens
 
#3

AW: ZipForge will Datei nicht schreiben.

  Alt 8. Jun 2023, 10: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.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat