Separador de decimales delphi Vs Excel

[Manuel]

Hola amigos del foro tengo el siguiente problema, espero que me puedan ayudar, primero que trabajo Delphi 5.0, interbase 6.0.

Resulta que tengo una tabla con los siguientes datos:

Sueldo Double
Mov1 Double
Mov2 Double
Mov3 Double

Le doy el siguiente formato a los campos Displayformat='###,###,###', mi configuración regional es separador decimal = ',' y separador de miles = '.' ahora en la grilla en los valores me los formatea bien 500.000 (Quinientos mil), pero al exportarlo a excel me toma las comas del displayformat como sepador decimal, segun la configuración regional. por lo tanto los quienientos mil me los da como 500, que podría hacer para excel me respeta el formato que me sale en mi aplicación?. Gracias por su ayuda.

[acertij022]

Manuel hace un tiempo tuve el mismo problema y lo que hago es averiguar como esta seteado el sistema, lo que me resulto mas rapido es usar try except

Código Delphi [-]
function coma():char;
var
coma:char;
double1:double;
begin
    try
    double1 := strtofloat('1.1');
    Result := '.';
    except
    Result := ',';
    end;
end;

una ves que sabes como esta setado el sistema convertis los double a string con el formato correcto y este lo mandas al excel y lo mejor es no depender de el excel ¡¡te imaginas si el cliente tiene instalado OpenOffice!!

te adjunto un pas para crear el archivo excel sin depender de otra aplicacion

[acertij022]

aqui esta el pas

[Manuel]

Gracias por tu ayuda, lo probaré.