[Tecnic2]

Muchas gracias ya está en marcha, aunque os pongo el código final para escribir en el visor LCD:

procedure TfMain.MostraInfoVisor();
var
F: TextFile;
begin
AssignFile(F,LCD);
Rewrite(F);
Write(F,'BIENVENIDOS ');
WriteLn(F,'A MI APLICACION');
CloseFile(F);
end;