QRDBText'e TEdit'ten Copy Nasıl Yapılır ?

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
onder
Üye
Mesajlar: 2
Kayıt: 05 Tem 2005 01:11
Konum: istanbul

QRDBText'e TEdit'ten Copy Nasıl Yapılır ?

Mesaj gönderen onder »

Merhaba

1 Adet TEdit nesnesi içine yazılan veriyi, teker teker harf harf copyalayarak 3 adet QRDBtext nesnesine nasıl aktarabilirim.

Yani TEdit içine 3 harfli bir bilgi girilmişse birinci QRDBtext'e ilk harf, ikinci QRDBtext'e ikinci harf, üçüncü QRDBtext'e üçüncü harf gelsin.

Örnek olsun diye yazdım (doğru olmayabilir. Üzerinde değiştirirseniz sevinirim.)

QRDBText1.text:=copy(edit1.text,1,1);
QRDBText2.text:=copy(edit2.text,2,1);
QRDBText3.text:=copy(edit3.text,3,1);

Ayrıca aynı mantığı Query1adi isimli bir veri alanımız olduğunu düşürsek nasıl yapabiliriz.

Teşekküreler...
"Öğrenmek İçin Burdayım..."
ASE
Kıdemli Üye
Mesajlar: 518
Kayıt: 28 Ağu 2003 03:17
Konum: samsun
İletişim:

Mesaj gönderen ASE »

QRDbText değil QRLabel kullan.
Aynı kodlar çalışacaktır.
Kolay gelsin..
Allah'ım!...
Yol boyunca bırakma elimi...
Düşerim sonra...


ASE YAZILIM
onder
Üye
Mesajlar: 2
Kayıt: 05 Tem 2005 01:11
Konum: istanbul

QRLabel'de olur mu?

Mesaj gönderen onder »

Ama ben boş olan veri alanının raporda görünmesini ve yazdırılmasını istemiyorum. QRLabel koyduğumda söylediğiniz olur mu?
"Öğrenmek İçin Burdayım..."
ASE
Kıdemli Üye
Mesajlar: 518
Kayıt: 28 Ağu 2003 03:17
Konum: samsun
İletişim:

Mesaj gönderen ASE »

olur tabii ki. İlaa da kontrol altında tutmak istiyorsan bunu da yazdırmadan önce boş mudolu mu diye kontrol edip daha sonra yazdırabilirsin...
Allah'ım!...
Yol boyunca bırakma elimi...
Düşerim sonra...


ASE YAZILIM
Cevapla