Visor LCD

[Tecnic2]

Hola foro,

En mi aplicación utilizo lo siguiente para visualizar informacion en un visor LCD, pero me da error en la funcion "Assign", alguien sabe por qué?

procedure imprimehola;var F: Textfile;begin assign(F,'com1'); rewrite(F); writeln(F,'HOLA VISOR') closefile(F);end;
Gracias por adelantado.