Home

Page 131
Page 131
background image

124 Глава 3

 — перемещение;

 переименование.

Теперь создадим обработчики событий для нажатия кнопок нашей панели.
Сначала создайте обработчик события onclick для кнопки Копировать.
В нем нужно написать следующий код (листинг 3.17).

procedure

 string;

begin

FDes :=

if

 then

exit;

if not

 '', FDes) then

exit;

if

 then

FSrc

 ";

for i := 0 to

 do

if

 then

begin

FSrc:=FSrc+

#0;

end;

 FSrc, FDes, false);

end;


Copyright © 2020 Файлообменник files.d-lan.dp.ua

Использование любых материалов сайта возможно только с разрешения автора.