• Web sitemizin içeriğine ve tüm hizmetlerimize erişim sağlamak için Web sitemize kayıt olmalı ya da giriş yapmalısınız. Web sitemize üye olmak tamamen ücretsizdir.
  • Sohbetokey.com ile canlı okey oynamaya ne dersin? Hem sohbet et, hem mobil okey oyna!
  • Soru mu? Sorun mu? ''Bir Sorum Var?'' sistemimiz aktiftir. Paylaşın beraber çözüm üretelim.

Delphi'de Not Defteri Yapmak

Üyelik Tarihi
7 Ocak 2015
Konular
4,091
Mesajlar
4,274
MFC Puanı
40
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.
 
Üst