Delphi'de Not Defteri Yapmak

Merhabalar,

Bugün sizlerle Delphi'de kaydetme gibi seçenekleri olan bir not defteri yapacağız.

İlk olarak formumuza 5 tane buton, 1 tane Memo1 ve 1 tane SaveDialogs ekleyelim.

Şimdi butonlarımızın ismini sırasıyla şöyle yapalım:

1.Buton: Kaydet
2.Buton: Kes
3.Buton: Kopyala
4.Buton: Yapıştır
5.Buton: Temizle

Kaydet butonumuza çift tıklayarak kod bölümüne şunları yazalım:

If SaveDialog1.Execute then Begin Memo1.Lines.SaveToFile(SaveDialog1.FileName+'.txt' ); End

Bu kodda Memo 1'e yazdığımız yazıyı text belgesi olarak istediğimiz yere kaydedecek.

Kes butonumuza çift tıklayarak kod bölümüne şunları yazalım:
Memo1.CutToClipboard

Kopyala butonumuza çift tıklayarak kod bölümüne şunları yazalım:
Memo1.CopyToClipboard

Yapıştır butonumuza çift tıklayarak kod bölümüne şunları yazalım:
Memo1.PasteFromClipboard

Temizle butonumuza çift tıklayarak kod bölümüne şunları yazalım:
Memo1.Clear

Bunları yaptıktan sonra Run bölümünden veya F9'a basarak programımızı çalıştırabiliriz.