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

Anasayfa Programlama C++ Builder Memo Nesnesi Özellikleri Çizim Yapma Yanip Sönen Edit Nesnesi


Memo Nesnesi Özellikleri Çizim Yapma Yanip Sönen Edit Nesnesi

AÇIKLAMA

C++ Builder 6 ile uyumludur. Bu programda Memo nesnesine ait ExChange ile MoveTo fonksiyonları açıklanmıştır. ExChange fonksiyonu int tipinde 2 parametre almaktadır. Bu indislerde bulunan elemanların yerlerini değiştiren bir fonksiyondur. MoveTo fonksiyonu da int tipinde iki parametre alır. 1. parametre belirtilen indisdeki eleman 2. parametre verilen indise hareket ettirilir.Ayrıca programda doğru dikdörtgen ve daire çizdiren bölümler mevcuttur bu fonksiyonların nasıl çalıştığı sitedeki diğer çalışmamızda belirtilmiştir. Ayrıca Edit nesnesi üzerine mouse'un herhangi bir tuşuna basıldığında Edit kutusunun renkleri yer değiştirir. Yani yazı rengi Edit nesnesinin rengi olurken, Edit nesnesinin rengi yazı rengi olur. Bu özelliğe farklı ve zaman(Timer) koyarak yanip sönen Edit nesnesi oluşturulabilir.

Programın Tamamını Aşağıdaki Linkten İndirebilirsiniz

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

Üye Kayıt

Program Kodu:

  1. //---------------------------------------------------------------------------
  2.  
  3. #include <vcl.h>
  4. #pragma hdrstop
  5.  
  6. #include "Unit1.h"
  7. //---------------------------------------------------------------------------
  8. #pragma package(smart_init)
  9. #pragma resource "*.dfm"
  10. TForm1 *Form1;
  11. int mx,my;
  12. //---------------------------------------------------------------------------
  13. __fastcall TForm1::TForm1(TComponent* Owner)
  14.         : TForm(Owner)
  15. {
  16. }
  17. //---------------------------------------------------------------------------
  18. void __fastcall TForm1::Edit1MouseDown(TObject *Sender,
  19.       TMouseButton Button, TShiftState Shift, int X, int Y)
  20. {
  21. TColor c;
  22. c=Edit1->Color;
  23. Edit1->Color=Edit1->Font->Color;
  24. Edit1->Font->Color=c;
  25. }
  26. //---------------------------------------------------------------------------
  27.  
  28. void __fastcall TForm1::Edit1MouseUp(TObject *Sender, TMouseButton Button,
  29.       TShiftState Shift, int X, int Y)
  30. {
  31. TColor c;
  32. c=Edit1->Color;
  33. Edit1->Color=Edit1->Font->Color;
  34. Edit1->Font->Color=c;
  35. }
  36. //---------------------------------------------------------------------------
  37. void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
  38.       TShiftState Shift, int X, int Y)
  39. {
  40. mx=X;
  41. my=Y;
  42. Form1->Canvas->MoveTo(X,Y);
  43. Form1->Tag=1;
  44. }
  45. //---------------------------------------------------------------------------
  46. void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
  47.       int X, int Y)
  48. {
  49. if(Form1->Tag==1)
  50. {
  51. if(RadioButton1->Checked)
  52. Form1->Canvas->LineTo(X,Y);
  53. if(RadioButton2->Checked)
  54. Form1->Canvas->Rectangle(mx,my,X,Y);
  55. if(RadioButton3->Checked)
  56. Form1->Canvas->Ellipse(mx,my,X,Y);
  57. }
  58. }
  59. //---------------------------------------------------------------------------
  60. void __fastcall TForm1::FormMouseUp(TObject *Sender, TMouseButton Button,
  61.       TShiftState Shift, int X, int Y)
  62. {
  63. Form1->Tag=0;
  64. }
  65. //---------------------------------------------------------------------------
  66. void __fastcall TForm1::Button2Click(TObject *Sender)
  67. {
  68. Memo1->Lines->Add("Selam");
  69.  
  70. ShowMessage(Memo1->Lines->Strings[7]);
  71. Memo1->Lines->Insert(2,"Merhaba");
  72.  
  73. }
  74. //---------------------------------------------------------------------------
  75. void __fastcall TForm1::Button3Click(TObject *Sender)
  76. {
  77. Memo1->Lines->Exchange(1,2) ;
  78.  
  79. }
  80. //---------------------------------------------------------------------------
  81. void __fastcall TForm1::Button4Click(TObject *Sender)
  82. {
  83. Memo1->Lines->Move(0,3);
  84. }
  85. //---------------------------------------------------------------------------
  86.  
  87.  
  88.  
Yorumlar (0)
Sadece kayıtlı kullanıcılar yorum yazabilir!
Son Güncelleme ( Pazartesi, 03 Eylül 2012 15:35 )