Список шрифтов linux

[ronin]

Подскажите как получить список установленных шрифтов в linux, уже всю голову сломал. Пытался использовать FontDialog, но мне надо отключить стиль шрифта, в Options компонента поставил fdNoStyleSel=true но он всё равно засранец даёт выбрать стиль шрифта, поэтому решил сделать просто ComboBox для имени шрифта и edit для размера.

[WAYFARER]

Присоединяюсь к вопросу.
В Linux Screen.Fonts не канает

[alex208210]

Шрифты лежат в папке /usr/share/fonts/corefonts либо в какойто еще папке (в /usr/share/fonts/) в зависимости от тематики шрифта

Код: Выделить всё

if FindFirst('/usr/share/fonts/corefonts/*', faAnyFile, searchResult) = 0 then
  begin
   repeat
    combobox1.Items.Add(searchResult.Name);
   until FindNext(searchResult) <> 0;
FindClose(searchResult);


добавим шрифты в комбобокс а дальше разберетесь

[Mr.Smart]

http://rus-linux.net/lib.php?name=MyLDP/sys-conf/fonts.html

[ronin]

Шрифты лежат в папке /usr/share/fonts/corefonts либо в какойто еще папке (в /usr/share/fonts/) в зависимости от тематики шрифта

в том то и дело что прийдётся в таком случае скорее всего указывать вручную папку, а хочется чтобы как в FontDialog, не париться с тем какая система у пользователя стоит и где лежат шрифты, ведь в Delphi есть компонент, а тутока нету

Mr.Smart

та же история

[alex208210]

Для этого и есть findnext

в любом случае можно сделать поиск по расширению

shell(bash -c "find /usr/share/fonts/ -name *.ttf"); а вывод функции уже в комбобокс.. так вообще все шрифты добавятся.. основные находятся в corefonts

Во вложении поиск в папке и поиск всех шрифтов

[alexsa]

Можно подумать в том направлении - FontDialog их как-то получает... и выводит в Memo

[debi12345]

Проще всего перехватить STDOUT SHELL-команд:

1) "xlsfonts" - в формате X
2) "fc-list" - в формате FONTCONFIG

[ronin]

Проще всего перехватить STDOUT SHELL-команд:

как вариант, попробую, но пока остановился на варианте FontDialog, правда до сих пор не пойму почему на изменения Options вообще не реагирует о_О