Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как ограничить кол-во символов в Label [D7, XP]

Гость © (2008-06-04 15:45:00)
Привет всем ! Нужно сделать такую штуку которая будет считать сколько символов в Label и если их больше 20 то обрывать надпись , и ставить туда многоточие
я пытался сделать так

If Label1.GetTextLen>20 then begin
Label1.caption:=Label1.caption+'...';
end;

Как здесь видно , необходимо разорвать текст , и сделать вид что он не закончен.....

oldman (2008-06-05 09:28:00) [1]

> Нужно сделать такую штуку которая будет считать сколько
> символов в Label и если их больше 20 то обрывать надпись

А как эти символы в Label-то попадают?

(2008-06-04 16:57:00) [2]
Удалено модератором

Anatoly Podgoretsky (2008-06-04 16:47:00) [3]
> Гость (04.06.2008 15:45:00) [0]

Сделать это не сложно, Copy + '...' только зачем это нужно? Весьма сомнительное действие

(2008-06-04 15:49:00) [4]
Удалено модератором

Igor M. (2008-06-04 15:48:00) [5]
ну и делай так: Label1.caption:= system.copy(Label1.caption, 1, 17) +'...';

Palladin (2008-06-04 15:47:00) [6]

> If Label1.GetTextLen>20 then begin
> Label1.caption:=Label1.caption+'...';

интересная логика, если длинна текста больше 20, то добавим еще 3 :)

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »