MLCount() – Zeilen in Memo zählen
Die Funktion zählt die Anzahl der Zeilen in einem Memo.
|
Parameter |
Beschreibung |
|---|---|
|
aMemo:C |
Beliebiges Memo |
|
aLineLen:N |
Zeilenlänge (Default = 70) |
|
aTabSize:N |
Länge des Tabstopps |
|
UseWordWrap:L |
Zeilenumbruch (Default = true) |
Rückgabewert
Numerisch
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,
MLCount(MemoRead(aPath + aFileName)) // Ergebnis: '2'