Вниз
Скачать: CL | DM;

скопировать файл   Найти похожие ветки 

 
проходил мимо решил заглянуть   (2006-10-13 11:01) [0]

Уважаемые мастера подскажите пожалуйста как скопировать файл если знаеш имя, а расширение неизвестно. CopyFile нужно полное имя файла, что делать ума не приложу. Заранее спасибо.


 
Jeer ©   (2006-10-13 11:03) [1]


> что делать ума не приложу.


не прикладывай, даже два не прикладывай - не выйдет.


 
проходил мимо решил заглянуть   (2006-10-13 11:05) [2]

Что не выйдет ум приложить или файл скопировать :)


 
Elen ©   (2006-10-13 11:09) [3]


> копировать файл если знаеш имя, а расширение неизвестно

Копировать все файлы с этим именем. Точно не ошибешся :)


 
проходил мимо решил заглянуть   (2006-10-13 11:19) [4]

Elen ©   (13.10.06 11:09) [3]
Копировать все файлы с этим именем. Точно не ошибешся :)

Именно это я и хочу но как это сделать.


 
Elen ©   (2006-10-13 11:21) [5]


> проходил мимо решил заглянуть

Ха ! Так это в цикле надо делать через FindFirst - FindNext


 
проходил мимо решил заглянуть   (2006-10-13 11:25) [6]

Уважаемая Elen © бооооольшое вам спасибо. Очень вам благодарен, что вы ответили на вопрос а не начали ерничать как некоторые. :)


 
Elen ©   (2006-10-13 11:26) [7]


> проходил мимо решил заглянуть

На дорожку тебе :
procedure TForm1.FormCreate(Sender: TObject);
var f:TSearchRec; pt:string;
begin
pt:="c:\wincmd\*.exe";
if FindFirst(pt,faAnyFile,f) =0 then
while FindNext(f)=0 do begin
ListBox1.Items.Append(f.Name);
// Копировать умееш?
end;
FindClose(f);
end;


 
Elen ©   (2006-10-13 11:27) [8]

Удалено модератором
Примечание: Offtopic



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c
15-1159716860
RASkov
2006-10-01 19:34
2006.10.29
[Error] D7Paket.dpk(33):


4-1149350507
chizra
2006-06-03 20:01
2006.10.29
надо перехватить окно в модальном режиме


9-1137705526
Аццкий_рыцарь:)
2006-01-20 00:18
2006.10.29
Освещение в DelphiX...


2-1160662054
novill
2006-10-12 18:07
2006.10.29
Почему TFileStream.size показывает 0 если файл отрывается


2-1160640883
LeonQ
2006-10-12 12:14
2006.10.29
TFormShaper - установка




   Наверх