pobieranie statusu z internetu

0

Cześć :)
Mam pytanie, chciałbym do mojej aplikacji dopisać możliwość aktualizacji statusu w internecie. Miałoby to wyglądać mniej więcej tak, że z aplikacji wywołuję np adres http://www.zimbabwe.com.pl/update.php?id=$id&status=$status gdzie $id i $status będą zmiennymi z Delphi.

Skrypt, po udanej aktualizacji zwraca puste 'OK', jak w delphi sprawdzić co zwróciła strona, i jeżeli zwróciła coś innego niż 'OK' wyświetlić błąd....

Dzieki

0

Polecam Synapse z http://www.ararat.cz/synapse/doku.php/download. W paczkach powinna być dokumentacja oraz przykłady.
Potrzebujesz komponentu THttpSend. Do sekcji uses dodajesz modul httpsend. A później wystarczy dynamicznie stworzyć ów
komponent THttpSend i wywolać funkcję HTTPMethod('GET', Adres), o ile ma pobrać dane ze strony lub 'POST' jeżeli masz do
strony coś wysłać. W przypadku GET dostaniesz zwrócony kod html strony w zmiennej Document typu TMemoryStream, a jeśli
wysyłasz dane POST'em to będziesz musiał najpierw ustawić MineType i w Document dane do wysłania. Zwróconą stronę także
otrzymasz w Document. Jeżeli chcesz do Document zapisać dane typu string aby później wysłać je POST to zrób to na przykład
w taki sposób Document.Write(Pointer(Tekst)^, Length(Tekst)); A żeby skompilować projekt w katalogu, potrzebujesz moduły:

blcksock.pas
httpsend.pas
sswin32.pas
synacode.pas
synafpc.pas
synaip.pas
synautil.pas
synsock.pas
0

Ok dzięki stestuję na synapse....

Jeszcze taki offtop, jeżeli mam dwie formy, w uses Formy1 mam Unit2

To jak mogę z Formy2 wywołać procedurę Form1.reloadConfig() ?

Chodzi o to że forma2 to ustawienia zapisywane do INI poprzez TiniFile, i chciałbym aby po dokonaniu zmian Forma1 zaczytała sobie nowe ustawienia z pliku - bo w chwili obecnej ciągle wymagany jest restart...

0

God damn, czy Ty progamujesz w Delphi od tygodnia? Przeczytałeś jakikolwiek kurs? O książce nawet nie wspominam. Nie dość, że nazywasz formy i unity tak, jak nazywasz(tzn. nienazywasz ich wcale), to jeszcze pytasz o takie podstawy, które są w każdym chyba kursie.

Podpowiedź: uses
Podpowiedź 2: uważaj na circular reference(co to takiego, to doczytaj w necie).

0

gdybynie to zemam w pizdu czasu to bym nic nie napisal no le ok..
Var
Ss: string;
Begin
IdHTTP.host='http://stronawww.domena';
ss:= idhttp.get(pchar('http://stronawww.domea/plik.php?id='+zmienna1+'&status='+blabla));
if ss = 'ok' then begin
//i tu co tam chcesz
end else begin
Shomesage('jezeli zmienna ss nie wynosi "ok" to pojawia sie ta info.' );
end;
I na forme kladziesz IdHTTP z zakladki Indy Client
I poleczm przeczytać kompendiym programisty na tej www a szczegulnie
aplikacje sieciowe

1 użytkowników online, w tym zalogowanych: 0, gości: 1