On-line: гостей 2. Всего: 2 [подробнее..]
АвторСообщение



Пост N: 25
Зарегистрирован: 22.04.15
ссылка на сообщение  Отправлено: 16.05.19 05:12. Заголовок: NoSetFocus


Требуется в элементах ListBox, Grid, короче в списках и т.д. ввести режим только просмотра без курсора, но с возможностью прокручивания элементов в списке, добавить и обозвать к примеру NOSETFOCUS or MODEREADING or как-нибудь, конечно можно пограммно сделать, но лишние телодвижения )

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 5 [только новые]





Пост N: 26
Зарегистрирован: 22.04.15
ссылка на сообщение  Отправлено: 16.05.19 06:12. Заголовок: Также начальная уста..


Также начальная установка SET FONT на LISTBOX не действует, приходится прописывать в LISTBOX свойство FONT <> SIZE <>

Спасибо: 0 
ПрофильЦитата Ответить



Пост N: 27
Зарегистрирован: 22.04.15
ссылка на сообщение  Отправлено: 16.05.19 07:01. Заголовок: Также почему разница..


Также почему разница межстрокового интервала GRID и LISTBOX ? в LISTBOX интервал низкий. такое чувство что строки липнут друг к другу ? Где указать интервалы ?

Спасибо: 0 
ПрофильЦитата Ответить
moderator


Пост N: 1258
Зарегистрирован: 06.07.06
ссылка на сообщение  Отправлено: 16.05.19 09:18. Заголовок: Это вы о чем? Если о..


Это вы о чем?
Если о какой-либо из GUI библиотек, то вам - в раздел GUI, причем желательно указать, о какой именно библиотеке идет речь.

Спасибо: 0 
ПрофильЦитата Ответить



Пост N: 2556
Зарегистрирован: 17.02.12
ссылка на сообщение  Отправлено: 16.05.19 09:22. Заголовок: Новичок пишет Также ..


Новичок пишет
 цитата:
Также начальная установка SET FONT на LISTBOX не действует, приходится прописывать в LISTBOX свойство FONT <> SIZE <>


Если глянете исходники контролов, то везде будут строки (практичеси всегда в начале кода)
 
IF ( FontHandle := GetFontHandle( FontName ) ) != 0
GetFontParamByRef( FontHandle, @FontName, @FontSize, @bold, @italic, @underline, @strikeout )
ENDIF

Т.е. в основе лежит регистрация фонтов и дальнейшая работа по имени регистрации фонта, все остальное вторично.
Надо делать команды
 
#command DEFINE FONT <name> ;
FONTNAME <fontname> ;
[ SIZE <fontsize> ] ;
[ <bold : BOLD> ] ;
[ <italic : ITALIC> ] ;
[ <underline : UNDERLINE> ] ;
[ <strikeout : STRIKEOUT> ] ;
[ CHARSET <charset> ] ;
[ ANGLE <Angle> ] ;
[ <default : DEFAULT> ] ;
=> ;
...

используя параметр DEFAULT для установки фонта по умолчанию вместо SET FONT
<name> используете в FONT ...

Высота строк в GRID, LISTBOX берется от фонта, в GRID\BROWSE можно исп. bmp в строке большего размера, высота будет по ней. Использовал пустую bmp. Так было раньше, за изменениями по данным контролам не слежу, перестал использовать.

Спасибо: 0 
ПрофильЦитата Ответить



Пост N: 2557
Зарегистрирован: 17.02.12
ссылка на сообщение  Отправлено: 16.05.19 09:41. Заголовок: PS сделал в примере ..


PS
сделал в примере BASIC\ListBox\demo1.prg
SET FONT TO 'Arial', 16
Его подхватил ListBox, так что берет по Default

Спасибо: 0 
ПрофильЦитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 355
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет