| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Нормализация ширины столбцов в Гриде [D7, SybaseAnywhere7]
Goida © (2003-11-22 21:19:00)
Как мне пройтись по записям, сравнивая длины текста в их определенном поле. Нужно пользоваться RecNo? Или можете предложить свой вариант.
Zacho (2003-11-23 00:42:00) [1]
> Goida © (23.11.03 00:06) [8]
А что, google, yandex и т.п. отменили ? По "EhLib" находится меньше чем за минуту. Да и так догадаться можно : http://www.ehlib.com/RUS/default.htm
Goida (2003-11-23 00:06:00) [2]
А где её взять?
Zacho (2003-11-22 22:40:00) [3]
> Goida © (22.11.03 22:32) [6]
>
> Это будет делаться по запросу пользователя, как в Excel
Это - другое дело. Посмотри TDBGridEh из библиотеки EhLib (для exUSSR - бесплатная) - там это реализовано.
Goida (2003-11-22 22:32:00) [4]
> Zacho © (22.11.03 22:13) [5]
> Еще небольшой ньюанс: самая длинная строка в символах - не обязательно самая длинная в пикселях
Ну уж это я знаю :)
> А "автоматическая" установка ширины по самой длинной строке - просто жутко раздражает в реальной работе.
Это будет делаться по запросу пользователя, как в Excel.
Zacho (2003-11-22 22:13:00) [5]
Еще небольшой ньюанс: самая длинная строка в символах - не обязательно самая длинная в пикселях.
И действительно, зачем ? Imho, все что надо - запоминать ширину столбцов, установленную пользователем. А "автоматическая" установка ширины по самой длинной строке - просто жутко раздражает в реальной работе.
Goida (2003-11-22 22:00:00) [6]
>Vlad ©
>Примерно так (самому смешно такие глупости писать :))))
Тебе сейчас смешно. А когда ты этого не знал... было интересно :)
Vlad (2003-11-22 21:39:00) [7]
Примерно так (самому смешно такие глупости писать :))))
var I,L: Integer;
.....
Query1.First;
while not Query1.Eof do
begin
L:=Length(Query1.FieldByName("qqq").AsString);
if L>I then I:=L;
Query1.Next;
end;
В переменной I будет максимальная длинна значения в поле.
Однако Zacho © прав - зачем ?
Goida (2003-11-22 21:32:00) [8]
Чтобы ширину столбца подогнать под самое длинное значение, но не более. А то: "char(50)" и ничего остального уже не видно :)
Zacho (2003-11-22 21:29:00) [9]
> Goida © (22.11.03 21:19)
Нужно пользоваться TDataSet.Next Только зачем ?
| |
