[Delphi] SynEdit - znaczniki ujmowanie zaznaczonego tekstu w znaczniki

Napisałem coś takiego:
if (Zakladki.ActivePage.Controls[0] as TSynEdit).SelLength = 0 then (Zakladki.ActivePage.Controls[0] as TSynEdit).SelText := '<i></i>' else begin (Zakladki.ActivePage.Controls[0] as TSynEdit).SelStart := '<i>'; (Zakladki.ActivePage.Controls[0] as TSynEdit).SelEnd := '</i>'; end; (Zakladki.ActivePage.Controls[0] as TSynEdit).Modified := True;

Jest to procedura dodająca do kontrolki SynEdita znacznik <i>. Nie wiem jednak jak zmusić całość do działania - SelStart i SelEnd to parametry typu Integer, więc to na pewno nie je powinienem wybrać. Zatem na co je zmienić? :>

Próbowałem też
(Zakladki.ActivePage.Controls[0] as TSynEdit).SelText((Zakladki.ActivePage.Controls[0] as TSynEdit).SelStart) := '<i>'; (Zakladki.ActivePage.Controls[0] as TSynEdit).SelText((Zakladki.ActivePage.Controls[0] as TSynEdit).SelEnd) := '</i>';
ale również nie działa. :mad2:

---

Napisałem coś takiego:
if (Zakladki.ActivePage.Controls[0] as TSynEdit).SelLength = 0 then (Zakladki.ActivePage.Controls[0] as TSynEdit).SelText := '<i></i>' else begin (Zakladki.ActivePage.Controls[0] as TSynEdit).SelStart := '<i>'; (Zakladki.ActivePage.Controls[0] as TSynEdit).SelEnd := '</i>'; end; (Zakladki.ActivePage.Controls[0] as TSynEdit).Modified := True;

Jest to procedura dodająca do kontrolki SynEdita znacznik <i>. Nie wiem jednak jak zmusić całość do działania - SelStart i SelEnd to parametry typu Integer, więc to na pewno nie je powinienem wybrać. Zatem na co je zmienić? :>

Próbowałem też
(Zakladki.ActivePage.Controls[0] as TSynEdit).SelText((Zakladki.ActivePage.Controls[0] as TSynEdit).SelStart) := '<i>'; (Zakladki.ActivePage.Controls[0] as TSynEdit).SelText((Zakladki.ActivePage.Controls[0] as TSynEdit).SelEnd) := '</i>';
ale również nie działa. :mad2:
Może bym Ci pomógł jakbym wiedział o co Tobie chodzi. Z tego co napisałeś nic nie rozumiem. Co chcesz aby ten kod, który zamierzasz napisać robił?

jeżeli chodzi Ci o to aby zaznaczony tekst dać pomiędzy <i> oraz </i> to napisz tak:
(Zakladki.ActivePage.Controls[0] as TSynEdit).SelText := '<i>' + (Zakladki.ActivePage.Controls[0] as TSynEdit).SelText + '</i>';
a jeżeli nie to napisz o co dokładnie chodzi :)

Dokładnie o to mi szło - wielkie dzięki. ;)

zanotowane.pl

doc.pisz.pl

pdf.pisz.pl

zsf.htw.pl