Главная страница
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.038 c
2-1146410086
Officeman
2006-04-30 19:14
2006.05.21
Сортировать числа от "min" к "max" (или наоборот)


8-1135116718
Serg_SV
2005-12-21 01:11
2006.05.21
Альфа-смешение


15-1146145979
X9
2006-04-27 17:52
2006.05.21
ICQ на смартфоне


15-1145770978
GrayFace
2006-04-23 09:42
2006.05.21
Assebler: call near ptr - актуально ли слово "near"?


2-1146314794
DiMonstr
2006-04-29 16:46
2006.05.21
Помогите с потоками TStream!