Wybór czcionek - RichEdit

Witam, jak zrobić listę z czcionkami do wyboru do mojego edytora tekstu ?

Witam, listę zainstalowanych w systemie czcionek można pobrać z Screen.Fonts w następujący sposób: // Ładowanie czcionek ComboBox1.Items := Screen.Fonts;

Noo tak, ale jak zrobić to żebym po wyborze czcionki uaktywnił to w RichEdit.. ? Żeby to coś dawało :P

Chodzi Ci o przypisywanie krroju czcionki do zaznaczonego tekstu? RichEdit1.SelAttributes.Name := ComboBox1.Items[ComboBox1.ItemIndex];

Nie działa, jak klikam na liste do rozwijania czcionek to automatycznie odznacza sie zaznaczony tekst, i jak chce pisac po tej niby formatce to jest czcionka jak byla. Zreszta zobacz o co mi chodzi, po co mi ta czcionka. na moim serwisie jest Diavana 1.2 , ustaw czcionke na 22, nie ma wygładzania zadnego...

Po pierwsze - zaznacz komponent RichEdit1 i w Inspektorze Obiektów zmień właściwość HideSelection na False, co powinno zapobiec ukrywaniu zaznaczenia przez komponent. Po drugie, w programie, który umieściłeś na Rapidshare nie ma listy rozwijanych czcionek (zamieściłeś poprzednią wersje?). Po trzecie czcionka Sans Serif (domyślna w XP) tak ma, że jej rozmiar zmienia się okresowo - zauważyłem to i nie umiem tego wyjaśnić. Spróbuj teraz. Podany powyżej kod musi działać (sprawdzałem go jeszcze raz i bezproblemowo zmienia krój tekstu).

We wczesniejszej wersji chcialem zebys sprawdzil jak sie litery znieksztalcaja. :) Wroce do domu to sprobuje

Nie dziala... wszystko niby gra, tekst sie nie odznacza, ale jak wybieram czcionke to.. no wlasnie, nic. Nic sie nie dzieje. Wysylam kod zrodlowy na maila :)