Hallo Michael,
Zitat von
ichbins:
Die Hex2Bin-Funktion schneidet vom zu lesenden String die gelesenen Bytes ab.
Wo macht sie das denn? Kennst du den Unterschied von call-by-value und call-by-reference?
Du kannst deine Konstante HEXES ruhig aus den Prozeduren heraus nehmen - eine Konstante reicht für beide Prozeduren. Und wenn du dich ein wenig anstrengst, dann kommst du auch ohne zusätzliche lokale Variablen (bytes, workwith) aus. Deine Funktion IndexOf ist viel zu teuer für ihren Zweck - mach es besser inline. Vielleicht schaffst du es auch die mehrfache Berechnung des selben Wertes (Length(worklist) div 2) zu vermeiden.
Grüße vom marabu