Problema con un STRING

[[Lepe]]

Al parecer Tecnic2 se resiste a poner el código, así que me aventuraré a contestar:

El problema no es de del tipo string, acabo de escribir tu cadena en un edit, pasarlo a una variable string y despues mostrarlo por pantalla y todo va bien.

Lo unico que intuyo, es que al enviar la cadena por el puerto, el último caracter lo tome como caracter nulo y sea interpretado, en lugar de tormarlo literalmente, y por tanto, la secuencia de apertura no es la correcta. ¿Divagaciones mias?

Intenta: WriteLn(F, cajon+#0) a ver que pasa

Otra cosa es que la cadena deba ser interpretada antes de enviarla. Sin usar la variable, estas escribiendo codigos de control no??

Saludos

[Tecnic2]

A ver, os voy a poner el fragmento de código:
Recuerdo que la cadena para abrir el cajon es: #27+'p0'+#100+#0

var
cajon : String;
F : TextFile;
Ini : TIniFile;

begin
Ini := TIniFile.Create(ChangeFileExt(Application.ExeName,'.INI'));
AssignFile(F, 'LPT1');
Rewrite(F);

cajon := FicheroIni.ReadString('LPT1', 'CAJON', '-');
WriteLn(F, cajon);
end;

WriteLn no me abre el cajon, sino que me escribe el texto en la impresora.

Gracias por vuestra paciencia