[Delphi]Odczyt atrybutu w RichEdit1

Cześć.

Jak odczytać czy czcionka jest pogrubiona w danej linijce czy pochylona czy podkreślona ? Chodzi mi jak jestem przykładowo w linijce 5 i przechodzę do linijki 3 i tam jest tekst jakiś to w postaci instrukcji warunkowej otrzymuje wynik o użytych atrybutach na tekście w tej linijce:)

Myślałem nad takim rozwiązaniem:

if(fsBold in richedit1.SelAttributes.Style) then

No ale nie wiem jak odczytać po przejściu z linijki do linijki i nie wiem w ogóle czy to dobrze jest :)

napisałeś:

Myślałem nad takim rozwiązaniem:
if(fsBold in richedit1.SelAttributes.Style) then

co prawda mało znam strukturę z jakiej to korztysta ale według mnie ta linijka powinna wyglądać tak:

if((richedit1.SelAttributes.Style and fsBold)!=0)then pogrubiona

Kod jest zły, chyba języki programowania Ci się pomyliły :)

Proszę o dalszą pomoc :)

if (richedit1.SelAttributes.Style in [fsBold]) then ... 

lub

if (richedit1.SelAttributes.Style = [fsBold]) then ...