Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.05.21;
Скачать: CL | DM;

Вниз

как заполнить программно <input type=file object...   Найти похожие ветки 

 
MetalFan ©   (2006-01-25 17:18) [0]

вот такая проблема? кто может подсказать?
var
 ovElements: OleVariant;
 i: Integer;
begin
 while WebBrowser1.ReadyState <> READYSTATE_COMPLETE do
   Application.ProcessMessages;
 ovElements :=     WebBrowser1.OleObject.Document.forms.item(0).elements;
 for i := 0 to (ovElements.Length - 1) do
 begin
   if ovElements.item(i).Name = "pict"  then
   begin
      ovElements.item(i).VALUE := "C:\picture.jpg";
   end;
 end;

но не срабатывает, ибо при type=file это св-во readonly((( как победить?


 
MetalFan ©   (2006-01-25 22:55) [1]

да... что, никто даже не выскажется?


 
Плохиш ©   (2006-01-26 01:25) [2]


> MetalFan ©   (25.01.06 22:55) [1]
> да... что, никто даже не выскажется?

Ну что ж, я могу высказаться. Спамер маст дай!
Тебе в первой же ветке с таким вопросом уже сказали, что это делать в браузерах нельзя из соображений безопастности.

Но ты конечно можешь это реализовать, например с помощью idHTTP.
function Post(AURL: string; const ASource: TIdMultiPartFormDataStream): string; overload;


 
MetalFan ©   (2006-01-26 08:30) [3]

небыло темы С ТАКИМ вопросом, от меня по крайней мере! и я не спаммер! спасибо за помосчь... сам разобрался!
тему можно закрыть...



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

Текущий архив: 2006.05.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.045 c
2-1146927028
AlexanderMS
2006-05-06 18:50
2006.05.21
Поиск и замена


2-1146231190
Начинающий5
2006-04-28 17:33
2006.05.21
выключить компьютер


15-1145728332
Petr V. Abramov
2006-04-22 21:52
2006.05.21
"подними правую руку вверх,


15-1145828371
Mihurr
2006-04-24 01:39
2006.05.21
Хард инфа Продолжение)))


15-1146121485
Darvin
2006-04-27 11:04
2006.05.21
Дальность передачи данных по usb