Jest taka możliwość, aby Delphi mógł pobrać informacje ze strony www?
Konkretnie chodzi mi aby np. do edit'a pobrać zawartość DIV'a z konkretnej strony www np. o danym ID czy atrybucie NAME.
0
0
Polecam Synapse do pobrania kodu strony, a do sparsowania wyników Pos, Copy, Delete lub ewentualnie
wyrażeń regularnych, modul do ich obsługi umieściłem na http://www.mediafire.com/?czhw3mmzjyn - a
więcej informacji w dokumentacji i przykładach. Ja po tym jak siedziałem pół nocy i pisałem gotowca, dla
jednego leniwego osobnika tutaj co sam nie potrafił szukać, a po fakcie okazało się że zero dziękuję oraz
że kod się nie podoba, bo woli właśne rozwiązanie, stwierdziłem że dosyć gotowców i niech kobminują po
swojemu i szukają infromacji. Ja podam tylko zdawkowe rozwiązanie, bo na co komu moje gotowce - zaś
w Twoim przypadku nie wiem o jaką stronę internetową chodzi, ale jeżeli nie używa ona javascriptu, aby
wygenerować kod to Synapse sobie spokojnie powinno poradzić z pobraniem. Więcej w doss + examples.
0
@olesio: jestes za dobry dla ludzi ;p
0
no u mnie nie ma "nie, dziekuje", ale dzieki za nakierowanie. Jakby co bede pisal o problemach w temacie to licze na pomoc x)
0
[losowa nazwa]: no właśnie się przekonałem, człowiek chce dobrze, no i już nie ważne, że nie ma podziękowania,
to ktoś jeszcze wybrzydzał i chcial po swojemu dalej mieć napisaną aplikację, to ja się nie będę narzucał przecież
z moim kodem. m1esh: pobierz Synapse i dokumentacje, a wszystko będzie jasne. Jest komponent THttpSend,
funkcja HttpMethod, a to co pobierzesz GETem będzie się znajdować w zmiennej Document (TMemoryStream) i
to powinno wystarczyć. Jak widzisz banalny oraz wygodny w użyciu komponent, o bardzo dużych możliwościach.
0
dzieki wielkie za pomoc, jak tylko zbuduje kod to dam do oceny x)
i zeby nie bylo! olesio - dzieki wielkie za skrupulatną pomoc x))
0
Po co uzywac dodatkowych komponentow skoro delphi posiada w sobie webrowsera z ktorego bez problemu mozna wyciagac kod strony i dalej robic z nim co sie podoba :-)
przegladarka = webrowser :-))
Edit1.Text:=przegladarka.LocationURL;
memo1.Clear;
if Assigned(przegladarka.Document) then
begin
iall := (przegladarka.Document AS IHTMLDocument2).body;
while iall.parentElement <> nil do
begin
iall := iall.parentElement;
end;
Memo1.Text := iall.outerHTML;//pobierz zawartosc przegladarki
na iall. mozliwosci wiecej i po kija komponenty dodatkowe skoro to dziala :-)