Can Not Control TDBEdit->ReadOnly?


Could any gurus follow below and suggest? Delphi4 has no such problem
while BCB5 does.

Thank you in advance!

Add a TButton to the main form.
Add a TDatabase, TTable, TDataSource, TDBEdit and link them properly and
open them all.
Add the OnEnter event handler for TDBEdit:

void __fastcall TForm1::DBEdit1Enter(TObject *Sender)


When the program is running, click Button1 and DBEdit1 back and forth
for several time. When DBEdit1 becomes yellow, I can still change the
value in DBEdit1! This is weird! Also, when I go back from DBEdit1 to
Button1, error message happens:

"Table1 not in edit or insert mode."