جرب مع المواقع التي توفر API
مثل:
https://www.file.io
https://app.smartfile.com/api
مثال بالفري باسكال (Lazarus) واستعمال الموقع file.io
غير File.txt
النتيجة (الرد) في حالة النجاح
مثل:
https://www.file.io
https://app.smartfile.com/api
مثال بالفري باسكال (Lazarus) واستعمال الموقع file.io
غير File.txt
PHP كود :
program project1;
uses
Classes, fphttpclient;
var
Respo: TStringStream;
S: string;
begin
with TFPHttpClient.Create(nil) do
try
Respo := TStringStream.Create('');
SimpleFileFormPost('https://file.io', 'file', 'File.txt', Respo);
s := Respo.DataString;
writeln(s);
Respo.Destroy;
finally
Free;
end;
end.
النتيجة (الرد) في حالة النجاح
كود :
{"success":true,"key":"LJ07q1","link":"https://file.io/LJ07q1","expiry":"14 days"}

![[-]](https://delphi4arab.net/forum/D4A2020/collapse.png)