Вывод таблицы чисел в TMemo

← →
LordOfRock © (2005-12-06 09:59) [0]

Привет Мастера!

У меня есть таблича чисел, сохранённая в массиве.
Мне надо вывести её в TMemo, но что бы были точные разделения на столбцы.
Т.е. вместо такой штуки:
1 2 6 11 12 6 145 145 567

была такая:
1 2 6 11 12 3 145 145 567

Я понимаю, что копать нужно в строрну функции Format, но так и не понял как ей пользоваться. В хелпе тоже ничего не понял.
Поможете?

← →
Anatoly Podgoretsky © (2005-12-06 10:11) [1]

Неправильно понимаешь, копать надо в сторону ТАБ и установку табулостопов.

← →
Drakosha © (2005-12-06 10:48) [2]

в школе ещё на паскале выкручивались так:
создаешь строку типа
"_abc_abc_abc_" и заменяешь по ходу :
одноразрядное число abc на 1пробелпробел
двухразрядное 12пробел
трёх- 123
ну думаю смысл понятен...реализацый может быть куча :)

← →
Leonid Troyanovsky © (2005-12-06 11:12) [3]

> LordOfRock © (06.12.05 09:59)

> У меня есть таблича чисел, сохранённая в массиве.
> Мне надо вывести её в TMemo, но что бы были точные разделения
> на столбцы.

Лучше посмотреть в сторону TStringGrid, TDrawGrid, оформление
которых можно сделать и без сетки.

Если редактирование массива ориентирована на строку, то
можно взять TListBox с табулостопами (стиль LBS_USETABSTOPS)
или ownerdraw listbox with DrawText DT_EXPANDTABS.

Например,

http://groups.google.com/group/fido7.ru.delphi/msg/d783b0682a302c14

--
Regards, LVT.

← →
LordOfRock © (2005-12-06 16:47) [4]

Leonid Troyanovsky © (06.12.05 11:12) [3]

Спасибо. Будем копаться.

Anatoly Podgoretsky © (06.12.05 10:11) [1]

А поподробней можно? Пробовал вместо пробела между числами вставлять
CHR(KEY_TAB)
Вместо табуляции TMemo отображает жирую вертикальную черту.

А желательно чтобы был всё-таки TMemo. Потоу что нужно, что бы можно было выделить-скопировать полученную таблицу как оычный текст.

> OfRock © (06.12.05 16:47) [4]

> Пробовал вместо пробела между числами вставлять CHR(KEY_TAB)

Chr(vk_tab), т.е. #9.
И Ctrl+Tab (если WantTabs = False).

Например

Memo1.Lines.Add("12"#9"34");
Memo1.Lines.Add("5678"#9"90");

--
Regards, LVT.

Вывод таблицы чисел в TMemo Найти похожие ветки