COMPARA ENTRE DOIS DBEDIT EM FORMATO DE (MONEY)

Tenho uma Table em Paradox que tem os Campos (ValorLimite e
SomaTotal) Type $ Money................ “DBEditValorLimite &8221; tem o Valor FIXO e o &8220; Edit1 &8221; onde vai ser digitado os preços e o &8220; DBEditSomaTotal &8221; onde vai soma todos valores digitado no Edit1

Eu quero saber como faço para Comparar quando o (DBEditSomaTotal) for maior que (DBEditValorLimite) e da uma mensagem ........De uma olhado Abaixo................

Private

[b:f7a58da0f6]Valores:Double; //Observação
[/b:f7a58da0f6]{ procedure AppHint(Sender : TObject);}
{ Private declarations }
public
{ Public declarations }
end;

procedure Tform1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key=13 then
begin
Key:=0;
Valores:=Valores + StrToFloat(Edit1.text);
DBEditSomaTotal.Text:= FormatFloat(´0.00´,Valores);
End;
End;