Question Hi Brian,
As a follow up on the RtoC function you kindly provided - it works fine in limiting the decimal places but it puts in a thousands seperator when the number exceeds 999. This is something that I don't want to happen. Can this be fixed?
The original message indicated that you wanted the thousands seperator:
If you don't want the thousands seperators, then you have to change the function.
I've got a different function for that (RtoS instead of RtoC).
function RtoS(Source: Double; S,D: integer): string;
Var TStr: string;
The only thing different is the name of the function, and the type specifier ('f' instead of 'n')
Designing and implementing DOS, DPMI, and Windows apps in TP, BP, and Delphi (Windows VCL, Custom Controls, Runtime UI design, Windows API, Database, SQL, Threading, Btrieve, Pervasive.SQL, Advantage Database, ADO to MDB, ADO to MS SQL, MDI Apps, MS Office Integration, barcode generation, Document imaging application development, TIFF file structure, and some IFF file experience).
Education/Credentials Over 20 years designing and implementing DOS, DPMI, and Windows apps in TP, BP, and Delphi.