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

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

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

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

Копирование файлов вместе с каталогами

Советы » Каталоги » Копирование файлов вместе с каталогами

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


uses

ShellApi;

procedure

TForm1.Button1Click(Sender: TObject); var


OpStruc: TSHFileOpStruct; frombuf, tobuf: Array [0..128] of Char; Begin


FillChar( frombuf, Sizeof(frombuf), 0 ); FillChar( tobuf, Sizeof(tobuf), 0 ); StrPCopy( frombuf, 'h:hook*.*' ); StrPCopy( tobuf, 'd: emp rief' ); With OpStruc DO Begin
Wnd:= Handle;
wFunc:= FO_COPY;
pFrom:= @frombuf;
pTo:=@tobuf;
fFlags:= FOF_NOCONFIRMATION or FOF_RENAMEONCOLLISION; fAnyOperationsAborted:= False; hNameMappings:= Nil;
lpszProgressTitle:= Nil; end;
ShFileOperation( OpStruc ); end

;

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

Категории

Статьи

Советы

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