Agregar Varios campos en la sentencia SELECT

[[Lepe]]

Pues no, lo que si será complejo es crear las cajas en el rave

Código Delphi [-]

var strSelect : TstringList;
begin
 if checkbox1.checked then
    strselect.add('campo1');
 if checkbox2.checked then
    strselect.add('campo2');
 if checkbox3.checked then
    strselect.add('campo3');

query1.sql.text := ' select ' + strselect.commatext + ' from tabla';
query1.open;

Saludos