Du willst eine Datei splitten?
- Dateigröße ermitteln (FileOpen, FileSeek)
- Anzahl der Teile = Ceil(Dateigröße / Splitgröße)
- Schleife von 0 bis Teile - 1 (for ...)
- Speicher reservieren (Array of Byte (SetLength) oder PChar / Pointer (GetMem))
- Puffer auslesen (FileRead)
- Splitdatei öffnen (FileCreate, Dateiname zB 'Split.' + inttostr (Schleifenzähler))
- Puffer schreiben (FileWrite)
- Splitdatei schließen (FileClose)
- Speicher freigeben (FreeMem)
- Datei schließen
Beim zusammenfügen zB einfach alle Dateien in einem Verzeichnis in eine Liste holen, angefangen von Split.000 bis Split.N - sozusagen bis es keine mehr gibt, und die mit den Funktionen von oben wieder zusammenfügen.
Was ist denn das Problem? Wenn dir die nötigen Grundlagen im Umgang mit der Delphi-Hilfe, Datentypen und Funktionen fehlen, dann lies doch ein Buch oder Tutorial? Man muss doch aus so'ner trivialen Sache nicht schonwieder 'nen 3-Seiten-Thread machen?
