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

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

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

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

Как прочитать весь файл, в котором несколько признаков конца файла

Советы » Файлы » Как прочитать весь файл, в котором несколько признаков конца файла

В текстовом файле, который обрабатывает программа, неоднократно встречается признак конца файла (как этот файл создавался никто и понятия не имеет), и как следствие если читать файл while not (eof), то он будет прочитан до первого встреченного символа конца файла :(.

Как прочитать весь файл?

Перепишем ваш файл a.dat в файл b.dat, удалив признаки конца файла:

var

f1,f2 :file

of

Byte; a :Byte; i :Longint; begin

{$I-} AssignFile(f1, 'a.dat'); AssignFile(f2, 'b.dat'); Reset(f1); Rewrite(f2); for

i := 1 to

FileSize(f1) do

begin

Read

(f1, a); if

a <> 26 then

Write(f2, a); end

; CloseFile(f1); CloseFile(f2); end

.

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

Категории

Статьи

Советы

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