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
| 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'