Einzelnen Beitrag anzeigen

Benutzerbild von ChrisE
ChrisE

Registriert seit: 15. Feb 2006
Ort: Hechingen
504 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#4

AW: Perl in Delphi übersetzen

  Alt 15. Apr 2011, 08:48
Hallo,

ich verstehe jetzt allerdings nicht ganz, wo Deine Frage ist.

Ich kann nur etwas "Manöverkritik" abgeben:
  • Die Variable send sollte wohl besser als reveive bezeichnet werden
  • Stringvergleiche sind schwierig, da du auf exakte Gleichheit prüfst. Besser wäre hier etwas wie z.B. Delphi-Referenz durchsuchenCompareText (vergleich ohne Groß/Kleinschreibung)
  • ich würde da in den then / else - Bereich jeweils noch begin / end einfügen. Aber das ist geschmackssache

Gruß, Chris

[RoteBox]
Kurze Vermutung:
read_until('\n', 20.0) ist wohl lese bis ein '\n' kommt (#13) oder bis 20.0 Sekunden vorbei sind?
.strip dürfte sowas wie myString := trim(<mystring>) sein
[/RoteBox]
Christian E.
Es gibt 10 Arten von Menschen, die die Binär lesen können und die die es nicht können

Delphi programming rules
  Mit Zitat antworten Zitat