Ver Mensaje Individual
  #2  
Antiguo 19-04-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola river_1.
Cita:
...se pensaria que la configuracion regional del equipo estuviera en otro pais diferente a Mexico que es la que yo ocupo pero todo esta configurado bien
Sin embargo tiene toda la pinta de ser por la configuración regional... Podes comprobar que país (abreviatura) y separador decimal tiene configurado el S.O. del equipo:
Código Delphi [-]
...
function GetLocaleInformation(lcType : LCTYPE) : string;
var
  buffer  : PChar;
  cchData : Integer;
begin
  cchData := GetLocaleInfo(LOCALE_SYSTEM_DEFAULT, lcType, 0, 0);
  GetMem(buffer, cchData);
  try
    Result:='';
    if GetLocaleInfo(LOCALE_SYSTEM_DEFAULT, lcType, buffer, cchData) > 0 then
      Result := buffer;
  finally
    FreeMem(buffer);
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage('País: ' + GetLocaleInformation(LOCALE_SABBREVCTRYNAME)+#10+
              'Separador decimal: '+GetLocaleInformation(LOCALE_SDECIMAL));
end;
...
Cita:
Con mi cliente los DBedit y los valores numericos del grid aparecen asi 45,50 cuando deberia de ser asi 45.50
Aunque no es aconsejable, si queres que siempre el separador decimal sea el punto, independientemente de la configuración regional, al inicio de tu aplicación podes hacer:
Código Delphi [-]
  Application.UpdateFormatSettings := False;
  DecimalSeparator := '.';

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita