Как можно связать свое приложение с web? Допустим что бы приложение передавало какое – нибудь значение, например переменной в php скрипте. Спасибо.

sniron
ну например через POST запрос... а что конкретнее?

Код

otvet:=TIdHTTP.Get('http://www.site.ru/script.php?chtoto=znachenie');

А какой тип переменной otvet? И какие значение она может принимать?

Snowy, Get насколько я знаю, это процедура, а не функция.

Alex
все верно, есть как ф-ия, возврашает string, а есть и процедура, у которой вторым параметром должен быть наследник TStream'а куда возврашается результат запроса

Александра точно.

Цитата(sniron @ 25.2.2005, 23:51)

А какой тип переменной otvet? И какие значение она может принимать?

Читай документацию по TIdHTTP.
В данном случае otvet - это string, в который будет засунута страница, которую вернет php скрипт.
Пример довольно абстрактный, поскольку сам TIdHTTP это класс, экземпляр которого тебе предстоит создать (или кинуть на форму).

А где можно скачать нормальный хелп с примерами по TIdHTTP, кроме как из встроенной справки? Моя задача - внедрить в программу модуль регистрации в нете, что бы определенные данные передавались ПХП скрипту, ну а тот уже в БД заносил.

Код

var  www: TIdHTTP; begin  www:=TIdHTTP.Create(nil);  try    www.Get('http://www.site.ru/script.php?chtoto=znachenie');  except end;  www.Free; end;

Добавлено @ 17:55
Но, если у пользователя прокси, то такой номер не пройдет.
Тут лучше сказать браузеру, чтобы он открыл твою страничку и передал данные.

Код

Const  URL : String = 'http://www.site.ru/script.php?chtoto=znachenie'; begin  ShellExecute(0,'open',pChar(URL),NIL,NIL,SW_SHOWNORMAL);

Правда в этом случае придется пользователю страничку показывать.

Snowy, Да конечно 2 вариант примитивный но надежный. Ладно, огромное спасибо!

sniron

Snowy фигни не посоветует )) Просто можно немного улучшить идею!

можно взять компонент TWebBrowser, кинуть на форму, спрятать его, далее в реестре открыть
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings и считать параметр ProxyServer, где настроен прокси в IE. Далее заставим наш WebBrowser работать через этот прокси и делаем запрос по нужному адресу:

Код

uses urlmon, wininet; var PIInfo: PInternetProxyInfo; begin  new(PIInfo);  PIInfo^.dwAccessType := INTERNET_OPEN_TYPE_PROXY;  PIInfo^.lpszProxy := PAnsiChar('прокси:порт');  UrlMkSetSessionOption(INTERNET_OPTION_PROXY, piinfo, SizeOf(Internet_Proxy_Info), 0);    WebBrowser1.Navigate('http://www.site.ru/script.php?chtoto=znachenie');  dispose(PIInfo); end;

есть конечно другие недостатки, но все же...

Это сообщение отредактировал(а) Александра - 28.2.2005, 12:19

А зачем TWebBrowser? Это тот же IE. С тем же успехом можно взять эти параметры и отдать их IIdSMTP. В большинстве случаев это даже сработает.
Но!
Например я сижу за прокси, о котором IE даже не подозревает. А эти строчки набиваю в Opere, которая браузер по умолчанию.
Поэтому я и предложил "второй вариант". Ибо он гораздо надежней.
Но мой случай редкий.
В 80% достаточно просто запроса через IdHTTP. В 95% - если дополнительно взять инфу о прокси из реестра и дать IdHTTP. 99.9%, если использовать второй вариант.
Вопрос в том, хотим ли мы, чтобы пользователь знал о том, что мы передаем инфу в инет или нет. Ибо все равно еще есть прокси, пароли... Поэтому проще делать это в открытую.

Snowy
под недостатками я и имела ввиду что-нить типа настроек прокси в Опере ))

а вот про натравление idHTTP на прокси не знала Опыт работы с Indy очень мал. )) Но если делать просто по 2 варианту, то нельзя послать к примеру POST запросы и, самое похое, GET запросы сохряняются в истории и пользователь на них потом бывает натыкается (( Пройденный этап.

У IdHTTP есть свойство ProxyParams. Вот туда можно запихать сервер и порт, которые живут в реестре... Но для прокси обычно требуются еще имя и пароль, которые нам никто не докладывал... Так что знание прокси обычно не сильно помогает. Разве что спросить имя и пароль у пользователя Я бы такой программе не сказал бы. Мало ли зачем ей... ;)