Text Datei teilen

[Christian18]

Hallo,

ich würde es zwar bevorzugen zu Prüfen, ab 1 MB erreicht ist, aber wenn dir die andere Variate reicht, dann mach es so.

Ich würde ein Schleife in einer anderen schachteln

z.b.

Delphi-Quellcode:

for i:=1 to AnzahlderFiles do  // AnzahlderFiles kannst du vorher gerechnen AnzahlderFiles=AnzahlderZeilen / 5000
  begin
    for j:=1 to 5000 do
      begin
        // Hier einfach in die neue txt schreiben
      end;
  end;

Ich hoffe ich kommte dir ein bisschen helfen.

MFG Christian18