Jak zmienić styl fragementu tekstu

0

Mam pytanie dotyczące komponentu TMemo. W jaki sposób zrobić, żeby po wciśnięciu przycisku odpowiadającego za pogrubienie tekstu tekst był pogrubiany tylko od tego miejsca, a nie cały plik.

Mój kod:

 

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
if (SpeedButton1.Down) then
Memo1.Font.Style := Memo1.Font.Style + [fsBold]
else
Memo1.Font.Style := Memo1.Font.Style - [fsBold];
end;

0

Takie rzeczy tylko w ... RichEdit

1 użytkowników online, w tym zalogowanych: 0, gości: 1