Форум: "Начинающим";
Текущий архив: 2010.01.03;
Скачать: [xml.tar.bz2];
ВнизПодогнать размер RichEdit в зависимости от шрифта и кол-ва строк Найти похожие ветки
← →
webpauk © (2009-11-12 14:11) [0]
procedure TForm1.Button1Click(Sender: TObject);
begin
RichEdit1.Font.Size:=RichEdit1.Font.Size+1;
RichEdit1.Height:=(RichEdit1.Lines.Count)*(ABS(RichEdit1.Font.Height));
end;
RichEdit1.Font.Height - не соответствует реальному значению, занимаемому шрифтом
← →
sniknik © (2009-11-12 14:52) [1]так попробуй, должно работать...
RichEdit1.Height:= RichEdit1.Lines.Count * (RichEdit1.SelAttributes.Height + 2);
если конечно не разные шрифты/стили у разных строк.
← →
MBo © (2009-11-12 15:23) [2]нужно всмотреться в события TRichjEdit, там есть нужное.
← →
webpauk © (2009-11-12 16:27) [3]
> MBo © (12.11.09 15:23) [2]
>
интересная постановка ответа. а каким образом события влияют на свойства?
> sniknik © (12.11.09 14:52) [1]
>
не катит...
← →
MBo © (2009-11-12 16:41) [4]всмотрелся в список событий?
← →
webpauk © (2009-11-12 16:52) [5]
> MBo © (12.11.09 16:41) [4]
>
угум. всмотрелся! особенно поразило событие OnMouseUp! впрочем и OnKeyDown - тоже ничего!
← →
Германн © (2009-11-12 17:05) [6]
> а каким образом события влияют на свойства?
В справке даже пример есть по данному вопросу.
← →
webpauk © (2009-11-12 17:24) [7]
> Германн © (12.11.09 17:05) [6]
>
сначала сам попробуй
← →
MBo © (2009-11-12 19:46) [8]Неужели всё так безнадежно?
← →
Zahar (2009-11-12 21:00) [9]через GDI
типа GetTextExtentPoint32
← →
Leonid Troyanovsky © (2009-11-12 22:09) [10]
> webpauk © (12.11.09 14:11)
> RichEdit1.Font.Height - не соответствует реальному значению,
> занимаемому шрифтом
Дык, и, хрен с ним, чего в ём прокрутки нет, иль,
может, монитор может вырасти вверх/вниз?
Обратная же задача, IMHO, более содержательна:
http://groups.google.com/group/fido7.ru.delphi.chainik/msg/84b5593814a06b9d
--
Regards, LVT.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2010.01.03;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.004 c