Советы по Delphi




Как показать число, разделив каждые три цифры запятыми?


Олег Кулабухов отвечает на вопрос:

    procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
i := 12345678;
Memo1.Lines.Add(FormatFloat('#,', i));
end;

[001854]




Содержание  Назад  Вперед