[Reports] Checkbox how to

Hi,
Back with more question on reports


I have a BIT field in SQL which I am able to view in Report Module as 1/0 or True/False using the inbuilt formatting . See example.
 

I am uanble to figure how to use the checkbox object to show the item as a checkbox , whenever I mess with settings of checkbox I get blank item

1. I have tried mapping the item in settings . See example 
 
2. I have tried using script made by chatgpt , but no avail

Script
procedure CheckBox1OnBeforePrint(Sender: TfrxComponent);
begin    
    CheckBox1.Checked := <ADOQuery1."imp"> = True;
end;  

begin
end.

procedure CheckBox1OnBeforePrint(Sender: TfrxComponent);
begin
  if <ADOQuery1."imp"> = 1 then
    CheckBox1.Checked := True
  else
    CheckBox1.Checked := False;
end;  

begin
end.      
 

imp field has bit type and not integer

You are comparing bit to integer
try converting it first

CAST(imp AS int) AS Int_Column

This one works absolutely fine

procedure CheckBox1OnBeforePrint(Sender: TfrxComponent);
begin
  if <ADOQuery."UnitPrice">>12 then CheckBox1.Checked:=true
  else CheckBox1.Checked:=false 
end;

HI Mike,

I converted to integer, Thank you I was able to get this to work with your code. 

I was also able to get the result from using Expression . See below

 
 

OK another finding , even if the value is 'BIT'

I am able to use the expression field with <ADOQuery1."imp">='True' and it's working with code as well

procedure CheckBox1OnBeforePrint(Sender: TfrxComponent);
begin  
if <ADOQuery1."imp">='True' then    
CheckBox1.Checked := True  
else    
CheckBox1.Checked := False;
end;    

begin end.