Вопрос № 125610: Программе на делфи требуется определить когда к компьютеру подключается флешка и узнать ее имя в системе. как это реализовать?...Вопрос № 125619: Доброго времени суток, уважаемые эксперкты. Вопрос: как программе удалить саму себя?...Вопрос № 125657: Доброго времени суток, уважаемые эксперты. Подскажите, пожалуйста, как осуществить загрузку файла с сетевого ресурса средствами
Borland Delphi. Заранее спасибо<p><fieldset style='background-color:#EFEFEF; width:80%; border:1px solid; padding:...Вопрос № 125662: Здравствуйте! Помогите решить такой вопрос. Пишу небольшую программку на delphix. Мне нужно программно произвести щелчок мышкой по спрайту. Для этого хочу вычислить абсолютные координаты спрайта. Но такой функции как например для кнопки button1.Clien...
Вопрос № 125.610
Программе на делфи требуется определить когда к компьютеру подключается флешка и узнать ее имя в системе. как это реализовать?
Отправлен: 01.03.2008, 21:25
Вопрос задал: Shell (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Selya
Здравствуйте, Shell!
Вот компонент TComponentUSB, инкапсулирующий события подключения/отключения USB: (см. прил.1)
А уже на событие OnUSBArrival можно подвесить такой код, определяющий букву диска подключенного устройства: (см. прил.2, конечно не btnGetDriveTypesClick, а USBArrival)
Приложение:
Ответ отправил: Selya (статус: 9-ый класс)
Ответ отправлен: 02.03.2008, 03:01
Вопрос № 125.619
Доброго времени суток, уважаемые эксперкты. Вопрос: как программе удалить саму себя?
Отвечает: Николай Владимирович / Н.В.
Здравствуйте, Хукаленко Дмитрий!
Программа в приложении (два варинта).
Источник - DelphiWorld.
Удачи!
Приложение:
Ответ отправил: Николай Владимирович / Н.В. (статус: Профессионал) Россия, Москва WWW:nvsoft.org ICQ: 420720 ---- Ответ отправлен: 02.03.2008, 09:10 Оценка за ответ: 4 Комментарий оценки: Спасибо за ответ, но обе программы не работают, если в пути есть русские буквы. Это очень не удобно.
Отвечает: Denisss
Здравствуйте, Хукаленко Дмитрий!
В приложении почти тот же ответ, что и у эксперта Николай Владимирович / Н.В., но еще дополнительно модифицированный для работы с папками и файлами, в именах которых есть буквы кириллицы (в имени папки или самого файла).
Например, код, описанный выше, не сработал у меня в папке "e:Проекты Delphi". Более того, в папке с exe-файлом появился еще и файл $$336699.bat.
Удачи!
Приложение:
--------- Будь осторожен, когда молишься ради чего-то, потому что можешь это получить...
Ответ отправил: Denisss (статус: Профессионал) Россия, Москва ICQ: 281599577 ---- Ответ отправлен: 02.03.2008, 11:21 Оценка за ответ: 5 Комментарий оценки: Большое спасибо. Всё отлично работает.
Вопрос № 125.657
Доброго времени суток, уважаемые эксперты. Подскажите, пожалуйста, как осуществить загрузку файла с сетевого ресурса средствами Borland Delphi. Заранее спасибо
Отвечает: Genia007
Здравствуйте, Serpenser PO!
Попробуйте следующий код, возможно он Вам подойдёт:
uses
URLMon, ShellApi;
function DownloadFile(SourceFile, DestFile: string): Boolean;
begin
try
Result := UrlDownloadToFile(nil, PChar(SourceFile), PChar(DestFile), 0, nil) = 0;
except
Result := False;
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
SourceFile: String; {Где находится файл в нете}
DestFile: String; {Куда качать}
begin
if DownloadFile(SourceFile, DestFile) then
begin
ShowMessage('Download succesful!');
{Показ загруженного изображения в браузере}
ShellExecute(Application.Handle, PChar('open'), PChar(DestFile),
PChar(''), nil, SW_NORMAL)
end
else
ShowMessage('Ошибка скачивания ' + SourceFile)
end;
Возможно так-же организовать скачивание с докачкой при помощи Winlnet.Pas модуля дэлфи, пример программы в журнале
Хакер за 04.2003.
Ответ отправил: Genia007 (статус: 7-ой класс)
Ответ отправлен: 03.03.2008, 13:20
Вопрос № 125.662
Здравствуйте! Помогите решить такой вопрос. Пишу небольшую программку на delphix. Мне нужно программно произвести щелчок мышкой по спрайту. Для этого хочу вычислить абсолютные координаты спрайта. Но такой функции как например для кнопки button1.ClientToScreen(pt) для спрайта нет! Как программно щелкнуть по спрайту и как определить абсолютные координаты спрайта?
Спасибо!
Отправлен: 02.03.2008, 13:21
Вопрос задал: Tolorion (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 2)
Отвечает: Drbear
Здравствуйте, Tolorion!
Почитайте Туториал по DelphiX там довольно много информации по DelphiX и спрайтам.
Ответ отправил: Drbear (статус: 8-ой класс)
Ответ отправлен: 02.03.2008, 13:40
Отвечает: MaratM
Здравствуйте, Tolorion!
уважаемый Tolorion , вы же сами создаете спрайт и его координаты неужели вы неможете узнать его координты(которые задаете сами)?
Ответ отправил: MaratM (статус: 1-ый класс)
Ответ отправлен: 03.03.2008, 01:24