Tam Mcerrorun dediğini sorcaktım ben de :)

arkadaşlar 2 gündür araştırıyorum bulamadım :( lütfen memo da font diolog nasıl kullanılır... blee kullanıorum hata verior çalışmıor... fontdialog1. Execute;memo1. selattributes. assign(fontdialog1. font);

vb olsaydı el atardım ama bilgim yok.. Bundan sonra sadece insan olanlarla muhattap olacağım.. Ona gre karşıma gelin...

procedure TForm1. Image1Click ;beginfontdialog1. Execute;memo1. Font. Name:=fontdialog1. font. Name;memo1. Font. size:=fontdialog1. font. size;memo1. Font. style:=fontdialog1. font. style;memo1. Font. color:=fontdialog1. font. color;buldum ertan teşekküredirm genede uzun oldu ama uğraştım çıktı sonunda... belki bazı arkadaşlara gerekli olur dieee veriyorum...

Onu şle yaparsan daha doğru olur kardes. if fontdialog1. Execute thenbegin memo1. Font. Name:=fontdialog1. font. Name; memo1. Font. size:=fontdialog1. font. size; memo1. Font. style:=fontdialog1. font. style; memo1. Font. color:=fontdialog1. font. color; end;if ile begin end bloguna almassan fontdialog açıldıgında cancel düğmesine tıklama yapıldığında hata olabilir. Doğru kullanımı bu. www.Tahribat.com