DBRichView and TabStop

Return to index

Author

Message

Pierre Rougier

Posted: 02/18/2002 15:44:58

Hi,

DBRichView and TabStop don't seen working  for me.

Ceate a new project.

Put 2 DBMemo and 2 DBRichView on the Form.

Set one DBMemo with TabStop := True the other at False.

Set one DBRichView with TabStop := True the other at False.

Write the folowing code :

procedure TForm1.DBMemo1Enter(Sender: TObject);

begin

   TDBMemo(Sender).Color := clYellow;

end;

procedure TForm1.DBMemo1Exit(Sender: TObject);

begin

   TDBMemo(Sender).Color := clWindow;

end;

Assign this events at all the DBMemo and DBRichView.

Run the program.

If you use the Tab button then :

Focus stop on one DBMemo but on all DBRichView.

Regards.

Pierre Rougier