Consulta con un campo de un dbgrid

[alt126]

el problema a mi entender es que te falta el tipo de dato...lo raro es que no te de error , deberia ser asi:

CBActivo->Checked = ADOQDatos->FieldByName("Activo")->AsBoolean;

Eso suponiendo que el campo en la tabla sea tipo bool.

Si no te funciona, puedes probar esto:

if(ADOQDatos->FieldByName("Activo")->AsBoolean == true)
CBActivo->Checked = true;
else
CBActivo->Checked = false;

y asi te podria valer para un campo bool en la tabla, o integer, o texto...