Четверг, 21 Июня 2018 г. 03:39
+ в цитатник
Уважаемые жители Королевства!
Помогите, пожалуйста, разобраться.
При помощи Delphi 10 Seattle + HTTP-шлюза пытаюсь отправить СМС.
[Code]
constructor TSMSAPI.Create;
begin
inherited;
FSSLIOHandler := TIdSSLIOHandlerSocketOpenSSL.Create(nil);
FHTTP := TIdHTTP.Create(nil);
FHTTP.IOHandler := FSSLIOHandler;
FHTTP.HandleRedirects := True;
end;
function TSMSAPI.SendSMS(Phone, TextSMS : string): string;
var RequestBody: TStream;
Request: string;
begin
Request:= ...
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83567
-
Запись понравилась
-
0
Процитировали
-
0
Сохранили
-