Delphi UniGUI Web Servis Şeklinde Kullanmak

Delphi UniGUI Web Servis Şeklinde Kullanmak

Merhabalar,

Bugün yazımızda UniGUI geliştirirken aynı zamanda uygulamamızı nasıl web servis (tam anlamıyla web servis değil sadece istek gönderim/cevap alma sistemi diyelim :D ) şeklinde kullanabiliriz onu öğrenceğiz. ServerModule tarafında işlemlerimizi halledeceğiz yani son gelen istek her zaman kabul görür. Session değil buna çok dikkat etmemiz gerekiyor. Gelen istekleri ServerModule'nin OnHTTPCommand eventi içerisinde deniyoruz.

procedure TUniServerModule.UniGUIServerModuleHTTPCommand(
  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo;
  var Handled: Boolean);
begin
   if ARequestInfo.URI = '/test' then
   begin
    AResponseInfo.ContentText := 'sen buraya istek için geldin';
    AResponseInfo.ResponseNo := 200;
    AResponseInfo.ContentType := 'JSON';
    AResponseInfo.WriteContent;
    Handled := True;
   end;
end;

ARequestInfo.URI: sunucuya gelecek olan URL yapısına göre response isteğimizi gerçekleştireceğiz.
AResponseInfo.ContentText := 'sen buraya istek için geldin';: gelen URI'ye göre hangi sonucun dönmesini istiyorsak bu şekilde ContentText property'ine set ediyoruz.
AResponseInfo.ResponseNo := 200;: 200 ile isteğin başarılı bir şekilde geldiğini ve geri döndüğünü söylüyoruz.
AResponseInfo.ContentType := 'JSON'; JSON formatında geri dönüş atıyoruz. Bunu XML gibi veri tiplerine isteğe göre işaretleyebilirsiniz.

Delphi FMX - NonBlocking InputBox
📢 Herkese selamlar, Delphi ile android işletim sistemi için bir uygulama tasarladığınız da bazen “InputBox” fonksiyonuna ihtiyaç duyabilirsiniz. Standart InputBox fonksiyonu Android’e bloklanabiliyor. Bunun için OS Synchronize: FMX.Platform kütüphanesinde bulunan IFMXDialogServiceAsync.InputQueryA…

Sonuç:

İyi çalışmalar


Share Tweet Send
0 Comments
Loading...