Foxter.ru - Дельфи (Вопросы)

Страница 1 из 3

Показывать 40 сообщений этой темы на одной странице

Foxter.ru (https://www.foxter.ru/index.php)

- Программирование (https://www.foxter.ru/forumdisplay.php?f=60)

- - Дельфи (Вопросы) (https://www.foxter.ru/showthread.php?t=1105)

Foxter

02.02.2006 18:34

Дельфи (Вопросы)

Кто знает можно как-нить сделать так, чтобы прога отрисовывала моим шрифтом текст в самой себе?
То есть шрифта у юзера нет в системе, он есть скажем либо в корне папки с программой, либо запрятан в самой программе (кстати как это можно сделать?). И при работе с программой весь текст (хотя бы меню) выводился бы именно этим шрифтом.

J.Carot

02.02.2006 19:00

Foxter, ты имеешь ввиду, что к примеру в проге(в контекстном меню) нужно сделать? приблизительно-бы сделал скриншот того, как должно и что именно выглядеть, а то не очень че-то понятно :).

AlphaOmega

02.02.2006 19:20

Foxter, попробуй так

Код:

 

procedure TForm1.FormCreate(Sender: TObject); 

begin 

  AddFontResource(PChar(ExtractFilePath(ParamStr(0) + 'YourFont.TTF'))); 

  SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0); 

end; 

 

 

procedure TForm1.FormDestroy(Sender: TObject); 

begin 

  RemoveFontResource(PChar(ExtractFilePath(ParamStr(0) + 'YourFont.TTF'))); 

  SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0); 

end;

Foxter

02.02.2006 21:22

неа... не получилось...
сам фонт положил в папку с exe-шником

AlphaOmega

02.02.2006 21:36

Ээ.... я думаю этот код что я привёл, только инициализирует шрифт в прогу. Далее её надо как-то присвоить к объектам. Как это сделать - не знаю....

Foxter

03.02.2006 22:42

Вложений: 1

ладно, думаю в процессе еще разберемся...
еще вопрос: как можно сделать менюшку как в офисе?

AlphaOmega

03.02.2006 23:00

Цитата:

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

ладно, думаю в процессе еще разберемся...
еще вопрос: как можно сделать менюшку как в офисе?

Это вроде как тулбар, а не менюшка.
Я полагаю для делфей есть специальные графические компоненты позволяющие это делать...

Foxter

03.02.2006 23:02

а не знаешь где взять?

AlphaOmega

03.02.2006 23:07

Цитата:

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

а не знаешь где взять?

Поищи на следующих ресурсах:
http://www.torry.net/
http://delphi.icm.edu.pl/
и в google поищи "delphi components"

Foxter

15.02.2006 12:52

все кто пользовался QIP-ом знает что там есть такая штука как RUS2LAT и наоборот.
н-р: Татьяна -> Tatyana
а как это организовать в дельфи? ясное дело что это должно быть в array-ях.. но как?
в основном надо только с RUS2LAT.

Часовой пояс GMT +3, время: 00:59.

Страница 1 из 3

Показывать 40 сообщений этой темы на одной странице