Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Willie1,
9. Feb 2021
Hallo Freunde, danke für eure Mitarbeit.
Ich breche die Sache ab, Ich habe festgestellt, dass Zip-Archive, die ich mit TZipFile erweitert habe, danach nicht mehr lesbar sind. Winrar kann nur einen Teil der darin enthaltenen Dateien reparieren. (Alle Dateien im Archiv werden angezeigt, sind aber zum Teil nicht lesbar).Hier im Forum hatten auch schon andere Mitglieder*innen den Verdacht geäußert,...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Willie1,
8. Feb 2021
Die gespeicherten Daten sehen so aus (vereinfacht): TFussballMatrix: Array of Record Eg: string; Spt: Byte; end; Es ist 2932 Bytes groß.
Ca 100 dieser Dateien sind in dem Zip-Archiv gespeichert und ich will sie öffnen, ohne sie auf der Platte (zwischen)speichern zu müssen. Ich möchte lernen, wie es geht. Den Umweg über den ext. Speicher weiß ich.
W.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Willie1,
7. Feb 2021
Hallo,
das klappt tatsächlich.
Aber es geht um was anderes, ich habe TFileZip Auspacken mit TMemoryStream gelernt. Zum Testen setze ich ein Textfile von Delphi ein. Ich freue mich, dass dies jetzt funktioniert.
In der Realität will ich ein zweidimensionales Array of Record aus der gepackten Datei einlesen. Das ist mit Read(..,TByte) (für mich) schwierig. Wie muss ich vorgehen?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Willie1,
7. Feb 2021
Hallo Delphi-Freunde*innen,
ich bin noch mit TZipFile zu Gange Ihr (Himitsu u.a.) hattet mir schon im letzten Sommer erklärt, dass ich eine Datei aus einem Zip-Archiv ohne den Umweg über die Festplatte Virtuell öffnen kann. Jetzt will ich das lernen.
Ich habe mir das Folgende überlegt:procedure TForm1.Button7Click(Sender: TObject);
var
ms: TMemoryStream;
Data: TBytes;
ss: string;
...