zmiana stylu pisania

0

Chciałbym, aby w jakimś stringu znalazł się tekst np:
informmacja. Jak to zrobić te pogrubienie używając kodu??

0

Nie da sie tego zrobic w stringu, co najwyzej w RichEdit, sluzy do tego SelAttributes

0

RichEdit1.Text := 'informacja';
RichEdit1.SelStart := 5;
RichEdit1.SelLength := 5;
RichEdit1.SelAttributes.Style := [fsBold];

0

A jak mógłbym zrobić,
RichEdit1.Text:='informacja'+#13+'cosinnegho';
aby w każdym wyrazie pogrubione były 4 ostatnie litery.

0

Powyzszy przyklad i troche matematyki.

0

Niestety ale powyższy kod pogrubia mi tylko pierwszy wyraz,

0

Oczywiście - bo :

RichEdit1.SelStart := x ustawiua początek zaznaczenia na 5tej pozycji w stringu...

RichEdit1.SelLength := y - ustawia długość zaznaczenia... od SelStart
RichEdit1.SelAttributes.Style := [z] - ustawia atrybuty dla zaznaczonego tekstu..

Zatem jeśli coś ma być pogrubione, ale oddzielone byś musiał pierw zaznaczyć jedno - ustawić styl, później drugie - ustawić.. itd..

0

Teraz jeszcze mam inne pytanie:
Mam jeden składnik RichEdit, dwa przyciski i w tym RichEdit w zależności w który przycisk klikneliśym pojawia się jakiś tekst.
Po naciśnięciu pierwszego wstawiam kod:

tekst.Font.Style:=[fsBold];

I teraz chciałbym, aby po kliknięciui drugiego przyciska, tekst był pisany normalnie, tzn. zwykłym tekstem a nie pogrubionym.

tekst.Font.Style:=[]

Takie coś niestety nie działa

0

RichEdit1.SelAttributes.Style := RichEdit1.SelAttributes.Style - [fsBold]

0

Albo jeśli chcesz zdjąć wszystkie style to jest chyba takie coś jak fsNone...

0

Niestety nie ma takiego czegoś jak fsnone. Także myślałem, że takie coś istnieje, ale widać nie ma tego :(

0

Hmm u mnie działa richedit1.SelAttributes.style := [];

0

wszystko jest pod F1 i w demosach delphiego
trudno zajrzec?

0

Albo jeśli chcesz zdjąć wszystkie style to jest chyba takie coś jak fsNone...

RichEdit1.SelAttributes.Style:=[];

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