| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Копирование при помощи OpenDialog [D7, XP]
nord489 © (2007-06-22 21:01:00)Нужно, выбранный в OpenDialog фаил, скопировать в заранее известное место (например в C:\...\).
Пишу:
copyfile(Pchar(OpenDialog1.FileName), 'C:\...\' , true);
но копирование не происходит, я думаю потому что вместо 'C:\...\' нужно писать 'C:\...\*.*', т.е. с именем и расширением выбранного в OpenDialog файла.
Уже спрашивал как получить только имя и расширение выбранного в OpenDialog файла, но никак всё таки не могу осуществить копирование.
Подскажите как это можно сделать!?
nord489 (2007-06-22 23:09:00) [1]Спасибо
Инс (2007-06-22 21:11:00) [2]Конечно нужно с именем, об этом сказано в SDK. Прекрасно работает!
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then begin
MoveFile(PChar(OpenDialog1.FileName),PChar('C:\'+
ExtractFileName(OpenDialog1.FileName)));
end;
end;
| |
