Tfphttpclient例子

Tfphttpclient例子

uses fphttpclient;

?

1 2 3 4 5

http := Tfphttpclient.Create(nil);   body := '{"sql":"select * from tunit"}';   http.RequestBody := TRawByteStringStream.Create(body);   memo1.Text:=http.Post('http://localhost:1234/table/select');   http.Free;