Главная страницаОбратная связьКарта сайта

Распечатать текст


var
  F: TextFile; 
begin 
  AssignFile(F, "LPT1"); // LPT2, COM1, COM2... 
  Rewrite(F); 
  Writeln(F, "Hello"); 
  Writeln(F, "There!"); 
  Writeln(F, #12); 
  CloseFile(F); 
end;


Обсудить статью на форуме


Если Вас заинтересовала или понравилась информация по разработке на Delph - "Распечатать текст", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу:

Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!
   


Copyright © 2008 - 2024 Дискета.info