Dann brauchst Du doch im Grunde nur noch eine Funktion, die Dir aus 3 Boolean-Variablen einen entsprechend aufbereiteten String bastelt. Den fügst Du dann der ListBox hinzu.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
a, b, c: Boolean;
begin
for a := false to true do
for b := false to true do
for c := false to true do
ListBox1.Items.Add(MultiBoolToStr(a, b, c));
end;
D.h., MultiBoolToStr nimmt 3 Booleans entgegen und macht daraus z.B. "True, False, False". Du musst sie nur noch schreiben