Thema: Delphi MyGetAverageWordLengthFromFile

Einzelnen Beitrag anzeigen

PeterPanino

Registriert seit: 4. Sep 2004
1.465 Beiträge
 
Delphi 10.4 Sydney
 
#3

AW: MyGetAverageWordLengthFromFile

  Alt 20. Apr 2016, 13:59
Auch sollte man if ThisByte = 32 then ersetzen durch if Chr(ThisByte) in [' ', #13, #10] then !
  Mit Zitat antworten Zitat