Hola ElDioni.
Fijate de este modo:
Código Delphi
[-]
var
Value: Boolean;
procedure TForm1.btnFiltroClick(Sender: TObject);
begin
with ClientDataSet1 do
begin
Filtered:= False;
Value:= not Value;
Filter:= 'Principal = ' + IntToStr(Integer(Value));
Filtered:= True;
end;
end;
En las pruebas funciona correctamente, mostrando alternativamente los campos verdaderos y falsos.
Saludos.