IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  kral sohbet




Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 11 Temmuz 2014, 10:28   #1
Çevrimdışı
Forma Rakam Yazdirma


sohbet


Formun üzerinde yatay veya dikey isteğe bağlı olmak üzere 1 den 20 'ye rakamların yazdırılmasını sağlayan programdir.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { for(int i=1;i<=20;i++) { if(CheckBox1->Checked==true) { Form1->Canvas->TextOut(0,i*15,i); } if(CheckBox2->Checked==true) { Form1->Canvas->TextOut(i*15,0,i); } } } //---------------------------------------------------------------------------

Formun üzerinde yatay veya dikey isteğe bağlı olmak üzere 1 den 20 'ye rakamların yazdırılmasını sağlayan programdir.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { for(int i=1;i<=20;i++) { if(CheckBox1->Checked==true) { Form1->Canvas->TextOut(0,i*15,i); } if(CheckBox2->Checked==true) { Form1->Canvas->TextOut(i*15,0,i); } } } //---------------------------------------------------------------------------

  Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
radyo44.com.tr
Cevapla

Etiketler
forma, rakam, yazdirma

Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Muaf & Yazdirma Spaw67 Eggdrop, NeoStats, BNC 0 14 Nisan 2009 00:46
Rakam EFSANELERi Lord- Serbest Kürsü 0 13 Ocak 2008 10:13