[papulo]

El error que me da si lo escribo así:

Código Delphi [-]
...  
until (StrComp (buffer, sStartCross) = 0);

es "Incompatible types: 'String' and 'PAnsiChar'"

sStarCross y Buffer son ambos 'Strings'

Me da el mismo error con la orden que me has dado.