Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: СУБД и Delphi/Lazarus

Подписаться Бесплатная «Серебряная» новостная рассылка . Подписчиков 699 RSS
←   Январь 2008   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31


За последние 60 дней ни разу не выходила


Сайт рассылки: http://rusfaq.ru
Открыта: 16-03-2006

Автор
Калашников О.А.

Статистика

699 подписчиков
0 за неделю
←   Все выпуски   →

RusFAQ.ru: СУБД и Delphi


Новое направление Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / СУБД и Delphi

Выпуск № 437
от 14.01.2008, 00:35

Администратор:Gh0stik
В рассылке:Подписчиков: 295, Экспертов: 32
В номере:Вопросов: 1, Ответов: 2
Нам важно Ваше мнение об этой рассылке.
Оценить этот выпуск рассылки >>

Вопрос № 117423: Вопроса два. 1. На форма есть таблица TStringGrid; По-умолчанию в каждой ячейке строка выровнена по левому краю. Как выровнять по правому, по центру? 2. Требуется перенести содержимое в текстовый файл F: TextFile но так, чтобы сохранилось выравни...

Вопрос № 117.423
Вопроса два. 1. На форма есть таблица TStringGrid; По-умолчанию в каждой ячейке строка выровнена по левому краю. Как выровнять по правому, по центру?
2. Требуется перенести содержимое в текстовый файл F: TextFile но так, чтобы сохранилось выравнивание по-столбцам. Я пытался использовать функцию Format:
Const F6: string='%11s %11s %11s %11s %11s ‘;
Var F: TextFile;
Writeln(F,Format(F6,[StrGr.Cells[0,1],StrGr.Cells[0,2],StrGr.Cells[0,3],StrGr.Cells[0,4],StrGr.Cells[0,5]);
Столбцы получаются «кривые».
Отправлен: 08.01.2008, 07:07
Вопрос задал: Шукайло В.Б. (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Selya
Здравствуйте, Шукайло В.Б.!
1.Для выравнивания текста в ячейках StringGrid обрабатывай события сетки OnDrawCell. Примерно так (см. прил.):
2.Если неизвестна длина текста в клетке, то так никогда не выровнишь. Как вариант, если разница длины текстов в клетках небольшая используй знак табуляции вместо пробела:
Const F6: string='%11s'#9'%11s'#9'%11s'#9'%11s'#9'%11s ‘;
Но не факт, что будет ровно.

Приложение:

Ответ отправил: Selya (статус: 3-ий класс)
Ответ отправлен: 08.01.2008, 10:43
Отвечает: Drbear
Здравствуйте, Шукайло В.Б.!

для выравнивание используйте OnDrawCell
а при вормирование строки вместо пробелов лучше использовать Tab (при небольшой длине строк в ячейках) либо формировать строку динамически с учетом длины, наполняя ее в цикле до нужной длины. Соответственно нужно использовать моноширные шрифты. НЕ проще сбросить в Word, Excel, html?

Приложение:

Ответ отправил: Drbear (статус: 5-ый класс)
Ответ отправлен: 08.01.2008, 10:52

Вы имеете возможность оценить этот выпуск рассылки.
Нам очень важно Ваше мнение!
Оценить этот выпуск рассылки >>

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.

© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.69 от 06.01.2008 		Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru
В избранное