OBS/Makros und Scripting/Allgemeines/Klassen/Importdatei/TxImportFile: Unterschied zwischen den Versionen

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
 
Zeile 59: Zeile 59:
</syntaxhighlight>
</syntaxhighlight>
Erklärung:<br />
Erklärung:<br />
Enthält die festgestellte Zeichencodierung der Datei als Datentyp [http://docwiki.embarcadero.com/Libraries/Rio/en/System.SysUtils.TEncoding TEncoding].{{Hinweis|Kann nur gelesen werden.}}
Enthält die festgestellte Zeichencodierung der Datei als Datentyp [http://docwiki.embarcadero.com/Libraries/Rio/en/System.SysUtils.TEncoding ''TEncoding''].{{Hinweis|Kann nur gelesen werden.}}


=Beispiele=
=Beispiele=

Aktuelle Version vom 12. April 2019, 10:14 Uhr


Struktur

Methoden

Create

Definition:

constructor Create();

Erklärung:
Erstellt eine Instanz für das Objekt TxImportFile.

Beispiel:

oDatei := TxImportFile.Create();

LoadFromFile

Definition:

function LoadFromFile(sFile: string; eEncoding: TEncoding=nil): boolean;

Erklärung:
Die Methode erwartet zwingend einen gültigen Dateipfad im ersten Parameter. Der Inhalt der Datei wird eingelesen. Auf die Daten kann mit der Property Data zugegriffen werden.

Beispiel:

if (oDatei.LoadFromFile(cPfad)) then begin
    Meldung('Datei konnte gelesen werden');
end;

Properties

Path

Definition:

property Path : string read FFile;

Erklärung:

Enthält den in LoadFromFile übergebenen Pfad.

HINWEIS: Kann nur gelesen werden.

Name

Definition:

property Name : string read GetFileName;

Erklärung:

Enthält den in LoadFromFile übergebenen Pfad.

HINWEIS: Kann nur gelesen werden.

Data

Definition:

property Data : TStringList read FFileData write FFileData;

Erklärung:

Enthält den Inhalt der Datei in einer Datenstruktur vom Typ TStringList.

HINWEIS: Kann zwar auch geschrieben werden, aber es wird empfohlen den Inhalt aus einer Datei per LoadFromFile zu übernehmen.

Encoding

Definition:

property Encoding : TEncoding read FEncoding;

Erklärung:

Enthält die festgestellte Zeichencodierung der Datei als Datentyp TEncoding.

HINWEIS: Kann nur gelesen werden.

Beispiele

procedure ImportiereDatei(cPfad: string);
var oDatei : TxImportFile;
begin
    //Erstellen der Instanz
    oDatei := TxImportFile.Create();
    //Lesen der Datei
    if (oDatei.LoadFromFile(cPfad)) then begin
        //hier passiert etwas
    end;
    //Instanz schließen und Speicher freigeben
    MyFreeAndNil(oDatei);
end;