Edit içinde , (Virgül) Varmı ? Varsa Tüm Virgülleri Silmek

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
F.Atagun
Üye
Mesajlar: 158
Kayıt: 01 Oca 2008 01:56

Edit içinde , (Virgül) Varmı ? Varsa Tüm Virgülleri Silmek

Mesaj gönderen F.Atagun »

Selamlar,

Dbgridden Edite veri aktarıyorum. Ve hesaplama işlemi yaptırıyorum.

Ancak;
Edit1.Text deki (,) lerden dolayı hesaplamada sorunlar çıkıyor. Forumda defalarca yazılmış çizilmiş. Ama ben işi daha basit bir yolla çözmek istiyorum.

Yani;
Form Onshow oldugunda edit1.Text içinde , ( Virgül ) Varmı diye Kontrol etmek istiyorum ve varsa edit içindeki tüm , (virgülleri) silmek istiyorum

Edit içindeki veri : ( 1,165,200.00 ) şeklinde geliyor. Bunu ( 1165200.00 ) şekline çevirdim mi sorunum kalmayacak :)

Nasıl yapabiliriz ?


Teşekkürler



.
Kullanıcı avatarı
conari
Üye
Mesajlar: 2102
Kayıt: 27 Nis 2006 03:10
Konum: İstanbul & Gebze Karışık

Re: Edit içinde , (Virgül) Varmı ? Varsa Tüm Virgülleri Silmek

Mesaj gönderen conari »

Kod: Tümünü seç

s := StringReplace(s,',','', [rfReplaceAll]);
yapabilirsiniz.
Fakat bu gibi editler için
JvValidateEdit veya Husoedit kullansanız daha iyi olur.
Bir kelimenin anlamını öğretsen bile yeter..
ResimResim
F.Atagun
Üye
Mesajlar: 158
Kayıt: 01 Oca 2008 01:56

Re: Edit içinde , (Virgül) Varmı ? Varsa Tüm Virgülleri Silmek

Mesaj gönderen F.Atagun »

Çok Teşekkürler
Cevapla