MemoLine()
MemoLine() – Memozeile extrahieren
Die Funktion extrahiert aus einem Memo eine beliebige Zeile oder Zeichenkette.
Parameter | Beschreibung |
---|---|
aMemo:C | Beliebiges Memo |
aLineLen:N | Zeilenlänge (Default = 70) |
aLine:N | Nummer der Zeile (Default = 1) |
aTabSize:N | Länge des Tabstopps |
UseWordWrap:L | Zeilenumbruch (Default = true) |
Rückgabewert
Alphanumerisch
Beispiel
CODE
| aFileName, aFile, aPath |
aPath := 'c:\temp\',
aFileName := 'test.txt',
if !DirectoryExists(aPath) then
CreateDir(aPath)
endif,
startseq,
aFile := FOpen(aPath + aFilename, FO_CREATE),
FWriteLn(aFile, 'Dontenwill AG'),
FWriteLn(aFile, 'Datum ' + DToC(Date())),
FClose(aFile)
onerror,
stopseq,
MemoLine(MemoRead(aPath + aFileName), 13, 1) // Ergebnis: 'Dontenwill AG'