Delphi Forum

procedure TForm1.Button1Click(Sender: TObject);
var
Response, JsonString: string;
lRequest: TStringStream;
Http: TIdHTTP;
begin
lRequest := TStringStream.Create(JsonString, TEncoding.UTF8);
try
Screen.Cursor := crHourGlass;
Http := TIdHTTP.Create(nil);
try
Http.Request.ContentType ...

Efendim, hiç bir şey yapamadım Delphiyle database üzerinde çalıştım ama Rest API ları bilmiyorum

import http.client

conn = http.client.HTTPSConnection("api.collectapi.com")

headers = {
'content-type': "application/json",
'authorization': "apikey 38M98cl6jwSD8BS7FF4DpO:0mnl1Z9F7fM60vnerUq0KF"
}

conn.request("GET", "/ip/ipToLocation?data.ip=95.8.131.139", headers=headers)

res = conn ...