PHP DM Gate v0.9 » Как отловить изменение ReadOnly у TEdit ?

Prohodil Mimo © (15.02.08 15:56) [0]

Есть компонент, наследник от TEdit.
Как можно определить, что у него изменили ReadOnly? Какое сообщение отлавливать?
Нужно для того, что бы во время изменения ReadOnly выставлять Color в соответствующий цвет.

<Цитата>
Palladin © (15.02.08 16:18) [1]

так, а исходники просмотреть?
мне вот буквально 4 минуты понадобилось отрыть StdCtrls и увидеть
procedure TCustomEdit.SetReadOnly(Value: Boolean);
begin
if FReadOnly <> Value then
begin
FReadOnly := Value;
if HandleAllocated then
SendMessage(Handle, EM_SETREADONLY, Ord(Value), 0);
end;
end;

<Цитата>
Сергей М. © (15.02.08 16:55) [2]

см. TAction.OnUpdate

<Цитата>