Es gibt doch in Delphi diese 'Dual List box "Datei->Neu->Ander->Formulare" (jedenfalls bei D6)
Also, links sind alle Felder der Tabelle in einer Listbox. Rechts die ausgewählten.
Man hat 4 Knöpfe : '<<','<', >>' und '>'
'>>' verschiebt alle Einträge von links nach rechts. '<<' macht das Gleiche, nur umgekehrt.
'>' verschiebt den links selektierten Eintrag von links nach rechts '<' nach links.
Dann iterierst (For i:=...) Du durch die rechte Listbox und baust Dir so deine
Query auf.