Code (delphi):
var
lHTTP: TIdHTTP;
lParamList: TStringList;
begin
lParamList := TStringList.Create;
lParamList.Add('id=' + Edit1.Text);
lHTTP := TIdHTTP.Create(nil);
try
Memo1.Lines.Text := lHTTP.Post('http://www.olis.hr/bobans/upit.php', lParamList);
finally
lHTTP.Free;
lParamList.Free;
end;
lHTTP: TIdHTTP;
lParamList: TStringList;
begin
lParamList := TStringList.Create;
lParamList.Add('id=' + Edit1.Text);
lHTTP := TIdHTTP.Create(nil);
try
Memo1.Lines.Text := lHTTP.Post('http://www.olis.hr/bobans/upit.php', lParamList);
finally
lHTTP.Free;
lParamList.Free;
end;
F