veritabanından mask edite aktarma

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
yusuf simsek
Üye
Mesajlar: 330
Kayıt: 09 Mar 2004 11:18
Konum: Konya
İletişim:

veritabanından mask edite aktarma

Mesaj gönderen yusuf simsek »

herkese kolay gelsim

maskedit kullanarak veritabanına kayıt girişi yapıyorum...(vergi numarası,telefon numarası)

düzenleme işlemi yaptırmak için veritabanında bulunan kayıtları tekrar edit nesnesine aktarıyorum ama mask edit nesnesine vergi no ve telefon numaralarını yazmıyor...

acaba veri tabanındaki kaydı maskedit nesnesine nasıl aktarabilirim :?:

şimdiden çok teşekkür ederim...
Bugün bir kez daha,
Hiç Birşey Bilmediğimi Öğrendim!!!

https://extrayazilim.com
sair
Kıdemli Üye
Mesajlar: 288
Kayıt: 16 Haz 2003 04:41
Konum: Kastamonu
İletişim:

Mesaj gönderen sair »

MaskEdit1.Text:=Query1FIELDS.AsString;
MaskEdit1.Text:=IntToStr(Query1FIELDS.AsInteger);
MaskEdit1.Text:=FloatToStr(Query1FIELDS.AsFloat);

Sevgiler....
Geçip gideriz bizde ağızsız,dilsiz ve sorgusuz
İstanbul gibi düşeriz iki kıtaya birden...
En aşağılık düş, en büyük sevdadan belki
Erkek ölümler; bir uzun iç çekişle büyür göğsümüz
Kullanıcı avatarı
hdayi
Kıdemli Üye
Mesajlar: 1284
Kayıt: 29 Oca 2004 01:53
Konum: Erciyes'in eteklerinden.

Mesaj gönderen hdayi »

Mask edit kullanmada gerek yok.
dbedit kullan. datamodule'de tablonun üzerine çift tıkla ve alanları ekle(ctrl+a). mask editle girmeye çalıştığın alanın üzereine gel ve editmask özelliğini değiştir.

Kolay Gelsin
Bişnev in ney çün hikâyet mîküned
Ez cüdâyîhâ şikâyet mîküned
Resim
yusuf simsek
Üye
Mesajlar: 330
Kayıt: 09 Mar 2004 11:18
Konum: Konya
İletişim:

Mesaj gönderen yusuf simsek »

arkadaşlar ilginize çok teşekkür ederim...
MaskEdit1.Text:=Query1FIELDS.AsString;
MaskEdit1.Text:=IntToStr(Query1FIELDS.AsInteger);
MaskEdit1.Text:=FloatToStr(Query1FIELDS.AsFloat);
bu yolu daha önce denemiştim ama olmadı.

dbedit kullanmak istemiyorum..çünki daha önceki projemde sorunlar yaşadım...

sorunumu farklı bir şekilde çözdüm.. :D

editmask nesmesinin mask özelliğini kayıt girmeden önce (yeni kayıt butonunun click olayına ) kendim yazdım...

Kod: Tümünü seç

maskedit3.EditMask:=('(000)\ 000\ 00\ 00\');  (telefon numarası için
yanlız ufak bir sorun yapıyor. maske özelliğindeki boşluk ve parantezleri de veri tabanına kaydediyor...yani boşu boşuna yer işgal ediyo...

veritabanından maskedit e veri aktaracağım zaman ise mask özelliğini sıfırlıyorum...ve veritabanından değeri maskedit nesnesine aktarıyorum...

Kod: Tümünü seç

 maskedit3.EditMask:='';
 maskedit3.Text:=m_kartTEL1.Value;
veri tabanında tanımlanan alanın boyutunu tanımladığınız mask boyutunda tanımlarsanız verimli bir şekilde çalışıyor... :D

ilginizden dolayı hepinize teşekkür ederim....
Bugün bir kez daha,
Hiç Birşey Bilmediğimi Öğrendim!!!

https://extrayazilim.com
DotCom
Kıdemli Üye
Mesajlar: 1696
Kayıt: 11 Tem 2003 10:30
Konum: İzmir
İletişim:

Mesaj gönderen DotCom »

MaskEdit1.Text:=Query1FIELDS.AsString;
MaskEdit1.Text:=IntToStr(Query1FIELDS.AsInteger);
MaskEdit1.Text:=FloatToStr(Query1FIELDS.AsFloat);

Bu komutları Table ın bağlı oldugu datasource un onchange olayına yazarsan her kayıt değişiminde ilgili maskedit e değerleri aktarır...

Sanırım istediğin buydu..


Kolay Gelsin...
yusuf simsek
Üye
Mesajlar: 330
Kayıt: 09 Mar 2004 11:18
Konum: Konya
İletişim:

Mesaj gönderen yusuf simsek »

ilginize teşekkür ederim

sorunumu anlattığım şekilde hallettim.

yapmak istediğim düzenleme yapmak istediğinde sorgulama yapıyor ve sonuçları edit nesnesine dönderiyor...güzel bir görünüm ve veri girişinin kolay olması için mask edit kullanmak istedim ve veriyi mask edite aktarmada sorunla karşılaştım..

sorunuda anlattığım şekilde editmask özelliğini sıfırlayarak hallettim...

ama gene bir sorun var gibi... :!:
(yeni aklıma geldi)telefonlar üzerinde değişiklik yapacak olursa editmask özelliği yok...yani normal edit nesnesi gibi...

:idea: o sorunda maskedit nesnesinin chance olayına tekrar editmask tanımlayarak çözülebilir

Kod: Tümünü seç

maskedit3.EditMask:=('(000)\ 000\ 00\ 00\');  
bu şekilde maskedit nesnesi emrimize amade oluuuurrr :D


ilgilendiğiniz için hepinize ayrı ayrı teşekkür ederim
Bugün bir kez daha,
Hiç Birşey Bilmediğimi Öğrendim!!!

https://extrayazilim.com
Cevapla