C# da Paint Yapımı

c#

using System;

using System.Collections.Generic;

using System.ComponentModel;

using System.Data;

using System.Drawing;

using System.Linq;

using System.Text;

using System.Threading.Tasks;

using System.Windows.Forms;

namespace Paint

{

    public partial class Form1 : Form

    {

        public Form1()

        {

            InitializeComponent();

            drawBitmap = new Bitmap(pictureBox1.Width, pictureBox1.Height);

            drawGraphics = Graphics.FromImage(drawBitmap);

            pictureBox1.Image = drawBitmap;

        }

        private Bitmap drawBitmap;

        private Graphics drawGraphics;

        private SolidBrush paintBrush = new SolidBrush(Color.Blue);

        private int paintXSize = 4;

        private int paintYSize = 4;

        private SolidBrush clearBrush = new SolidBrush(Color.White);

        private int clearXSize = 20;

        private int clearYSize = 20;

        private void Form1_Load(object sender, EventArgs e)

        {

        }

        private void cizimYap(int xKoor, int yKoor, MouseEventArgs e)

        {

            drawGraphics.FillRectangle(paintBrush, e.X, e.Y, xKoor, yKoor);

            pictureBox1.Image = drawBitmap;

        }

        private void pictureBox1_MouseMove(object sender, MouseEventArgs e)

        {

            if (e.Button == System.Windows.Forms.MouseButtons.Right)

            {

                cizimYap(paintXSize, paintYSize, e);

            }

        }

        private void button1_Click(object sender, EventArgs e)

        {

            if (colorDialog1.ShowDialog() == DialogResult.OK)

            {

                pictureBox2.BackColor = colorDialog1.Color;

                Color renk=new Color();

                renk=colorDialog1.Color;

                paintBrush = new SolidBrush(renk);

            }

        }

        private void button2_Click(object sender, EventArgs e)

        {

            if (colorDialog1.ShowDialog() == DialogResult.OK)

            {

                pictureBox3.BackColor = colorDialog1.Color;

                pictureBox1.BackColor = colorDialog1.Color;

            }

        }

    }

}

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

C# da Çarpım Tablosu Programı

c#

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace çarpimtablosu
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            listBox1.Items.Clear();
            double sayi = double.Parse(comboBox1.Text);
            for (int i = 1; i < 11; i++)
            {
                listBox1.Items.Add(sayi + " * " + i + " = " + (sayi * i));
            }
        }
    }
}

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

C# da TextBoxa Tıklanınca TextBox Temizlensin

private void textBox1_Click(object sender, EventArgs e)

{

textBox1.Clear();

}

private void Form1_Load(object sender, EventArgs e)

{

textBox1.Text = "Programlama Hocam";

}

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

C# da Try Catch İle Not Hesaplama

C#

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace WindowsFormsApplication15
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            int a, b;
            double ort;
            try
            {
                a = Convert.ToInt32(textBox1.Text);
                b = Convert.ToInt32(textBox2.Text);
                if (a<0 || a>100 || b<0 ||b>100)
                {
                    throw new Exception();
                }
                ort = (a + b) / 2.0;
                label4.Text = ort.ToString();
            }
            catch (Exception)
            {
                MessageBox.Show("0-100 arası değer giriniz");
           
            }
        }
    }
}

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

C# da Metod İle Not Hesaplama Ve Geçme Kalma Hesabı

c#

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace WindowsFormsApplication14
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            int s1 = Convert.ToInt32(textBox1.Text);
            int s2 = Convert.ToInt32(textBox2.Text);
            int s3 = Convert.ToInt32(textBox3.Text);
            int per = Convert.ToInt32(textBox4.Text);
            int temrin = Convert.ToInt32(textBox5.Text);
            label6.Text = uygunmu(s1);
            label7.Text = uygunmu(s2);
            label8.Text = uygunmu(s3);
            label9.Text = uygunmu(per);
            label10.Text = uygunmu(temrin);
            label13.Text = gecerlisayi.ToString();
            double ort = gecerliort / (double)gecerlisayi;
            label14.Text = ort.ToString();
        }
        int gecerlisayi , gecerliort ;
        string uygunmu(int a)
        {
            if (a>0 && a<=100)
            {
                gecerlisayi++;
                gecerliort = gecerliort + a;
                return "uygun";
            }
            else
            {
                return "uygun değil";
            }
        }
    }
}

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

C# da Metod İle Çevre Hesaplama

c#

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace WindowsFormsApplication13
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            label1.Text = cevrehesapla(5, 7, 4).ToString();
        }
        int cevrehesapla(int a, int b, int c)
        {
            int cevap;
            cevap = a + b+c;
            return cevap;
        }
    }
}

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

C# da Diziler İle Talihli Bilet Bulma

c#

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace WindowsFormsApplication12
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }
        int [] talihlibilet = new int [] { 1234567,0987654,5567123,2617213};
        int[] sonuc = new int[] { 745, 123, 456, 789, 098, 523, 724, 911 };
         int [] amo = new int [] {5,4,7};
        private void button1_Click(object sender, EventArgs e)
        {
            label1.Text = "label2";
            int lan = Convert.ToInt32(textBox1.Text);
            for (int i = 0; i <= 9; i++)
            {
                if (lan== talihlibilet[i])
                {
                    label1.Text = "10 milyon kazandınız";
                    break;
                }
                if (label2.Text=="label2")
                {
                    for (int ı = 0; ı <=9 ; ı++)
                    {
                        int sonucc = lan % 1000;
                        if (sonucc== sonuc[ı])
                        {
                            label2.Text = "1000 tl kazandınız";
                            break;
                        }
                    }
                }
            }
        }
    }
}

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

C# da Metod İle Matematik Soru Testi Yapımı

c#

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace WindowsFormsApplication11
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }
        Random r;
        int a, b, dcs = 0, sn = 0, ycs = 0, bcs = 0, sure = 10;
        private void Form1_Load(object sender, EventArgs e)
        {
            soru();
            timer1.Start();
        }
        void soru()
        {
            sn++;
            label1.Text = "soru" + sn + ")";
            a = r.Next(1, 100);
            b = r.Next(1, 100);
            label2.Text = a.ToString();
            label4.Text = b.ToString();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            int c = Convert.ToInt32(textBox1.Text);
            if (c==a+b)
            {
                dcs++;
                label9.Text = dcs + "";
            }
            else
            {
                ycs++;
                label10.Text = ycs + "";
            }
            soru();
            sure = 10;
        }

        private void timer1_Tick(object sender, EventArgs e)
        {
            sure--;
            if (sure==0)
            {
                bcs++;
                label11.Text = bcs + "";
                soru();
                sure = 10;
            }
            label13.Text = sure.ToString();
        }
    }
}

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

C# da Metod ile Not Hesaplama

c#

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace WindowsFormsApplication9
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            int a = Convert.ToInt32(textBox1.Text);
            int b = Convert.ToInt32(textBox2.Text);
            int c = Convert.ToInt32(textBox3.Text);
            int d = Convert.ToInt32(textBox4.Text);
            int g = Convert.ToInt32(textBox5.Text);
            label6.Text = uygunmu(a);
            label7.Text = uygunmu(b);
            label8.Text = uygunmu(c);
            label9.Text = uygunmu(d);
            label10.Text = uygunmu(g);
            label14.Text = gs.ToString();
            double ort = gns / (double)gs;
            label15.Text = gns.ToString();
        }
        int gs = 0;
        int gns = 0;
        string uygunmu(int r)
        {
            if (r>0 && r<=100)
            {
                gs++;
                gns = gns + r;
                return "uygun ";
            }
            else
            {
                return "uygun değil";
            }
        }
    }
}

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

C# da Veri Tabanı Kaydı 2

c#

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace WindowsFormsApplication5
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void karneBindingNavigatorSaveItem_Click(object sender, EventArgs e)
        {
            this.Validate();
            this.karneBindingSource.EndEdit();
            this.tableAdapterManager.UpdateAll(this.programlamahocamDataSet);

        }

        private void Form1_Load(object sender, EventArgs e)
        {
            // TODO: This line of code loads data into the 'programlamahocamDataSet.karne' table. You can move, or remove it, as needed.
            this.karneTableAdapter.Fill(this.programlamahocamDataSet.karne);

        }
    }
}

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

C# da Veri Tabanına Kayıt Ekleme

c#

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using System.Data.OleDb;

namespace WindowsFormsApplication2
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }
       
        private void button1_Click(object sender, EventArgs e)
        {
            OleDbDataReader data;
            DataTable tablo = new DataTable();
            // accese veri ekleme komutu
            oleDbCommand1.CommandText = "insert into kisi (ad) values (a1)";
            oleDbCommand1.Parameters.Add("a1",textBox2.Text);
            oleDbCommand1.ExecuteNonQuery();
            oleDbCommand1.Parameters.Clear();
            // komutun bitişi
            //datagridviewe görüntüleme
            oleDbCommand1.CommandText = "Select * from kisi";
            data = oleDbCommand1.ExecuteReader();
            tablo.Load(data);
            dataGridView1.DataSource = tablo;
            //görüntülemenin sonu
        }
        private void Form1_Load(object sender, EventArgs e)
        {
            oleDbConnection1.Open();
        }
    }
}

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

Delphide Standart Araçlar

Edit (Yazı Kutusu): Yazı yazmak ve girişi kutusu, dışarıdan kullanıcı formun üzerindeki bu araçtan bilgi girişi için kullanılır.

Özellikleri:

Aligement: İçinde yazdığımız yazıyı hizalar.

Color: Zemin rengi.

NumberOnly: Sadece sayı girilsin.

PassowordChar: Şifre kutusu yapmak için kullanılır.

PopupMenu: O aracın üzerindeki iken sağ tuşa ile görünen menü.

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

Delphi de Form Olayları

OnActivate: Form veya nesne aktif olduğunda çalışacak olan kodlar bu alan yazılır.

OnCanResize: Yeniden boyutlandırma. Denetim boyutlandırıldığı sırada işlemin durdurulmasına izin verilmesinden ortaya çıkar.

Onclick: Seçili olan bir araçtan başka bir araca geçildiğinde Onclick mousen sol tuşuna bir defa kliklendiğinde çalıştırılan kod.

Onclose: Form Kapatılırken.

Oncreate: Form belleğe yüklenir iken.

OnDbleClick: Ard arda iki defa basıldığında çalışan komutlar.

OnDeActive: Form pasifleştirildiğinde.

OnDrogDrop: Sürekle bırak kullanacağı zaman.

OnExit: Bileşenden ayrılırken.

OnHide: Form gizlendiğinde.

KeyDown: Herhangi bir tuşa basıldığında

KeyPress: Tuştan değer alındığında.

KeyUp: Herhangi bir tuştan çekildiğinde.

MouseDown: Sol tuşa basıldığında.

MouseUp: Çekildiğinde.

MouseMove: Hareket ettirildiğinde.

MouseEnter: Enter basıldığında

OnPoint: Formun üzerinde şekil çizimi yapılır.

OnResize: Yeniden boyutlandırıldığında.

OnShow: Form görünür hale geçerken

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

Delphide Form Özellikleri

ActiveControl: Aktif olan nesne ne olacak. Form açıldığında imlecin neyin üzerinde konumlandırılmalı.

Align:  Hizalamak için kullanılır.

AlphaBlend: Formumuzun saydamlığının olup olmadığını belirtir.

AlphaBlendValue: Saydamlık Oranı.

AutoScroll: Form Araçları formu geçtiğinde sağda yada aşağıda kaydırma çubuğunun olmasını sağlar.

AutoSize: Form üzerine koyduğumuz araçlar kadar boyutlanır.

BİDMode: Sadece arap alfabesi için kullanılan bir özellik. Hangi yöne yazılacağı belirler.

BorderIcons: Windows pencerelerinin sağ üst köşesinde bulunan kapatma tam ekran, küçültme gibi menülerin görünür olup olmadıklarını belirleme.

BorderStyle: Formumuzun çerçeve stileri.

BorderWidth: Çerçeve Kalınlığı formun.

Caption: Formun başlığının yazıldığı yer.

ClienHeight: Başlık hariç kullanılacak yükseklik.

ClienWidth: Kullanılabilir Genişlik.

Color: Formumuzun zemin rengini belirlemek için kullanılır.

Constraints: Formumuzun büyütme ve küçültme sırasında max ve min değerleri için kullanılır.

Ctl3D: Formumuzun 3 boyutlu görünmesini sağlar.

Cursor: Formumuzun üzerinde hangi işareti alsın imleç bunu belirleriz.

Enabled: Kullanılabilir. Kullanıcının herhangi bir işlem yapmamasını sağlar.

Font: Formun üzerindeki yazılarla alakalı efekt, renk, boyut gibi özellikleri

Height: Formun yüksekliği pixel cinsinden.

HelpContext: Yardım kullanılacak ise konu numarası belirlenir.

Hint: Formumuzun üzerine geldiğinde açıklama yazısı çıkması için kullanılır.

ShowHint: Yazdığımız yazının aktif olmasını için kullanılır.

İcon: Farklı bir icon seçmek için kullanılır.

Left: Formun ekranın sol kenarından ne kadar uzakta konumlandırılacağına karar verir.

Name: O aracı anma değeri, formun ismi.

Top: Formun ekrandaki konumunu belirler.

Visible: Formun görünebirliğini açma ve kapama.

Width: Formun genişliği.

WindowState: 3 tane değeri var. Pencere boyutu.

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

Delphi Değişken Kuralları

  Değişken isminin ilk karakteri mutlaka alfabe olmalıdır.

2.       Değişken sayı karakter bulundurabilir.

3.       Türkçe karakter kullanılmaz.

4.       Değişken isimleri arasında boşluk bırakılmaz.

5.       İçerisinde özel karakter kullanılmaz.

6.       Maximum 63 karakter kullanılır.

7.       Delphide saklı kelime değişken ismi olarak verilemez.

8.       O alanı ifade eden kelimeler kullanılmalı.

9.       Etiket ve prosedür ismi kullanılmaz.

Sitemizin daha kaliteli paylaşımları yapabilmesi için sizin yorumlarınıza ihtiyacımız var :)

Delphide İç İçe Kare Oluşturmak

Var
Mx,my integer
Begin
Randomize
x:= trunc ( random*form1.width);
y:= trunc ( random*form1.height);
Fori:= 10 down to do
Canvas. Rectangle(x+i*10, y+i*10,x-i*10,y-i*10);

Delphide Sin, Cos, Tan Çizimi

DELPHİ

Çizimler döngü noktalaması ile çizilmiştir, girilen dalga sayısına göre sinx cosx ve tanx dalgaları grafiklemektedir. Ayrıca çizilen dalgaların renkleri  colordialog ile seçilebilmektedir.

DELPHİ

DELPHİ

DELPHİ

DELPHİ

DELPHİ

DELPHİ

Hazırlayan: Ulaş Kılıç

                             

Delphide Dikdörtgen Yapımı

delphi

procedure TForm46.Button1Click(Sender: TObject);
begin
Canvas.MoveTo(50,50);
Canvas.LineTo(250,50);
Canvas.LineTo(250,100);
Canvas.LineTo(50,100);
Canvas.MoveTo(50,50);
Canvas.LineTo(50,100);
end;
end.

procedure TForm46.Button1Click(Sender: TObject);
var
k:TRect;
begin
k.Left:=50;
k.Top:=100;
k.Right:=150;
k.Bottom:=250;
Canvas.Rectangle(k);
end;
end.

C# da Metod ile Random Kullanma

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace WindowsFormsApplication1
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            üret();
        }
        void üret()
        {
            Random n1 = new Random();
            label1.Text = n1.Next(1, 49).ToString();
            label2.Text = n1.Next(1, 49).ToString();
            label3.Text = n1.Next(1, 49).ToString();
            label4.Text = n1.Next(1, 49).ToString();
            label5.Text = n1.Next(1, 49).ToString();
            label6.Text = n1.Next(1, 49).ToString();


        }
    }
}

C# da Try Catch ile İşlem Yapma

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace WindowsFormsApplication1
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void Form1_Load(object sender, EventArgs e)
        {

        }

        private void button1_Click(object sender, EventArgs e)
        {
            int s1, s2;
            double ort;
            try
            {
                s1 = Convert.ToInt32(textBox1.Text);
                s2 = Convert.ToInt32(textBox2.Text);
                if ((s1<0 || s1>100)||(s2<0||s2>100))
                {
                    throw new Exception();
                }
                ort = (s1 + s2) / 2.0;
                label4.Text = ort.ToString();
            }
            catch (Exception)
            {

                MessageBox.Show("0-100  arası tam sayı giriniz ");
            }
        }
    }
}