Форматировать вывод на принтер

[MOV]

Есть команда Tab(<аргумент>), где аргумент - смао колмчество символов табуляции.
Но объект Printer в методе print ee не "ест"
вот если просто на форме писать принтом
типа

Код: Выделить всё

print "123"; tab(10); "456"

, то все нормально

а вот если на принтер:

Код: Выделить всё

Printer.print "123"; tab(10); "456"

, то он ругается на Tab
команда очень удобная для форматирования строки, может попробовать заменить ее через CHR (но забыл код Tab-а). А юзать свойство CurrentX, можно, кончено, но получается некрасиво.

[Arcanoid]

Код таба - 8 или 9

[alibek]

Arcanoid, а причем тут vbTab?

MOV, ну напиши свою функцию SpacePad, которая будет заполнять пробелами недостающие позиции (Mid$(Pad, 1, Len(Text)) = Text).

[MOV]

Нет. Решил юзать CurrentX - так все-таки точнее и надежнее, а полей немного в таблице - 9 штук, так что не проблема. А форматировать текст пробелами (у меня в ворде то невсегда нормально получается, табами все-таки как-то лучше).

Правда появилась по ходу еще одна проблема:
пытаясь рисовать вертикальные линии на листе все сбивается и получается на перекосяк. (горизонтальные линии рисуются нормально). Перехлестов вроде нигде нет.
Все. Разобрался. Спасибо. (просто запутался в координатах)

[alibek]

А по твоему, что делает функция Tab()? Она пробелами и дополняет.

[MOV]

Просто насколько помню, есть шрифты TrueType, а есть какие-то другие (не помню как называются), и отличаются они тем, что у одного буквы фиксированной ширины, а у другого разной, поэтому пробелами невсегда можно выровнять текст, а вот табом всегда.
Насчет шрифтов, думаю, ты конечно знаешь и не мне тебе говорить. Но пробел это пробел у него фиксированная ширина. А таб - это х.з. что (хотя можно сказать, что у него она тоже const и равна опр. числу пробелов, но в том же ворде ширину табуляции можно регулировать по точкам, если помнишь (формат/абзац/отступ слева (мм)))