Programlama | Programlama Dilleri | C Programlama Dili |C++

Anasayfa Programlama C++ Builder Updown Nesnesi ?le Art?rma Azaltma


Updown Nesnesi ?le Art?rma Azaltma

AÇIKLAMA

C++ Builder 6 ile uyumludur. Bu programda updown nesnesi kullan?larak bir yap?n?n büyültüp küçültülmesi veya art?r?l?p azalt?lmas? sa?lanm??t?r. Bu programda bir updown nesnesi Edit1 nesnesinin font büyüklü?ünü yani k?saca Edit1 nesnesinin büyüklü?ünü ayarlamakta kullan?lmaktad?r. Di?eri ise Edit2 içerisindeki say?y? art?rmakta veya azaltmakta kullan?l?r. Updown nesnesinin increment özelli?i art?rma veya azaltman?n kac birim yap?laca??n? belirtirken, orientation nesnenin dikeymi yataym? olaca??n? belirler,position ba?layaca?? de?eri gösterir. Burada Edit2 içerisinde ifade oldu?una dikkat edelim bu bir problem olu?turmayak saymaya 0'dan ba?layacakt?r.

Program?n Tamam?n? A?a??daki Linkten ?ndirebilirsiniz

Linki Görebilmeniz ?çin Üye Olman?z Gerekmektedir...

Üye Kay?t 

Program Kodu:

Unit1.cpp

  1.  
  2.  
  3. //---------------------------------------------------------------------------
  4.  
  5. #include <vcl.h>
  6. #pragma hdrstop
  7.  
  8. #include "Unit1.h"
  9. //---------------------------------------------------------------------------
  10. #pragma package(smart_init)
  11. #pragma resource "*.dfm"
  12. TForm1 *Form1;
  13. //---------------------------------------------------------------------------
  14. __fastcall TForm1::TForm1(TComponent* Owner)
  15.         : TForm(Owner)
  16. {
  17. }
  18. //---------------------------------------------------------------------------
  19.  
  20.  
  21. void __fastcall TForm1::UpDown1Changing(TObject *Sender, bool &AllowChange)
  22. {
  23. Edit1->Font->Size=UpDown1->Position;
  24. }
  25. //---------------------------------------------------------------------------
  26.  
  27. void __fastcall TForm1::UpDown2Changing(TObject *Sender, bool &AllowChange)
  28. {
  29. Edit2->Text=UpDown2->Position;
  30. }
  31. //---------------------------------------------------------------------------
  32.  
  33. void __fastcall TForm1::Edit2Change(TObject *Sender)
  34. {
  35. UpDown2->Position=StrToInt(Edit2->Text);
  36. }
  37. //---------------------------------------------------------------------------
  38.  
  39.  
  40.  

Yorumlar (0)
Sadece kayıtlı kullanıcılar yorum yazabilir!
Son Güncelleme ( Pazar, 02 Eylül 2012 23:17 )  
backlinktr.biz | 523: Origin is unreachable

Error 523 Ray ID: 5355462ffe6ad3ff • 2019-11-14 01:39:53 UTC

Origin is unreachable

You

Browser

Working
Budapest

Cloudflare

Working
backlinktr.biz

Host

Error

What happened?

The origin web server is not reachable.

What can I do?

If you're a visitor of this website:

Please try again in a few minutes.

If you're the owner of this website:

Check your DNS Settings. A 523 error means that Cloudflare could not reach your host web server. The most common cause is that your DNS settings are incorrect. Please contact your hosting provider to confirm your origin IP and then make sure the correct IP is listed for your A record in your Cloudflare DNS Settings page. Additional troubleshooting information here.