Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2013.03.22;
Скачать: CL | DM;

Вниз

длина лабела в символах   Найти похожие ветки 

 
vasa777   (2012-05-07 16:44) [0]

на форме есть лабел, положен на форму и растянут на несколько см, автосайз=фальш. Вопрос: можно ли както определить сколько видимых символов в него влезет? Помню какаято была функция вроде, которая от размера шрифта чтото определяла.. надо что то типа:

const symbol="X";
var s:string;i,z:integer;
begin
s:="";
for i:=0 to 1000 do begin
s:=s+symbol;if MyFunctMaxVisibleLabelCaption(label1,s)=false then break; label1.caption:=s;
end;
showmessage("Максимальное число видимых символов: "+inttostr(length(s)));
end;

function MyFunctMaxVisibleLabelCaption(L:tlabel;s:string):bool;
begin
//???
end;


 
Amoeba_   (2012-05-07 16:55) [1]

Использовать св-во Canvas.handle
Читать здесь:
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=452


 
Inovet ©   (2012-05-07 17:04) [2]

Именно сантиметров? Не мегатонн, не мегапикселей?


 
Юрий Зотов ©   (2012-05-07 17:08) [3]

Label1.Canvas.TextWidth - проще


 
vasa777   (2012-05-07 17:09) [4]


> Amoeba_   (07.05.12 16:55) [1]


ага, там похоже нужное только в конце:

::"Остальные функции, предназначены для получения различной информации о шрифтах, размерах и т.п. (GetTextExtentPoint, EnumFontFamiliesEx, GetFontData, GetCharABCWidths, GetCharWidthFloat и т.д.), но это уже другая тема. "


 
vasa777   (2012-05-07 17:09) [5]


> Юрий Зотов ©   (07.05.12 17:08) [3]

во, вот это оно похоже



Страницы: 1 вся ветка

Текущий архив: 2013.03.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.053 c
15-1330531768
Димка На
2012-02-29 20:09
2013.03.22
Gaussian blur


15-1335541656
brother
2012-04-27 19:47
2013.03.22
Win 98


15-1354034040
Use_R
2012-11-27 20:34
2013.03.22
Яндекс Почта и Одноклассники.


15-1333225802
Юрий
2012-04-01 00:30
2013.03.22
С днем рождения ! 1 апреля 2012 воскресенье


2-1333345551
TSubject
2012-04-02 09:45
2013.03.22
Вопрос по выпадающему списку