|
#1
|
|||
|
|||
Открытие файла
Ребят такая проблема.В общем юзер пишет в edit откуда скачать exe файл
например http://ya.ru/1.exe Раньше его открытие производилось через ShellExecute(Handle, 'open','C:\1.exe', nil, nil, SW_SHOWNORMAL) То есть было конкретно заданное имя!А как быть щас допустим если его назвали 2.exe то уже не откроет |
#2
|
||||
|
||||
Цитата:
Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете. |
#3
|
||||
|
||||
Интересная ситуация, это что ж, выходит обман пользователя - он думает что скачивает из сети, а в результате файл локальный оказывается, оригинально
Как вариант Код:
var i: integer; begin for i := Length(Edit1.Text) downto 1 do if Edit1.Text[i] = '/' then begin ShellExecute(Handle, 'open', 'C:\' + Copy(Edit1.Text, i+1, Length(Edit1.Text)), nil, nil, SW_SHOWNORMAL); Exit; end; end; Я не понял Вашего вопроса, но всё же Вам на него отвечу! |