Llamar a una funcion almacenandola en una variable

[Jonnathan]

Hola Papulo, puedes declarar todas las sentencias SQL en constantes y a la hora de llamarlas usas una función donde pases un parámetro para saber cual "Select" invocar. Mas o menos así:

Código Delphi [-]
const
SelectA = 'Select * From TablaA';
SelectB = 'Select * From TablaB';
SelectC = 'Select * From TablaC';

function BuscarSelect(MiSelect: Char): String;

implementation

function BuscarSelect(Status: Char): String;
begin
     case Status of
     A: BuscarSelect := SelectA;
     B: BuscarSelect := SelectB;
     C: BuscarSelect := SelectC;
     end;
end;
...
//LA USARIAS ASI:
BuscarSelect('A');

Si lo que deseas es usar un "Select" para la misma tabla que solo cambie el filtro, hace puedes hacer esto:

Código Delphi [-]
const
sSelect = 'Select * From MiTabla where Status=%s';
...
//PARA USAR EL SELECT O ASIGNARLO A ALGUN QUERY HACES ESTO
MiQuery.SQL.Text := Format(sSelect, [Status]);

La función Format() reemplazará el "%s" por el caracter de Status que quieras usar. Espero haberte ayudado, saludos.