Главная страница
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.03 c
2-1146693377
Std
2006-05-04 01:56
2006.05.21
Распаковка Zlib


2-1145970590
nyron
2006-04-25 17:09
2006.05.21
сумма прописью


2-1146938687
leonidus
2006-05-06 22:04
2006.05.21
Отображение большого TStringlist`а в TListBox


2-1146571467
kay
2006-05-02 16:04
2006.05.21
Как сделать скроллинг фрейма? Не получается.


1-1144325619
DelphiLexx
2006-04-06 16:13
2006.05.21
Половину строки Hint a выделить жирным