Hola:
En el DataSet que alimenta el DBGrid, FielEditor, seleccionas el campo que quieres que tenga solo dos decimales, y en la propiedad DisplayFormat pones una mascara así #,###,##0.00
Esto otro funciona con los edits pero no se con DBEdit, puedes probar:
En el evento OnKeyPres pones esto
Código Delphi
[-]
procedure TFPrueba.EDosKeyPress(Sender: TObject; var Key: Char);
var
i: integer;
begin
DecimalSeparator := ',';
if ( StrScan('0123456789.'+chr(7)+chr(8), Key) = nil ) then Key := #0;
if key = '.' then key := ',';
for i := 1 to length(EDos.Text) do
if ( copy(EDos.Text,i,1) = ',' ) and not ( StrScan(',', Key) = nil ) then Key := #0;
end;