Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Edit Sayı Çevirme
#11
(10-09-2019, Saat: 15:07)faktoral Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.Edit5.Text := FloatToStr(Value(Edit5.Text))

Burada artık "Value(Edit5.Text)"  Float değil onun için hata veriyor.
function SadeceRakamlar(s: string): string;
var
  i: integer;
  rsp: string;
begin
  Result := s;
  if Length(s) < 1 then Exit;
  rsp := '';
  for i := 1 to Length(s) do
  begin
    if s[i] in ['0'..'9'] then
      rsp := rsp + s[i];
  end;
  Result := rsp;
end;

Bunu Kullanın. Ve convert etmeyin. Sonuc size rakamlardan ouşan bir string olarak dönecek.

SadeceRakamlar(Edit5.Text); bu şekilde kullandım sonuç  "5.000"  ondalıksız  "5000" olarak görmem gerekiyor.
Cevapla
#12
[attachment=684 Adlı Kullanıcıdan Alıntı:OZCANK pid='31028' dateline='1568118246']
SadeceRakamlar(Edit5.Text); bu şekilde kullandım sonuç  "5.000"  ondalıksız  "5000" olarak görmem gerekiyor.

Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.

Size örnek proje gönderiyorum.


.zip   SadeceRakam.zip (Dosya Boyutu: 54,33 KB / İndirme Sayısı: 0)
Cevapla
#13
(10-09-2019, Saat: 15:34)faktoral Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.
(10-09-2019, Saat: 15:24)OZCANK Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.SadeceRakamlar(Edit5.Text); bu şekilde kullandım sonuç  "5.000"  ondalıksız  "5000" olarak görmem gerekiyor.

Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.

Size örnek proje gönderiyorum.

Faktoral  Kardeşim özür dilerim senden. Bu şekilde kullanınca sorunum halloldu emeği geçen arkadaşlara yürekten teşekkür ediyorum.

 'HAVING (Sum(TBLFATUIRS.BRUTTUTAR - SAT_ISKT - GEN_ISK1T - GEN_ISK2T - GEN_ISK3T)>=$'+SadeceRakamlar(Edit5.Text)+' AND TBLFATUIRS.FTIRSIP=''1'' AND month(tarih)='+#39+''+Edit1.Text+''+#39+')) AS TT ' +

Cevapla
#14
Sorunun çözülmesine katkıda bulunabildiysem ne mutlu. Özre gerek yok.
Hepimiz aynı yollardan geçtik.
Ben teşekkür ederim. Kolay gelsin.
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Edit Sayı Girme OZCANK 3 57 11 saat önce
Son Yorum: Aktolgali
  Edit'i Combobox gibi kullanmak bünyamin68 5 189 11-09-2019, Saat: 13:06
Son Yorum: SimaWB
  combobox veriyi edit text gösterme burak 6 429 24-08-2019, Saat: 09:35
Son Yorum: bünyamin68
  Mask Edit Null Value Error narkotik 2 201 25-07-2019, Saat: 04:42
Son Yorum: narkotik
  Com Porttan gelen veriyi strin formatına çevirme 41linea41 3 358 12-06-2019, Saat: 02:41
Son Yorum: Fesih ARSLAN



Konuyu Okuyanlar: 1 Ziyaretçi