Separar cantidad en miles al imprimir

[Casimiro Noteví]

Pues puedes hacer antes un bucle recorriendo las líneas y transformándolas, algo parecido a esto:

Código Delphi [-]
var
  iX : integer;
  cTmp : string;
begin
  for iX:=0 to memo.lines.count -1 do
  begin
    cTmp := memo.lines[iX];
    cTmp := FormatFloat('#.##0', StrToFloat(cTmp));
    memo.Lines[iX] := cTmp;
  end;
end;

Así tendrás todas las líneas formateadas con la máscara que le pongas.

*** Lo he hecho de memoria, no lo he probado en delphi.