Цитата:
|
Сообщение от aesoem
откомпилировал но по нажатии на кнопку ничего не копируется...
|
Нашел еще одну опечатку, замените название sButton1Click на Button1Click
procedure TForm1.sButton1Click(Sender: TObject);
begin
filecopy('c:\folder','d:\folder2');
end;