OrangeUI TSkinFMXEdit Klavye Sorunu

[serifaliyagci]

Merhabalar, projemde bazı görsel nesneler kullanmam gerektiğinde orangeui component setinden faydalanıyorum. Fakat TSkinFMXEdit bileşeninde keyup eventinde klavyeden dönen değer search ise listviewi gelen veri ile dolduruyorum. Fakat kullanıcılardan yazılan değeri silmek istediklerinde her seferinde listviewin yenilendiği bilgisi geldi. Debug ettiğimde klavyeden backspace tuşuna her basıldığında if TSkinFMXEdit(Sender).ReturnKeyType = TReturnKeyType.Search then in içine girdiğini gördüm. Kod aşağıdadır. Bu konuda bana destek olabilecek var mı acaba?


procedure TFrameCariler.CariBilgiKeyUp(Sender: TObject; var Key: Word;
  var KeyChar: Char; Shift: TShiftState);
begin
  if Sender is TSkinFMXEdit then
  begin

    if TSkinFMXEdit(Sender).ReturnKeyType = TReturnKeyType.Search then
    begin

      { //Carileri Getir ve tabloyu temizle // }
      DataSetOlustur(uriGenelIslem, '',
        ToJSON('PLT_CARILERIGETIR', [FormMain.username { plasiyer } ,
        ' AND CARIISIM LIKE ''%' + TurkceKarakter(CariBilgi.Text) +
        '%''' { kisit } ]), DataModul.MemoryTable);

      CariListele(DataModulum.MemoryTable, FrameCariler.CariListe);
      HideVirtualKeyboard;
      { //Carileri Getir ve tabloyu temizle // }

    end;
  end;
end;

---

(04-08-2023, Saat: 09:50)serifaliyagci Adlı Kullanıcıdan Alıntı: Merhabalar, projemde bazı görsel nesneler kullanmam gerektiğinde orangeui component setinden faydalanıyorum. Fakat TSkinFMXEdit bileşeninde keyup eventinde klavyeden dönen değer search ise listviewi gelen veri ile dolduruyorum. Fakat kullanıcılardan yazılan değeri silmek istediklerinde her seferinde listviewin yenilendiği bilgisi geldi. Debug ettiğimde klavyeden backspace tuşuna her basıldığında if TSkinFMXEdit(Sender).ReturnKeyType = TReturnKeyType.Search then in içine girdiğini gördüm. Kod aşağıdadır. Bu konuda bana destek olabilecek var mı acaba?


procedure TFrameCariler.CariBilgiKeyUp(Sender: TObject; var Key: Word;
  var KeyChar: Char; Shift: TShiftState);
begin
  if Sender is TSkinFMXEdit then
  begin

    if TSkinFMXEdit(Sender).ReturnKeyType = TReturnKeyType.Search then
    begin

      { //Carileri Getir ve tabloyu temizle // }
      DataSetOlustur(uriGenelIslem, '',
        ToJSON('PLT_CARILERIGETIR', [FormMain.username { plasiyer } ,
        ' AND CARIISIM LIKE ''%' + TurkceKarakter(CariBilgi.Text) +
        '%''' { kisit } ]), DataModul.MemoryTable);

      CariListele(DataModulum.MemoryTable, FrameCariler.CariListe);
      HideVirtualKeyboard;
      { //Carileri Getir ve tabloyu temizle // }

    end;
  end;
end;

Arkadaşlar merhaba ben sorunu çözdüm. KeyUp event te if Key=13 then olarak değiştirip sadece search tuşu ile çalışmasını sağladım.

[RAD Coder]

ReturnKeyType özelliği, edit içerisinde iken Default tuşa (Enter, klavye gizleme, arama vb.) basılması durumunda hangi davranışı göstereceğini belirtir. 
ReturnKeyType, ataması sabit olduğu için, ne zaman kontrol etseniz de hep son atadığınız Search durumunda olduğundan, kontrol içindeki kodlarınız işletilir.

[serifaliyagci]

(04-08-2023, Saat: 10:18)RAD Coder Adlı Kullanıcıdan Alıntı: ReturnKeyType özelliği, edit içerisinde iken Default tuşa (Enter, klavye gizleme, arama vb.) basılması durumunda hangi davranışı göstereceğini belirtir. 
ReturnKeyType, ataması sabit olduğu için, ne zaman kontrol etseniz de hep son atadığınız Search durumunda olduğundan, kontrol içindeki kodlarınız işletilir.

Merhaba, benim anlamadığım projede TEdit kullandığım frameler de var aynı kodları o nesnelerde de işletiyorum fakat herhangi bir sorun oluşmuyor. Ama yine de teşekkür ederim. Bu bilgi çok işime yarayacak...