OBS/Makros und Scripting/Allgemeines/Klassen/Importdatei/TxImportFile: Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
Nimz (Diskussion | Beiträge) |
Nimz (Diskussion | Beiträge) |
||
(Eine dazwischenliegende Version desselben Benutzers wird nicht angezeigt) | |||
Zeile 59: | Zeile 59: | ||
</syntaxhighlight> | </syntaxhighlight> | ||
Erklärung:<br /> | Erklärung:<br /> | ||
Enthält | 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;