Einzelnen Beitrag anzeigen

Benutzerbild von Neutral General
Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#2

Re: 10000 Werte in DATEI speichern

  Alt 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."
  Mit Zitat antworten Zitat