Вниз
Скачать: CL | DM;

Как написать в поле Label нижний индекс   Найти похожие ветки 

← →
Acme ©   (2006-10-30 16:17) [0]

Как написать в поле Label нижний индекс


← →
Сергей М. ©   (2006-10-30 16:22) [1]

SomeLabel.Caption := "нижний индекс";


← →
Anatoly Podgoretsky ©   (2006-10-30 16:26) [2]

Без извращений ни как, лучше используй другой компонент, например RichEdit


← →
Сергей М. ©   (2006-10-30 16:28) [3]


> Anatoly Podgoretsky ©   (30.10.06 16:26) [2]


Разврат малолетних)


← →
Anatoly Podgoretsky ©   (2006-10-30 16:32) [4]

Наоборот, пытаюсь спасти его от этой участи.


← →
Сергей М. ©   (2006-10-30 16:35) [5]


> Anatoly Podgoretsky ©   (30.10.06 16:32) [4]


Если "жертве"  сразу не объяснить, что элементарные знаки пунктуации существуют даже в письменности аборигенов умба-юмба, то попытки напрасны)


← →
Антоныч ©   (2006-10-30 16:36) [6]

Надо взять 2 Label, причём второй поместить чуть ниже первого и написать в нём нижний индекс. :)


← →
Elen ©   (2006-10-30 16:41) [7]


> Acme

Можно еще и так :

procedure TForm1.Label1Click(Sender: TObject);
var x:integer;
begin
//label1.Caption:="";
x:=0;
Label1.Canvas.TextOut(0,0,"H");
x:=x+Label1.Canvas.TextExtent("H").cx ;
Label1.Canvas.TextOut(x,10,"2");
x:=x+Label1.Canvas.TextExtent("2").cx ;
Label1.Canvas.TextOut(x,0,"O");
end;

Надеюсь смысл ты понял... (На всякий случай перед запуском этого помести в капшн какой нибудь символ)


← →
Anatoly Podgoretsky ©   (2006-10-30 16:44) [8]

Антоныч ©   (30.10.06 16:36) [6]
Я просил без извращений!


← →
StriderMan ©   (2006-10-31 09:49) [9]

DrawText


← →
Amoeba ©   (2006-10-31 18:35) [10]

http://www.tmssoftware.com
Здесь найдешь компоненты THTMLLabel и TRTFLabel. Без исходников они бесплатны. Они как раз умеют то, что тебе надо.



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

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



Память: 0.47 MB
Время: 0.041 c
2-1164866515
Silica
2006-11-30 09:01
2006.12.17
Очистка формы


15-1164793452
skiner
2006-11-29 12:44
2006.12.17
Конфликт с Антивирусом


4-1154443047
17Landgraf
2006-08-01 18:37
2006.12.17
Как вывести сообщение на ангилском? (FormatMessage)


3-1160293193
AntiUser
2006-10-08 11:39
2006.12.17
В тригере Before Update узнать имя измененного field а


15-1164458253
NetLam
2006-11-25 15:37
2006.12.17
Скопировать файл с удаленного компьютера




   Наверх