[artarx]

Вопрос как Делфи связать с браузером и сделать что бы на форму выводились элементы веб страницы??
Допустим Панель ввода,что бы вводить не на сайте а с проги!

[Rat]

На этом сайте в разделе исходники, есть такой пример.

[artarx]

Чё то не найду((((

[lmikle]

Ищи. Например, здесь:
http://www.delphisources.ru/pages/fa...elphi_app.html

[artarx]

Не то это!
Вот на сайте есть Поле ввода (любое) мне надо ,что бы через программу написанную на delphi я ввёл значение в это поле и нажал кнопку! не заходя на сайт через браузер

[artarx]

Ну помогитеееее

[artarx]

Пипец трудно подказать???????

[lmikle]

Сообщение от artarx

Не то это!
Вот на сайте есть Поле ввода (любое) мне надо ,что бы через программу написанную на delphi я ввёл значение в это поле и нажал кнопку! не заходя на сайт через браузер

Тогда смотри в сторону TIdHTTP. Тебе надо проанализировать страницу, а потом сгенерировать ответ и послать его по адресу, указанному у атрибута action тега form. (пример лень искать - там все банально, думаю, разберешься сам).

[artarx]

Я с интернетом в delphi не работал ни разу.....

[lmikle]

И чё? Все когда-то работали с чем-нить первый раз. Сидели и разбирались.

Вот мой тестовый код, который через форму одного из public image серверов заливает картинки. Он не доделан, т.к. все руки не доходят, но суть отправки формы поймешь.

Код:

procedure TForm1.btUploadClick(Sender: TObject);
var
  FormData : TIdMultiPartFormDataStream;
begin
  Try
    FormData := TIdMultiPartFormDataStream.Create;
    FormData.AddFile('userfile[]','E:\Photo\2007 USA\IMG_0794.jpg',GetMIMETypeFromFile('E:\Photo\2007 USA\IMG_0794.jpg'));
    FormData.AddFile('userfile[]','E:\Photo\2007 USA\IMG_0795.jpg',GetMIMETypeFromFile('E:\Photo\2007 USA\IMG_0795.jpg'));
    FormData.AddFormField('imgcontent','safe');

    Try
      HTTP.Request.ContentType := FormData.RequestContentType;
      edPage.Lines.Text := HTTP.Post('http://www.imagevenue.com/upload.php', FormData);
    Finally
      FormData.Free;
    End;
  Except
    On E : Exception Do
      ShowMessage(E.Message);
  End;
end;