Delphi POST

Programovacie jazyky, rady, poradňa...
Mmartin
Guru
Guru
Používateľov profilový obrázok
Príspevky: 2786
Registrovaný: 07 feb 2009, 12:49
Bydlisko: Bratislava

Delphi POST

Príspevok od používateľa Mmartin »

Zdravim, mam jednoduchu otazku, ale vsetky riesenia, co som nasiel su priliz zlozite.
Chcem pomocou delphi poslat POST dotaz do mojho PHP skriptu. Neda sa to vyriesit nejakym jednoduchym riesenim? Ak ano, ako? Vdaka.
Nadeo
Guru wannabe
Guru wannabe
Používateľov profilový obrázok
Príspevky: 2202
Registrovaný: 04 nov 2006, 19:38
Bydlisko: BA/LV
Kontaktovať používateľa:

Re: Delphi POST

Príspevok od používateľa Nadeo »

Kód: Vybrať všetko

    Socket.Request.ContentType := 'application/x-www-form-urlencoded';
    Socket.Request.UserAgent := "My agent name";
    Pars := TStringList.Create;
    Pars.Add('txtTarget=abc');
    Pars.Add('&txtArea=area');
    Pars.Add('&txtTitle=Robot');
    Pars.Add('&txtPageNr=1');
    Pars.Add('&txtItemsPage=10');
    Res  := TStringStream.Create('');
    Socket.Post(URL, Pars, Res);
Socket = idhttp komponent kniznice indy...
Mmartin
Guru
Guru
Používateľov profilový obrázok
Príspevky: 2786
Registrovaný: 07 feb 2009, 12:49
Bydlisko: Bratislava

Re: Delphi POST

Príspevok od používateľa Mmartin »

Boze, to sa jak instaluje ta kniznica? :D Pochuj suborov, a ziadny readme :(
audiotrack
VIP
VIP
Používateľov profilový obrázok
Príspevky: 25958
Registrovaný: 09 sep 2005, 18:39
Kontaktovať používateľa:

Re: Delphi POST

Príspevok od používateľa audiotrack »

indy bolo v delphi 7 uz defaultne pridane ak ma pamat neklame
Mmartin
Guru
Guru
Používateľov profilový obrázok
Príspevky: 2786
Registrovaný: 07 feb 2009, 12:49
Bydlisko: Bratislava

Re: Delphi POST

Príspevok od používateľa Mmartin »

hmm, ked dam "indy" do uses, tak proste... vyhodi chybovu hlasku, ze nenaslo indy.dcu
ⓢⓐⓟⓛⓔⓡ
Star
Star
Používateľov profilový obrázok
Príspevky: 621
Registrovaný: 06 jún 2008, 15:07
Bydlisko: nedaleko od hojko.com

Re: Delphi POST

Príspevok od používateľa ⓢⓐⓟⓛⓔⓡ »

v delphi 7 enterprise edition v ostatych ediciach nebol, ja by som si stiahol enterprise a potom nemusis do uses nic pridavat ides automaticky ak sa ti to nechce stahovat tak sa pozri po synapse
Mmartin
Guru
Guru
Používateľov profilový obrázok
Príspevky: 2786
Registrovaný: 07 feb 2009, 12:49
Bydlisko: Bratislava

Re: Delphi POST

Príspevok od používateľa Mmartin »

No, tak som odinstaloval Personal a nainstaloval som si Enterprise, a ked som si to skupil okopirovat priamo z Nadeovej ruky, :

Kód: Vybrať všetko

procedure TForm1.Button1Click(Sender: TObject);
var
  Socket:idhttp;
begin
    Socket.Request.ContentType := 'application/x-www-form-urlencoded';
    Socket.Request.UserAgent := "My agent name";
    Pars := TStringList.Create;
    Pars.Add('txtTarget=abc');
    Pars.Add('&txtArea=area');
    Pars.Add('&txtTitle=Robot');
    Pars.Add('&txtPageNr=1');
    Pars.Add('&txtItemsPage=10');
    Res  := TStringStream.Create('');
    Socket.Post(URL, Pars, Res);
end;
Tak mi nevezme typ idhttp vo var...
Netreba includnut nieco? Lebo ked dam indy do uses, tak
[Fatal Error] File not found: 'c:\program files (x86)\borland\delphi7\Rave5\Lib\indy.pas'
:|
ⓢⓐⓟⓛⓔⓡ
Star
Star
Používateľov profilový obrázok
Príspevky: 621
Registrovaný: 06 jún 2008, 15:07
Bydlisko: nedaleko od hojko.com

Re: Delphi POST

Príspevok od používateľa ⓢⓐⓟⓛⓔⓡ »

hm a mas tam nieco taketo ?
Prílohy
bez_názvu.JPG
Mmartin
Guru
Guru
Používateľov profilový obrázok
Príspevky: 2786
Registrovaný: 07 feb 2009, 12:49
Bydlisko: Bratislava

Re: Delphi POST

Príspevok od používateľa Mmartin »

mam, mam
ⓢⓐⓟⓛⓔⓡ
Star
Star
Používateľov profilový obrázok
Príspevky: 621
Registrovaný: 06 jún 2008, 15:07
Bydlisko: nedaleko od hojko.com

Re: Delphi POST

Príspevok od používateľa ⓢⓐⓟⓛⓔⓡ »

a skusal si tam pridat idHttp, normalne ako button ?
Mmartin
Guru
Guru
Používateľov profilový obrázok
Príspevky: 2786
Registrovaný: 07 feb 2009, 12:49
Bydlisko: Bratislava

Re: Delphi POST

Príspevok od používateľa Mmartin »

Ano, hned ako si mi poslal img tej listy. Dakujem Ti mockrat, k+ :)
Napísať odpoveď