Цитата:
|
Сообщение от Alegun
Повторяюсь, скопируйте функцию по ссылке во 2 посте, затем делайте так
Код:
CopyFiles(ExtractFileDir(ParamSTR(0)) + '\Data', sEdit1.Text); где '\Data' имя папки с копируемыми файлами, а sEdit1.Text путь к папке куда эти файлы нужно скопировать, что не понятно? |
[Error] Unit1.pas(50): Incompatible types: 'procedure, untyped pointer or untyped parameter' and 'PAnsiChar'