Si nos dices que error es el que te da, podríamos darte una idea... pero así adivianando cuál es el error pues no se me ocurre nada.
Código Delphi
[-]
with ADOQuery1 do begin
If active then close;
SQL.Clear;
SQL.Add('Select *');
SQL.Add('From Ordenes');
SQL.Add('Where '+ComboBox1.Text+' = :Valor');
ParamByName('Valor').AsString := TuEdit.Text;
Open;
.......
end;