Clomosy | Forum Ana Sayfa
Forum Anasayfa Forum Anasayfa > Genel Programlama > Clomosy ile değişken kullanımı
  Aktif Konular Aktif Konular RSS - ClRest sıfırlama
  SSS SSS  Forumu Ara   Etkinlikler   Kayıt Ol Kayıt Ol  Giriş Giriş

Clomosy Resmi Forum Sitesidir. Amacımız kullanıcılarımıza, iş ortaklarımıza, danışmanlara, yazılımcılara programlarımız hakkında destek ve bilgi vermektir.

ClRest sıfırlama
 Yanıt Yaz Yanıt Yaz
Yazar
Mesaj
  Konu Arama Konu Arama  Topic Seçenekleri Topic Seçenekleri
M-Guney Açılır Kutu İzle
Deneyimli Üye
Deneyimli Üye


Kayıt Tarihi: 16 Eylül 2025
Konum: Konya, Meram, K
Durum: Aktif Değil
Puanlar: 65 		Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı M-Guney Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Konu: ClRest sıfırlama
    Gönderim Zamanı: 12 Saat 25 Dakika Önce Saat 14:04
Login işlemini yaptıktan sonra ana menüye yönlendiriyorum ardından ana menüdeki herhangi bir butonda clrest yapacağımda önceki kapanmış olan sayfanın clresti hala duruyor silmeye çalıştım fakat silemedim.

void Login
var
  FToken: String;
{
  try
    TCRest.BaseURL = 'http://BENIM_UZANTIM/login';
    TCRest.Accept = 'application/json';
    TCRest.Method = rmPOST; // Post
    
    if((MailEdit.Text == '')||(MailEdit.Text == '')&&(PasswordEdit.Text == '')){
      ShowMessage('Lütfen gerekli kısımları doldurun.')
    }else{
      TCRest.AddBody(
      '{"usernameOrEmail": "'+MailEdit.Text+'", "password_hash": "' + GetHashed(PasswordEdit.Text) + '"}',
      'application/json'
      );
      TCRest.Execute;
      FToken = TCRest.Response;
      TCRest.ClearParams;
      TCRest.ClearBody;
      //ShowMessage(FToken);
      if((TCRest.StatusCode == 200)||(TCRest.StatusCode == 201)){
          FToken = Clomosy.CLParseJSON(FToken, 'token')
          // ShowMessage(FToken); Post This as Global Variable to Reach Easy;
          // DOOOOOO
          Clomosy.GlobalVariableString = FToken;
          Clomosy.RunUnit('uHomePage');
          MainForm.Close;
      }else if((TCRest.StatusCode == 202){
          ShowMessage('E-postanızı kontrol ediniz. E-posta onayı bekleniyor..');
      }else if((TCRest.StatusCode == 401){
          ShowMessage('Girilen bilgiler geçersiz. Lütfen tekrar deneyiniz.');
      }
      else{
        ShowMessage ('Tekrar Deneyiniz.'+Clomosy.CLParseJSON(FToken, 'message') )
      }
    } 
  except
  ShowMessage('Exception Class: '+LastExceptionClassName+' Exception Message: '+LastExceptionMessage);
  }
}


void GetOrdersV{
  //TCRest.ClearParams;
  //TCRest.ClearBody;
  TCRest.BaseURL = 'http://BENIM_UZANTIM/orders';
  TCRest.Accept = 'application/json';
  TCRest.Method = rmGET;
  
  TCRest.AddHeader('Authorization','Bearer '+Clomosy.GlobalVariableString);
  TCRest.ExecuteAsync;
  if(TCRest.Response == ''){
    ShowMessage('Sipariş listesi boş herhangi bir sipariş yok.')
  }else{
    
    ShowMessage('orders output: '+ TCRest.Response);
    OrdersPnlV;

  }
      
}
https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">
Yukarı Dön
M-Guney Açılır Kutu İzle
Deneyimli Üye
Deneyimli Üye


Kayıt Tarihi: 16 Eylül 2025
Konum: Konya, Meram, K
Durum: Aktif Değil
Puanlar: 65 		Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı M-Guney Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 11 Saat 58 Dakika Önce Saat 14:31
Sorunum çözüldü
Asenkron yapıp copmpleted ile çağrınca o problem karşıma bir daha çıkmadı. Bu kodda herhangi bir problem olmadan çalışıyor.

void GetOrdersV
{
  //TCRest.ClearParams;
  //TCRest.ClearBody;
  TCRest.BaseURL = 'http://URL/orders';
  TCRest.Accept = 'application/json';
  TCRest.Method = rmGET;
  
  TCRest.AddHeader('Authorization','Bearer '+Clomosy.GlobalVariableString);
  TCRest.OnCompleted = 'GetOrdersCompletedV';
  TCRest.ExecuteAsync;
}
void GetOrdersCompletedV
var
  jsonResponse: String;
{
  jsonResponse = TCRest.Response
  if(jsonResponse == ''){
    ShowMessage('Sipariş listesi boş herhangi bir sipariş yok.')
  }else{
    
    ShowMessage('orders output: '+ jsonResponse);
    OrdersPnlV;

  }
      
}
https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">
Yukarı Dön
M-Guney Açılır Kutu İzle
Deneyimli Üye
Deneyimli Üye


Kayıt Tarihi: 16 Eylül 2025
Konum: Konya, Meram, K
Durum: Aktif Değil
Puanlar: 65 		Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı M-Guney Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 11 Saat 52 Dakika Önce Saat 14:37
fakat anlamadığım bir şey var neden her zaman ''boş döndürüyor aslında dolu [
    {
        "order_id": 1,
        "table_name": "K1",
        "status": "paid",
        "order_time": "2025-10-23T17:37:36.870Z"
    },
    {
        "order_id": 2,
        "table_name": "K1",
        "status": "paid",
        "order_time": "2025-10-23T17:37:55.233Z"
    },
Yukarı Dön
Emr.Erkmn Açılır Kutu İzle
Moderatör
Moderatör


Kayıt Tarihi: 28 Şubat 2025
Durum: Aktif Değil
Puanlar: 377 		Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı Emr.Erkmn Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 11 Saat 50 Dakika Önce Saat 14:39
Öncelikle her form için ayrı tclrest kullansak 
login forma için çzel tclrest 

    LoginRest.ClearParams;
    LoginRest.ClearBody; 

kullanarak önceki ayarları temizleyelim. 
   LoginRest.Free; 
ile serbest bıraksak ve birime yönlendirsek, 

HomePage içinde 
bu işlemleri tekrarlayalım 



https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">
Yukarı Dön
Emr.Erkmn Açılır Kutu İzle
Moderatör
Moderatör


Kayıt Tarihi: 28 Şubat 2025
Durum: Aktif Değil
Puanlar: 377 		Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (1) Teşekkürler(1)   Alıntı Emr.Erkmn Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 11 Saat 49 Dakika Önce Saat 14:40
Denedikten sonra hata devam ediyorsa dönüş yapar mısınhttps://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">
Yukarı Dön
M-Guney Açılır Kutu İzle
Deneyimli Üye
Deneyimli Üye


Kayıt Tarihi: 16 Eylül 2025
Konum: Konya, Meram, K
Durum: Aktif Değil
Puanlar: 65 		Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı M-Guney Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 11 Saat 40 Dakika Önce Saat 14:49
peki ramde herhangi bir yüke sebep olur mu bu işlemhttps://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">
Yukarı Dön
M-Guney Açılır Kutu İzle
Deneyimli Üye
Deneyimli Üye


Kayıt Tarihi: 16 Eylül 2025
Konum: Konya, Meram, K
Durum: Aktif Değil
Puanlar: 65 		Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı M-Guney Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 11 Saat 36 Dakika Önce Saat 14:53
 LoginRest.Free; login kısmında ve diğer unitlerde aynı rest isnimini kullanmama rağmen sadece logine ekstra olarak free kodunu ekledikten sonra problemim tamamıyla çözüldü teşekkürler.https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">
Yukarı Dön
Emr.Erkmn Açılır Kutu İzle
Moderatör
Moderatör


Kayıt Tarihi: 28 Şubat 2025
Durum: Aktif Değil
Puanlar: 377 		Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı Emr.Erkmn Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 10 Saat 46 Dakika Önce Saat 15:43
Merhaba Güney,

Yaptığım incelemede, her form değişiminde veya API çağrısında free + create döngüsünün RAM yükünü artırdığını gözlemledim. Bunun yerine, nesneyi bir kez create edip her kullanımda clear uygulamak daha verimli görünüyor. Aşağıdaki yaklaşımı deneyelim:

Tek seferlik oluşturma: GlobalRest yalnızca bir kez create edilsin.

Header temizliği: Gerekli durumlarda clRest.RemoveHeader('Authorization'); kullan. (  GlobalRest.BaseURL = ''; kullanada bilirsin)

Body temizliği: Özellikle POST isteklerinden sonra
GlobalRest.ClearBody;

Parametre temizliği: Body’den sonra
GlobalRest.ClearParams;

BaseURL / yapılandırma: Gerekirse GlobalRest.BaseURLi geçici olarak boş bırakmak yerine, mümkün olduğunca sabit tutup sadece ilgili header/parametreleri temizleyelim.

Bu yöntemle önceki isteklerden kalan body/parametrelerin RAM’de tutulmasının önüne geçer, her çağrı öncesi temiz bir durumla devam etmiş oluruz.

Eline sağlık, dönüşünü beklerim.
https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">
Yukarı Dön
 Yanıt Yaz Yanıt Yaz

Forum Atla Forum İzinleri Açılır Kutu İzle

Forum Software by Web Wiz Forums® version 12.07
Copyright ©2001-2024 Web Wiz Ltd.

Bu Sayfa 0,031 Saniyede Yüklendi.