MLCount()

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

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,

MLCount(MemoRead(aPath + aFileName))   // Ergebnis: '2'