SQLRU.net: Delphi » Автоматический размер шрифта под размер ячейки FastReport

Начало » Программирование » Delphi » Автоматический размер шрифта под размер ячейки FastReport (Автоматически подгонять размер шрифта под размер ячейки FastReport)

Показать: Сегодняшние сообщения :: Голосования :: Навигатор по сообщениям
Отправить по e-mail

Автоматический размер шрифта под размер ячейки FastReport [сообщение #2159]

Tue, 02 May 2023 18:46

SergeyKNP
Сообщений: 87
Зарегистрирован: October 2022

Member

Привет всем,

как автоматически подгонять размер шрифта под размер ячейки FastReport?

Заранее благодарен

Известить модератора

Re: Автоматический размер шрифта под размер ячейки FastReport [сообщение #2161 является ответом на сообщение #2159]

Wed, 03 May 2023 15:03

SergeyKNP
Сообщений: 87
Зарегистрирован: October 2022

Member

Нашёл ответ:
---------------------------------------------------------
Используйте функцию TfrxMemoView.CalcWidth в обработчике TfrxMemoView.OnAfterData:

procedure Memo1OnAfterData(Sender: TfrxComponent);
begin
Memo1.Font.Size:=10;
if Memo1.CalcWidth>Memo1.Width-Memo1.GapX*2 then
Memo1.Font.Size:=Trunc(Memo1.Font.Size*((Memo1.Width-Memo1.G apX*2)/Memo1.CalcWidth));
end;

Известить модератора

Re: Автоматический размер шрифта под размер ячейки FastReport [сообщение #2163 является ответом на сообщение #2161]

Wed, 03 May 2023 15:23

МП
Сообщений: 887
Зарегистрирован: August 2022
Географическое положение: бурятский тун...

Senior Member

ну примерно как-то так

Известить модератора

Предыдущая тема:	Размер и положение окна IDE
Следующая тема:	ChatGPTWizard

Переход к форуму:

-=] Вернуться вверх [=-

[ Сформировать XML ] [

] [

]

Текущее время: Sun Nov 24 01:23:01 GMT+3 2024

Общее время, затраченное на создание страницы: 0.00646 секунд