XProfan

'Source wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt:'Text: Stringlänge in einer Bereichsvariablen abfragen' PRFellow-Vorlage' Autor: Thomas Hölzer' Die tatsächliche Länge eines Strings in einer' Bereichvariable abfragen (ohne abschließendes Null-Byte)Def lstrlen(1) !"KERNEL32","lstrlenA"' BeispielDeclare buf#Dim buf#,32String buf#,0="123456789"Print lstrlen(buf#)Dispose buf#WaitInput