Создание каталога

Советы » Каталоги » Создание каталога

uses

Dialogs; begin

{$I-} MkDir('c:windows'); {$I+} if

IOResult <> 0 then

MessageDlg('Cannot Create Directory/Verzeichnis kann nicht angelegt werden!', mtWarning, [mbOK], 0) else

MessageDlg('Directory Created/Neues Verzeichnis angelegt.', mtInformation, [mbOK], 0); end

;

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

Категории

Статьи

Советы

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