Как сделать калькулятор в Delphi?

Delphi - объектно-ориентированный язык программирования, разработанный компанией Borland в 1995 году. Он основан на языке программирования Pascal, но имеет более расширенные возможности и добавлены новые функции.

Как Delphi реализует многоплатформенную разработку?

Delphi является интегрированной средой разработки (IDE), которая позволяет разрабатывать программное обеспечение для различных платформ, включая Windows, macOS, Android и iOS. Delphi достигает многоплатформенности с помощью...

Распечатать файл через порт принтера

Советы » Принтеры и Печать » Распечатать файл через порт принтера


 procedure

TForm1.Button1Click(Sender: TObject);  var


   port, prnfile: file

;    buffer: array

[1..128] of

Char;    Read

: Integer;  begin


   // Specify a file to print   AssignFile(prnfile, 'filetoprint');    Reset(prnfile, 1);    // specify printer port   AssignFile(port, 'LPT1');    Rewrite(port, 1);    repeat

     BlockRead(prnfile, buffer, SizeOf(buffer), Read

);      BlockWrite(port, buffer, Read

);      // Application.ProcessMessages;
  until

EOF(prnfile) or

(Read

<> SizeOf(buffer));    CloseFile(prnfile);    CloseFile(port);  end

;
 

Другое по теме:

Категории

Статьи

Советы

Copyright © 2024 - All Rights Reserved - www.delphirus.com