Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi filstream- kurze Erklärung für 10 Zeilen. (https://www.delphipraxis.net/72492-filstream-kurze-erklaerung-fuer-10-zeilen.html)

LePtitmort 1. Jul 2006 13:25


filstream- kurze Erklärung für 10 Zeilen.
 
Delphi-Quellcode:
var
  fs: TFileStream;
  buf: array of byte;
begin
  fs := TFileStream.Create(fileName, fmOpenRead);
  fs.Position := ThePosition;
  SetLength(buf, TheLength);
  fs.Read(buf[0], TheLength);
  fs.Free;
end;
Sorry ich als Anfänger wäre froh wenn jemand mir kurz die 10 Zeilen erklärt, und vielleicht noch ein paar weiter Eigenschaften parat hat... Ich versteh das hier nicht so ganz... :coder2:

[edit=Admin]Code in Delphi-Tags gesetzt. Künftig bitte selber machen, Danke. ;-) Mfg, Daniel[/edit]

Union 1. Jul 2006 13:39

Re: filstream- kurze Erklärung für 10 Zeilen.
 
Hallo,

bitte formatiere Deinen Quellcode (markieren und Button "Delphi-Code"). Und wenn Du den Source dann noch einrückst, kann man es auch besser lesen.

Delphi-Quellcode:
var                     // Variablendeklaration
   fs: TFileStream;     // fs hat den Type TFileStream
   buf: array of byte;  // buf hat den Typ "Dynamisches Array", die Werte dürfen vom Typ Byte sein
begin
   fs := TFileStream.Create(fileName, fmOpenRead);   // Erzeugen eines Filestream-Objekts mit Dateinamenangabe und nur zum Lesen
   fs.Position := ThePosition;                       // An die Position "ThePosition" im Filestream positionieren
   SetLength(buf, TheLength);                        // Anzahl der Elemente des Dynamischen Byte-Array auf Wert "TheLength" setzen
   fs.Read(buf[0], TheLength);                       // An der Adresse des ersten Byte des Byte-Array Daten aus dem Filestream mit Länge "TheLength" einlesen
   fs.Free;                                          // Filestream-Objekt wieder freigeben (Löschen)
end;
Die Funktion öffnet also eine Datei zum Lesen und liest eine bestimmte Anzahl von Bytes ab einer angegebenen Position in ein Array ein.

LePtitmort 1. Jul 2006 14:39

Re: filstream- kurze Erklärung für 10 Zeilen.
 
traumhaft danke...
-thread closed-


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:51 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz