tHdlText # AfTextOpen(16);
tErr # AfTextRead(tHdlText,tFileName,_TextExternal | _TextANSI);
tLineNo # 0;
while (tLineNo < tHdlText->TextInfo(_TextLines))
{
inc(tLineNo);
AfTextLineRead(tHdlText,var tLine, 0, tLineNo);
...
}
tHdlText->AfTextClose();
AfTextLineRead: Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
Jens (Diskussion | Beiträge) K Stand 4.1.14 Tabellen für Beispiele eingefügt |
Jens (Diskussion | Beiträge) K Stand 4.1.13 Helptip Ausfürbar geändert |
||
| (2 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt) | |||
| Zeile 8: | Zeile 8: | ||
<td class="title"> AfTextLineRead(handle1, var alpha2[, int3[, int4]])</td> | <td class="title"> AfTextLineRead(handle1, var alpha2[, int3[, int4]])</td> | ||
<td class="platforms"> | <td class="platforms"> | ||
[[file:DE_SymbolNoAPI.gif|alt=Nicht ausführbar von der API|link=Befehle der Schnittstellen]][[file:DE_SymbolNoDLL.gif|alt=Nicht ausführbar von der Programmierschnittstelle (DLL)|link=Befehle der Schnittstellen]][[file:DE_SymbolNoARC.gif|alt=Nicht ausführbar mit der Application Remote Control|link=Befehle der Schnittstellen]][[file:DE_SymbolScriptAPI.gif|alt=Ausführbar von der | [[file:DE_SymbolNoAPI.gif|alt=Nicht ausführbar von der API|link=Befehle der Schnittstellen|Nicht ausführbar von der API]] | ||
[[file:DE_SymbolNoDLL.gif|alt=Nicht ausführbar von der Programmierschnittstelle (DLL)|link=Befehle der Schnittstellen|Nicht ausführbar von der Programmierschnittstelle (DLL)]] | |||
[[file:DE_SymbolNoARC.gif|alt=Nicht ausführbar mit der Application Remote Control|link=Befehle der Schnittstellen|Nicht ausführbar mit der Application Remote Control]] | |||
[[file:DE_SymbolScriptAPI.gif|alt=Ausführbar von der ScriptAPI|link=Befehle der Schnittstellen|Ausführbar von der ScriptAPI]] | |||
</td> | </td> | ||
</tr> | </tr> | ||
| Zeile 68: | Zeile 71: | ||
tHdlText # AfTextOpen(16); | tHdlText # AfTextOpen(16); | ||
tErr # AfTextRead(tHdlText,tFileName,_TextExternal | _TextANSI); | tErr # AfTextRead(tHdlText,tFileName,_TextExternal | _TextANSI); | ||
while (tHdlText->TextInfo(_TextLines) | tLineNo # 0; | ||
while (tLineNo < tHdlText->TextInfo(_TextLines)) | |||
{ | { | ||
AfTextLineRead(tHdlText,var tLine); | inc(tLineNo); | ||
AfTextLineRead(tHdlText,var tLine, 0, tLineNo); | |||
... | ... | ||
} | } | ||
Aktuelle Version vom 2. Dezember 2025, 13:38 Uhr
 |
|||||||||||||||||||||
| AfTextLineRead(handle1, var alpha2[, int3[, int4]]) |
|
||||||||||||||||||||
| Zeile von einem Text lesen | |||||||||||||||||||||
|
|||||||||||||||||||||
Diese Anweisung liest eine Zeile aus dem in (handle1) angegebenen Textpuffer. Der Text muss zuvor mit AfTextRead() gelesen werden. Die Zeile wird in der übergebenen Variable vom Typ alpha gespeichert und automatisch aus dem Textpuffer entfernt.
Ohne Angabe einer Zeilennummer wird immer die erste Zeile des Textes gelesen. Soll eine andere Zeile gelesen werden, kann die Zeilennummer in (int4) angegeben werden. Die Anzahl der Zeilen, kann mit der CONZEPT 16-Anweisung (siehe CONZEPT 16 Hilfe) ermittelt werden.
Die Anweisungen liefert Zeilen mit einer maximalen Länge von 250 Zeichen zurück. Ist die Zeile länger, muss die Anweisung erneut aufgerufen werden. Der sogenannte weiche Zeilenumbruch kann mit der CONZEPT 16-Anweisung (siehe CONZEPT 16 Hilfe) ermittelt werden.
