( |
|
|
|||
Converts unicode string to specified codepage |
Parameters: | |
Name of the codepage to use on the conversion | |
Unicode string to be converted | |
procedure Add_STR(var Array Integer aArray,var Integer aCount,string s) begin if (NonBlank(s)) then begin Add_CHR(aArray,aCount,ConvertStringToCodePage("CP437",s)); end else begin Add_CHR(aArray,aCount,"_"); end; return; end;
Related topics: |