Color of editors in QBE mode

[capo]

Pls. i use Express DBEditors 4 with DOA,
and when i enter in qbe mode dbeditors don't
change background colour.
But thing works just fine when I use standard
dbeditors.

Does someone have some similar expiriences and tips how to resolve this problem.

 

[Marco Kalter]

You will need to use the BeforeQBE and AfterQBE events to set the appearance of non-standard controls.

 

[capo]

Problem is when you have data module with data sources, and these data sources are used in many forms. This solution is hard to implement.
Is there a way to implement AfterQBE and Before QBE in form where is needed QBE,
and leave datasources in central data module?

 

[Marco Kalter]

You will have to check all controls of the application, and set its color if it is connected to this dataset:

for i := 0 to ApplicationComponentCount - 1 do
    if ApplicationComponents(i) is TSomeControl and
       TSomeControl(ApplicationComponents(i)).DataSource.DataSet = ThisDataSet then
  // and so on