Rest Server Windows Sunucuda Yayınlama

[ugorkem]

(14-08-2024, Saat: 18:19)delphi.developer Adlı Kullanıcıdan Alıntı: Size sunulan WEB API'lar için Default Handler Action da aşağıdaki gibi işlem gerçekleştirebilirsiniz. Örneklemeyi http://localhost/bakkal/listeGetir üzerinden baz aldım.

procedure TWebModule1.WebModule1DefaultHandlerAction(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
 if Request.PathInfo = '/bakkal/listeGetir' then
   Response.Content := 'listeGetir'
 else if Request.PathInfo = '/bakkal/kaydet' then
   Response.Content := 'kaydet'
 else if Request.PathInfo = '/bakkal/sil' then
   Response.Content := 'sil';
end;

Çok teşekkürler default handler içine çekince tüm sorunlar kayboldu.