Hola foetus, tendrias que tener una variable donde almacenar el nombre del campo por el cual quieres hacer la busqueda y despues lo concatenas.
Código Delphi
[-]
Var
campo:String;
begin
Case ComboBox1.ItemIndex of
0:campo:='fecha';
1:campo:='id';
2:campo:='nombre';
end;
........
Query1.Sql.Text:='Select * from ORDENES Where '+campo+'=' +Edit1.Text;
........
Saludos