Edson T. Marques

Results 4 comments of Edson T. Marques

Boa tarde! A ideia seria viabilizar a seguinte situação: ``` program Teste; {$IFDEF FPC} {$MODE DELPHI}{$H+} {$MODESWITCH ANONYMOUSFUNCTIONS+} {$ENDIF} interface implementation uses SysUtils; begin ... THorse.Listen(9000, procedure begin WriteLn(Format('Server active...

Vinícius, Infelizmente estive envolvido com vários problemas fora da área de programação e precisei deixar o desenvolvimento da API no ponto que estava. Não tive como voltar a verificar se...

Então... O meu dpr está assim: ``` program project1; {$MODE DELPHI}{$H+} uses {$IFDEF UNIX} cthreads, {$ENDIF} Horse; procedure GetPing(Req: THorseRequest; Res: THorseResponse); begin Res.Send('Pong'); end; begin THorse.Get('/ping', GetPing); THorse.Listen(9000); end....