[Delphi] Пробелы - Помощь студентам - Страница 2

Sazary · 09.07.2009, 18:59

Вот так измените:

Код:

listbox2.items.add(ListBox1.Items[i]+StringOfChar(' ',20-2*length(ListBox1.Items[i]))+listbox3.Items[i]);

Рамик · 09.07.2009, 19:02

Цитата:

Сообщение от Sazary

Вот так измените:

Код:

listbox2.items.add(ListBox1.Items[i]+StringOfChar(' ',20-2*length(ListBox1.Items[i]))+listbox3.Items[i]);

Во! спасибо! выравнивается конечно не очень, но намного лучше чем было!
СПАСИБО!

Sazary · 09.07.2009, 19:08

Я тестил на числовых строках - там все выравнивается довольно хорошо. А вот если с текстом, то из-за немоноширинности может скашиваться.

Можете установить для 2-го листбокса моноширинный шрифт (например, какой-нибудь Lucida Console). Тогда нужно убрать умножение на 2, т.к. все будет выравниваться как надо.

Рамик · 09.07.2009, 19:12

Цитата:

Сообщение от Sazary

Я тестил на числовых строках - там все выравнивается довольно хорошо. А вот если с текстом, то из-за немоноширинности может скашиваться.

Можете установить для 2-го листбокса моноширинный шрифт (например, какой-нибудь Lucida Console). Тогда нужно убрать умножение на 2, т.к. все будет выравниваться как надо.

спасибо!
.

09.07.2009, 18:59	#11
Sazary В тени Старожил Регистрация: 19.12.2008 Сообщений: 5,788	Вот так измените: Код: `listbox2.items.add(ListBox1.Items[i]+StringOfChar(' ',20-2length(ListBox1.Items[i]))+listbox3.Items[i]);` Вполне очевидно, чтобы что-то понять, необходимо книги читать. Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]*_____[Поиск]_____[Литература по С++]____[Литература. Паскаль]

09.07.2009, 19:08	#13
Sazary В тени Старожил Регистрация: 19.12.2008 Сообщений: 5,788	Я тестил на числовых строках - там все выравнивается довольно хорошо. А вот если с текстом, то из-за немоноширинности может скашиваться. Можете установить для 2-го листбокса моноширинный шрифт (например, какой-нибудь Lucida Console). Тогда нужно убрать умножение на 2, т.к. все будет выравниваться как надо. Вполне очевидно, чтобы что-то понять, необходимо книги читать. Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль]

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
удалить лишние пробелы со строки так чтобы между символами осталось по одному пробелу delphi	MASIK	Общие вопросы Delphi	7	22.12.2010 18:23
убрать пробелы	zetrix	Microsoft Office Excel	9	10.03.2009 10:03
Где пробелы ?!!!	Evgenijj	О форуме и сайтах клуба	4	07.03.2009 17:03
Процедура или функция, удаляющая окаймляющие пробелы в строке (Delphi)	Аццкий прогер	Помощь студентам	2	03.03.2009 04:12