Merhaba;
Ben edite girdiğim bir sayıyı sağdan yazdırmaya çalıştım fakat bir türlü yapamadım. edite mesala 1111 gibi bir sayı yazdım.Bunu 1,111 olarak
sağdan yazdırmak istiyorum Bunu nasıl yapabilirim.. Şimdiden teşekkürler
editte sağdan yazdırma
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Sağa Sola ortalama işlemini TEdit objesi desteklemez ama TAligment Sınıfından yaralanarak bunu yapabilirsin.
Kolay Gelsin...
Kolay Gelsin...
Gazete manşetleri
* DİKKAT :Lütfen forum kurallarını okuyalım ve uyalım...!
* Warez,crack vs. paylaşımı kesinlikle yasaktır.
Bindelik kullanmak istiyorsan ve bunu kodla yapmak istiyorsan linki aşağıda tıkla
Link
viewtopic.php?t=1130&highlight=edit
Kolay Gelsin...
Link
viewtopic.php?t=1130&highlight=edit
Kolay Gelsin...
Gazete manşetleri
* DİKKAT :Lütfen forum kurallarını okuyalım ve uyalım...!
* Warez,crack vs. paylaşımı kesinlikle yasaktır.
Selam.
- Programcılık daha önce de bir çok kez bahsettiğim gibi bir anlamda da ilüzyonist olmak demektir. Delphi de çok güzel bir araçtır.
- Sağa yanaşık bir Edit ihtiyacın olduğunu gördüm. Bahsedeceğim metodu deneyen oldu mu bilmiyorum ama bugüne kadar kimsede rastlamadım, ilk defa burada sana açıklıyorum...
- Alignment özelliğine sahip standart bileşenlere bir göz at, hangisinde var ? Bileşen paletinde, hemen TEdit'in yanında ne görüyoruz, TMemo....
- Bir TMemo koy ve alignment olayını taRightJustify yap. Sonra da KeyPress olayına yazıp enter olayını engelle veya bir sonraki alana gönder, oldu sana RightAlign'li bir TEdit...
- OnExit olayına da formatfloat ile numara olayını yerleştir, oldu sana TNumberEdit..
- Ben hep bu tekniği kullanırım. Bu konuda da üçüncü parti bileşen olayına lüzum kalmadı...
- Programcılık daha önce de bir çok kez bahsettiğim gibi bir anlamda da ilüzyonist olmak demektir. Delphi de çok güzel bir araçtır.
- Sağa yanaşık bir Edit ihtiyacın olduğunu gördüm. Bahsedeceğim metodu deneyen oldu mu bilmiyorum ama bugüne kadar kimsede rastlamadım, ilk defa burada sana açıklıyorum...

- Alignment özelliğine sahip standart bileşenlere bir göz at, hangisinde var ? Bileşen paletinde, hemen TEdit'in yanında ne görüyoruz, TMemo....

- Bir TMemo koy ve alignment olayını taRightJustify yap. Sonra da KeyPress olayına
Kod: Tümünü seç
If Key = #13 then key := #0;

- OnExit olayına da formatfloat ile numara olayını yerleştir, oldu sana TNumberEdit..

- Ben hep bu tekniği kullanırım. Bu konuda da üçüncü parti bileşen olayına lüzum kalmadı...

Herkese Selamlar,
Bir konuya parmak basmak istiyorum ki, o da Editte sağa dayalı olarak hem yazıp hem formatlama olayı bahsedildiği kadar kolay bir iş değil
Ben bu iş için bir ara baya uğraşmıştım, yani daha yazıyı yazarken formatlama yapması olayı biraz karışık bir iş. Hatta sn günlerde yeniden üzerinde çalışıyorum ve farklı bir bakış açısıyla yeni bir şey yapmayı planlıyorum. Bittiğinde siteye göndreceğim ve inşallah herkesin derdine de çare olmuş olacak
Zira formatlama işleminde pek çok kombinasyon var ve bu kombinasyonlarda (eğer editi kullanırken dikkat etmeye kalkışırsanız) windows'un messagingine kadar inersiniz
Ondan sonra herşey sarpa sarmaya başlıyor zaten.
Kolay gelsin.
Bir konuya parmak basmak istiyorum ki, o da Editte sağa dayalı olarak hem yazıp hem formatlama olayı bahsedildiği kadar kolay bir iş değil

Ben bu iş için bir ara baya uğraşmıştım, yani daha yazıyı yazarken formatlama yapması olayı biraz karışık bir iş. Hatta sn günlerde yeniden üzerinde çalışıyorum ve farklı bir bakış açısıyla yeni bir şey yapmayı planlıyorum. Bittiğinde siteye göndreceğim ve inşallah herkesin derdine de çare olmuş olacak

Zira formatlama işleminde pek çok kombinasyon var ve bu kombinasyonlarda (eğer editi kullanırken dikkat etmeye kalkışırsanız) windows'un messagingine kadar inersiniz

Ondan sonra herşey sarpa sarmaya başlıyor zaten.
Kolay gelsin.
Kuri Yalnız Jedi
Harbi Özgürlük İçin Pisi http://www.pisilinux.org/
Harbi Özgürlük İçin Pisi http://www.pisilinux.org/
@Kuri_TLJ Selam..
- Bu tarif edilen TMemo sağdan yazarak aslında bütün işi üzerine almakta.
- Edit'ten çıktığında yani OnExit olayında FormatFloat ile virgüllü hale dönüştürülebilir.
- Eğer yazarken ayırsın diyorsanız da yapacağınız işlem KeyPress veya KeyUp (OnChange değil!) olayında; virgülleri, noktaları veya tek tırnak işareti; ayraç neyse mevcut olanları bulup temizleyip tekrar formatlayıp yazmak.
- Sonra da bu işi yapmadan önce Selection Start noktası yani cursor pozisyonu neresiyse, bu formatlama işleminin bitiminden sonra oraya konumlanmak.
- Copy/Paste (Kopyala/Yapıştır) ile yazılanları zaten kontrol altına alırsınız.
- Aman yanlış anlamayın, gereksiz yere başka metodlara yönelip vaktinizi harcamayın diye yazdım bunları. Windows mesaj sistemini en az sizin kadar seviyorum ve ben dahi hız ve kontrol bakımından çok kullanıyorum.
- Siz tasarımınızı yapın. Burada paylaşalım.
Bir konuya parmak basmak istiyorum ki, o da Editte sağa dayalı olarak hem yazıp hem formatlama olayı bahsedildiği kadar kolay bir iş değil
- Bu kadar büyütecek bişi yok aslında.. Satır satır yazarsanız aslında çok basit olduğunu göreceksiniz.Zira formatlama işleminde pek çok kombinasyon var ve bu kombinasyonlarda (eğer editi kullanırken dikkat etmeye kalkışırsanız) windows'un messagingine kadar inersiniz
Ondan sonra herşey sarpa sarmaya başlıyor zaten.

- Bu tarif edilen TMemo sağdan yazarak aslında bütün işi üzerine almakta.

- Edit'ten çıktığında yani OnExit olayında FormatFloat ile virgüllü hale dönüştürülebilir.
- Eğer yazarken ayırsın diyorsanız da yapacağınız işlem KeyPress veya KeyUp (OnChange değil!) olayında; virgülleri, noktaları veya tek tırnak işareti; ayraç neyse mevcut olanları bulup temizleyip tekrar formatlayıp yazmak.
- Sonra da bu işi yapmadan önce Selection Start noktası yani cursor pozisyonu neresiyse, bu formatlama işleminin bitiminden sonra oraya konumlanmak.

- Copy/Paste (Kopyala/Yapıştır) ile yazılanları zaten kontrol altına alırsınız.
- Aman yanlış anlamayın, gereksiz yere başka metodlara yönelip vaktinizi harcamayın diye yazdım bunları. Windows mesaj sistemini en az sizin kadar seviyorum ve ben dahi hız ve kontrol bakımından çok kullanıyorum.
- Siz tasarımınızı yapın. Burada paylaşalım.
