programadorcimples Novato
Registrado: Quarta-Feira, 17 de Mai de 2017 Mensagens: 47
|
Enviada: Sex Nov 11, 2022 11:10 am Assunto: API COM RELOGIO DE PONTO CONTROL ID |
|
|
Bom dia
estou tentando fazer a integração com relogio de ponto do relogio IDCLASS da control ID
Alguem ja fez algo, que possa me orientar?
ta dando um erro de componente e nao sei qual é, segue abaixo o codigo do que eu peguei do exemplo
/////
var
lJSO : ISuperObject;//(erro aqui)
lRequest: TStringStream;
lResponse: String;
begin
lJSO := SO-(erro aqui)('{"login": "admin", "password": "admin"}');
lRequest := TStringStream.Create(lJSO.AsString, TEncoding.UTF8);
try
IdHTTP.Request.ContentType := 'application/json';
IdHTTP.Request.Charset := 'utf-8';
try
lResponse := IdHTTP.Post('https://192.168.0.129/login.fcgi', lRequest);
ShowMessage(lResponse);
except
on E: Exception do
ShowMessage('Error on request:'#13#10 + E.Message);
end;
finally
lRequest.Free;
end;
lJSO := nil;
end; |
|