donjuanhose81
19.Mart.2015, 22:07
Merhaba arkadaşlar,
Öncelikle formumuza bir buton , RichEdit ve FontDialog koyuyoruz:
Components pallete(veya Tools pallete)->Standart->TButton
Components pallete(veya Tools pallete)->Win32->TRichEdit
Components pallete(veya Tools pallete)->Dialogs->TFontDialog
Sonra butona 2 kez tıklayıp şu kodu yazın:
if FontDialog1.Execute then
RichEdit1.Font := FontDialog1.Font;
Butona tıklandığında "Font seçimi" penceresi açılacak ve hangi font seçildiyse yazı kutusunun fontu o olacak.
Kolay gelsin
Öncelikle formumuza bir buton , RichEdit ve FontDialog koyuyoruz:
Components pallete(veya Tools pallete)->Standart->TButton
Components pallete(veya Tools pallete)->Win32->TRichEdit
Components pallete(veya Tools pallete)->Dialogs->TFontDialog
Sonra butona 2 kez tıklayıp şu kodu yazın:
if FontDialog1.Execute then
RichEdit1.Font := FontDialog1.Font;
Butona tıklandığında "Font seçimi" penceresi açılacak ve hangi font seçildiyse yazı kutusunun fontu o olacak.
Kolay gelsin