Недавно добавленные исходники
• DeLiKaTeS Tetris (Тетрис) 238 • TDictionary Custom Sort 3 391 • Fast Watermark Sources 3 146 • 3D Designer 4 902 • Sik Screen Capture 3 397 • Patch Maker 3 604 • Айболит (remote control) 3 806 • ListBox Drag & Drop 3 069 • Доска для игры Реверси 82 361 • Графические эффекты 4 002 • Рисование по маске 3 300 • Перетаскивание изображений 2 674 • Canvas Drawing 2 814 • Рисование Луны 2 631 • Поворот изображения 2 241 • Рисование стержней 2 185 • Paint on Shape 1 587 • Генератор кроссвордов 2 265 • Головоломка Paletto 1 787 • Теорема Монжа об окружностях 2 278 • Пазл Numbrix 1 699 • Заборы и коммивояжеры 2 075 • Игра HIP 1 295 • Игра Go (Го) 1 248 • Симулятор лифта 1 493 • Программа укладки плитки 1 236 • Генератор лабиринта 1 564 • Проверка числового ввода 1 384 • HEX View 1 512 • Физический маятник 1 370

Главная страница

Исходники (более 1 300 исходных кодов)

Компоненты

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

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

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

Похожие по теме исходники