Отправка файла на "соседний компьютер" через IrDa [D5]
kisik © (2005-11-03 03:48:00)
Пишу CD-авторун с софтом для мобильника. В разделе Ява-игры
хотел бы вставить кнопочку "Отправить по IrDa". Как это
сделать?
kisik (2005-11-14 08:40:00) [1]
Самый простой путь использовать ShellApi.Работает (да и
ладно) в XP.
uses ShellApi;
procedure TForm1.irdaClick(Sender: TObject);
var
APchar:array[0..954] of char;
APchar2:array[0..954] of char;
APchar3:array[0..254] of char;
begin
// Windows-программа, отвечающая за связь через IrDa. Лежит в
windows\system32
StrPCopy(APchar, 'irftp.exe');
// Файл для отправки
StrPCopy(APchar2, 'c:\1.txt');
// Перегоняем название в короткий вариант. В принципе, можно
обойтись и без этого, но если в названии папок или файла имеются
пробелы, отправка не состоится. На java-игры изменение имени файла
никак не сказывается.
GetShortPathName(APchar2, APchar3,255);
// Отправляем файл
ShellExecute(Handle,nil,APchar,APchar3,nil,SW_RESTORE);
end;
Наверх 
ЧАТ |
Орешник |
|
