Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
Delphi 10.2 Tokyo Professional
|
Re: 10000 Werte in DATEI speichern
15. Nov 2006, 13:51
Machs mit nem MemoryStream... 10000 Integers in eine Ini-Datei..
Schreiben
Delphi-Quellcode:
var MS: TMemoryStream;
begin
MS := TMemoryStream.Create;
Ms.Write(AInteger, SizeOf(Integer);
...// soviel du willst.. auch inner Schleife wenn du willst/kannst
Ms.SaveToFile(Filename);
Ms.Free;
end;
Lesen:
Delphi-Quellcode:
var MS: TMemoryStream;
Buffer: Integer; // Oder auch direkt die Variable benutzen wos reinsoll (keine properties!)
begin
MS := TMemoryStream.Create;
Ms.LoadFromFile(Filename);
Ms.Read(Buffer, SizeOf(Integer);
...// soviel du willst.. auch inner Schleife wenn du willst/kannst
Ms.Free;
end;
Is jetzt ohne try-except/finally... Neutral Generäle brauchen sowas nicht
Gruß
Neutral General
Michael "Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
|