Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.95 c