Decimales en una consulta (TQUERY ) a paradox

[marcoszorrilla]

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.