Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
begin
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('Select * from Factura');
Query1.Sql.Add('Where Total1 > '+Edit1.text);
Query1.Open;
end;
Probado y funciona perfectamente, escribo en el Tedit 300.20 por ejemplo, como es lógico si pongo una coma como separador me falla.
Un Saludo.