Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  Re: Datei lesen auf "einmal"

   
    by shmia, 28. Apr 2006
  Meine Variante hat gegenüber den letzten 2 Varianten vier entscheidende Vorteile:
  1.) durch die Verwendung von AnsiString entfällt für den Aufrufer die Pflicht den Speicher freizugeben
  2.) durch die Verwendung von AnsiString kann der Aufrufer ganz leicht die Länge der Daten mit Lenght() ermitteln. Man braucht die Länge nicht extra speichern
  3.) meine Funktion ist universell einsetzbar. Man...
• Forum: Programmieren allgemein

  Re: Datei lesen auf "einmal"

   
    by shmia, 27. Apr 2006
  In einem Rutsch in einen String laden:
  function FileToString(const FileName: string): AnsiString;
  var
  fs: TFileStream;
  Len: Integer;
  begin
  fs := TFileStream.Create(FileName, fmOpenRead or fmShareDenyWrite);
  try
  Len := fs.Size;
  SetLength(Result, Len);