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

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

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

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

Вывести все файлы директории

Советы » Каталоги » Вывести все файлы директории

procedure

ListFileDir(Path: string

; FileList: TStrings); var

SR: TSearchRec; begin

if

FindFirst(Path + '*.*', faAnyFile, SR) = 0 then

begin

repeat

if

(SR.Attr <> faDirectory) then

begin

FileList.Add(SR.Name); end

; until

FindNext(SR) <> 0; FindClose(SR); end

; end

; procedure

TForm1.Button1Click(Sender: TObject); begin

ListFileDir('C:WINDOWS', ListBox1.Items); end

;

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

Категории

Статьи

Советы

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