button'a birden fazla görev vermek

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
ispinoz
Üye
Mesajlar: 2
Kayıt: 06 Şub 2004 04:25

button'a birden fazla görev vermek

Mesaj gönderen ispinoz »

Arkadaşlar Merhaba,
form üzerinde 1 tane memo, 2 tane rapor, 1 tane button var.
form ilk açıldığında button'a tıklayınca frReport1.Showreport çalışıyor.
ben; memo'yu fare ile seçtiğimde(OnClick) veya memonun üzerine tıklayıp, aynı button'a bastığımda frReport2.Showreport'u açmasını istiyorum.
İnşallah sorumu anlatabilmişimdir.
Teşekkürler.
Kullanıcı avatarı
husonet
Admin
Mesajlar: 2962
Kayıt: 25 Haz 2003 02:14
Konum: İstanbul
İletişim:

Mesaj gönderen husonet »

Bu olayı değişkenlere değer atayarak halledebilirsin.

Mesala Click Eventi tetiklediğin zaman

Tetik := 1; tetik değişkenine 1 atarsın.

Bu olayı da buton un click eventinde koşul karşılaştırması yapıp istediğin sonuca ulaşabilirsin. Umarım anlatabilmişimdir.

Kolay Gelsin....
En son husonet tarafından 12 Şub 2004 02:45 tarihinde düzenlendi, toplamda 2 kere düzenlendi.

Gazete manşetleri
* DİKKAT :Lütfen forum kurallarını okuyalım ve uyalım...!
* Warez,crack vs. paylaşımı kesinlikle yasaktır.
Kullanıcı avatarı
gkimirti
Admin
Mesajlar: 1956
Kayıt: 02 Eyl 2003 04:44
Konum: İstanbul

Mesaj gönderen gkimirti »

global bir degisşken tanımla
memo1 in onenter ve onexit olaylarını kullanarak bu degiskeni guncelle

butona bastıgın da globaldegiskenin durumuna gore 1. yada 2. reportu ac
umarım yardımcı olabilmisimdir
ÜŞENME,ERTELEME,VAZGEÇME
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

Selam...

:arrow: En kısa yoldan önerimi bildireyim...

- Formu'nuzun Tag isminde bir değişken yeri vardır... Buraya Integer tipinde yani rakam yazabilirsiniz. Bu Tag'ın ne programa ne de form işleyişine etkisi yoktur...

- Program çalıştığında bu değer siz aksini vermediyseniz 0'dır.

- Size önerim mouse, kod, Tab tuşu farketmez; Memo alana geçtiğinizde tetiklenen Memo'nun Events kısmındaki OnEnter kısmına

Kod: Tümünü seç

Form1.Tag := 2;
yazın.

- Artık formunuzda hangi alanda olduğunuz işaretlediğiniz bir yer var...
Yapmanız gereken şey Button1'e basıldığında
:arrow: bu değer 0 ise frReport1.Showreport'u,
:arrow: bu değer 2 ise frReport2.Showreport'u çalıştırmaktır...

- Program boyunca istediğiniz yerde Form1.Tag değeriyle oynayarak Button basıldığında ne yapması gerektiğini kontrol edebilirsiniz..

- Umarım çözümü anladınız.. Çalışmalarınızda başarılar...
Resim
Resim ....Resim
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

@gkimirti @husonet süpersiniz... Yine solladınız... :lol: :lol: :lol:

- Yahu şu mesajı süsleme huyumdan vazgeçmem lazım.. Sizi de yoruyorum, kendimi de :lol:

@ispinoz

- @gkimirti ve @husonet 'nin dediği gibi zaten aklın yolu bir, global değişken de koyabilirsin. Form'un Tag'ı benim kolaylık olsun diye kullandığım global değişkenlerden hazır olanıydı...
Resim
Resim ....Resim
ispinoz
Üye
Mesajlar: 2
Kayıt: 06 Şub 2004 04:25

Mesaj gönderen ispinoz »

Arkadaşlar, hepinize sonsuz teşekkürler. Form1.Tag olayıyla sorunumu hallettim. Saygılar... :D
Kullanıcı avatarı
fahrettin
Admin
Mesajlar: 2619
Kayıt: 11 Haz 2003 10:38
Konum: İstanbul
İletişim:

Mesaj gönderen fahrettin »

mrmcop yazdı:@gkimirti @husonet - Yahu şu mesajı süsleme huyumdan vazgeçmem lazım.. Sizi de yoruyorum, kendimi de :lol:
Forum süsleme sanatının adı neydi Origami miydi yoksa :)

Valla Muharrem Bey maşallah mesajlarınız içerik zenginliğinin ötesine geçip aynı zamanda görsel bir şölene dönmeye başladı....
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

Selam...

- Valla mesajın içeriği kadar anlaşılır olmasına gayret gösteriyorum.

- Ayırt edici ögeler konmazsa önemli detaylar atlanabilir endişesi taşıyorum. Vurgu yapılması yerlerde buna özel gayret gösteriyorum ki kavram oluşsun...

- Bir de mümkün olduğunca fonksiyon ve procedure yazmaya çalışıyorum ki dinamizm katsın...

- Her yazının birer makale gibi olması lazım ki gelcekte delphi severler kaynak olarak kullanabilsin... Çünkü bir çoğu yılların tecrübesidir...

- Bunu ukalalık olarak algılamayın, Delphi geçmişim 3 yıl ama program mantığının ve kavramların oturması 10 yılı aştı. Bu duruma isim takabilirsiniz.

1.Detaylara ve kavramlara ne denli önemsediğim... :lol:
2.Ya da benim moron olduğum... :lol: :lol: :lol:
Resim
Resim ....Resim
Kullanıcı avatarı
fahrettin
Admin
Mesajlar: 2619
Kayıt: 11 Haz 2003 10:38
Konum: İstanbul
İletişim:

Mesaj gönderen fahrettin »

Aman Muharrem Bey bir yanlış anlaşılma olmadı değil mi?

Ben mesajlarınızdaki ilave görsel zenginliğe bir övgü göndermek istemiştim maşallah derken.

izahat getirince bir an yanlış mı anlaşıldı diye endişe ettim doğrusu....

Kolaye gelsin... :)
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

- Fahrettin Bey, bu şekilde bir fikre kapılmanızdan müteessir oldum...

:lol: Sizlerle tanıştığım ve yüzyüze görüştüğüm günden bu yana memnuniyetim ve saygım çerçevesinde değer verdiğim insanlarsınız.

:lol: Mustafa Bey'i ziyaret ettiğimde yaptığınız incelikten (vakit ayırma nezaketi) ve hoş sohbetten sonra hiciv taşısa bile hiçbir sözünüz beni kırmayacaktır... -ki böyle bişi olmadı ya da bu şekilde tarafımdan algılanmadığını kesin bir dille belirteyim- :oops:

:lol: Burada bir paylaşım içindeyiz. Bir paylaşım çerçevesi ve kişisel vakit sınırlarında üzerimize düşen görevi zaten yapmaya gayret gösteriyoruz... Bundan dolayı sizlere saygım her zaman artıyor...

:lol: İnce mesajları bırakın siz değil de forumda acemilik çeken üyelerimiz tarafından alınsın ve gereği gibi forum kurallarına uyulsun... :wink:
Resim
Resim ....Resim
Kullanıcı avatarı
fahrettin
Admin
Mesajlar: 2619
Kayıt: 11 Haz 2003 10:38
Konum: İstanbul
İletişim:

Mesaj gönderen fahrettin »

Estağfirullah.... :oops:

sizi tanimak benim icin de memnuniyet vericiydi. :)

Kolay gelsin.....
Cevapla