Der Vorschlag von #NULL ist in der Tat nochmal um ca 10-40% schneller als PeekC
Code: Alles auswählen
x$="h "
max=10000000
a=GetTickCount_()
For j=1 To max
If Trim(x$)=""
x+1
EndIf
Next
b=GetTickCount_()
MessageRequester("",Str(b-a )+#LF$+Str(x))
;--------------------------------------
;um Faktor 10-20 schneller, je nach Länge des Strings
;ohne Debugger getestet, mit Debugger sind die Unterschiede nicht so groß
a=GetTickCount_()
For j=1 To max
If PeekC(@x$)='' Or PeekC(@x$)=' '
xx+1
EndIf
Next
b=GetTickCount_()
MessageRequester("",Str(b-a )+#LF$+Str(xx))
;--------------------------------------
*temp.Character
*temp=@x$
a=GetTickCount_()
For j=1 To max
If *temp\c=' ' Or *temp\c=''
xxx+1
EndIf
Next
b=GetTickCount_()
MessageRequester("",Str(b-a )+#LF$+Str(xxx))
Code: Alles auswählen
a=GetTickCount_()
For j=1 To max
z=PeekC(@x$)
If z='' Or z=' '
xx+1
EndIf
Next
b=GetTickCount_()
MessageRequester("",Str(b-a )+#LF$+Str(xx))