Hi alle zusammen !
ich will in meinem RichEdit-Texteditor die schriftart über eine combobox regeln(geht auch) und, wenn kein text markiert ist, die schriftart als
standart für die Rich übernehmen (also für den text, der erst geschrieben wird) -> mein problem besteht darin, dass die gesamte Rich dann nach dieser Schriftart formatiert (ich hoffe man kann mir folgen).
Mein Versuch:
Delphi-Quellcode:
FUNCTION TEditor.TextFont: TTextAttributes;
begin
begin
if Rich.SelLength > 0 then Result := Rich.SelAttributes
else Result := Rich.DefAttributes;
end;
end;
TextFont.Name:= Combobox.Text;{Schriftart}
THX für eure Vorschläge!