das mit den char müsste doch so gehen, denn von den beiden strings wort und wort2 werden doch auch nur jeweil 1 buchstabe miteinander verglichen??!!
es müsste doch gehen wenn du in der zeile
Delphi-Quellcode:
else if (wort2 < wort) then begin // das so machst:
else if length(wort2) < length(worth) then begin