Rzpoznawanie koloru?

0

Jak rozpoznać kolor tekstu (zaznaczonego) w richeedit? W OnSelectionChange mam:

if richedit1.Font.Color = clBlack then
ComboBox1.ItemIndex := 0;
if richedit1.Font.Color = clBlue then
ComboBox1.ItemIndex := 1;
if richedit1.Font.Color = clRed then
ComboBox1.ItemIndex := 2;
if richedit1.Font.Color = clYellow then
ComboBox1.ItemIndex := 3;

i nie działa.

0

Może zamiast Font.Color daj SelAttributes.Color (jakoś tak)??

0

Może zamiast Font.Color daj SelAttributes.Color (jakoś tak)??

Zrobiłetak jak mówisz i Combobox jest zawsze ustwaiony na ItemIndex 3.

0

Umieść to w OnChange, a nie OnSelectionChange. Zmienia się kolor, a nie zaznaczenie.

0

OK. Już wszystko działa!! [cya] [cya]

0

Pochwalony! SelAttributes.Font poda Ci kolor, jaki ma tekst, w miejscu gdzie jest aktualnie kursor. Jeżeli będziesz zmieniał pozycje kursora w tekście, to i będzie Ci się kolor zmieniał :)

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