Форум: "Основная";
Текущий архив: 2002.11.04;
Скачать: [xml.tar.bz2];
Вниз
Format() Найти похожие ветки
← →
XStr (2002-10-24 12:35) [0]Уважаемые Мастера!
Что нужно изменить в коде:
while not dm.tb_mov.Eof do
begin
st:=Format("%d %-64s %-3s %-3s",[Num,Name.Text,Kolvo.Text,Zena.Text]);
writeln(f,"",st);
Num:=Num+1;
dm.tb_mov.Next;
end
чтобы данные отображались в нормальном табличном виде.
Вот что получается:
№№ Название Кол-во Цена
001 Мак 3 станок 4 400,00
002 Ван Мен Шоу т.в.100мл спрей 2 700,00
003 Кинг т.в. 100мл 1 201,00
004 Жадор т.в.30мл 1 300,00
005 Фаренгейт т.в. 50мл 1 400,00
Вот что нужно:
№№ Название Кол-во Цена
001 Мак 3 станок 4 400,00
002 Ван Мен Шоу т.в.100мл спрей 2 700,00
003 Кинг т.в. 100мл 1 201,00
004 Жадор 1 300,00
005 Фаренгейт т.в. 1 400,00
Cgfcb,j
← →
XStr (2002-10-24 15:18) [1]Короче, нужно чтобы строковый размер поля имел фиксированный размер("Название" - 64 символа(включая возможные пробелы),
аналогично поля "Кол-во" и "Цена".
Спасибо!
← →
Рыжик (2002-10-24 15:37) [2]Использовать шрифт, в котором все буквы и символы одинаковой ширины. Например, какой-нибудь Courier New
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.11.04;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c
