Поиск сообщества

Доброе время суток. После создания/изменения (Edit Custom Style...) собственного стиля у Label1 (добавил в качестве фона прямоугольник) перестали обрабатываться события OnMouseMove, OnMouseDown и т.д. (Label1.HitTest:=True). До изменения стиля все работало. В чем причина? Спасибо за ответ...

Возникла вот такая непонятная ситуация: до этого момента я всегда считал что TLabel никак физически не может принять Tab Focus наравне с TRectangle и тому подобных. Судя по всему я ошибался. Ниже прилагаю скрин окна Tab Order, что там делает TLabel неясно. Ну да ладно. Вопрос в том как его оттуда убрать, чтобы он не жрал Tab Focus? Стандартных галочек TabStop и CanFocus в Tlabel нет. P.S. Я не помню чтобы я сталкивался с этой проблемой в предыдущих версиях RAD.

Почему в 10.1 цвет надписи тянется из стиля, хотя в StylledSettings галочка FontColor отключена?

Друзья, дошел до отчаяния! В моем приложении есть необходимость рассчитать высоту TListboxItem, в котором расположены компоненты TLabel. Расчет высоты производится на основании подсчета высоты компонента TLabel. Также, компоненты TLabel сами выстраиваются в столбец друг за другом (закончился один, отступ, выводим другой). Перерыл весь форум. Использовал все рекомендации: 1. определял высоту текста в TLabel по канве (тема: http://fire-monkey.ru/topic/44-avtomaticheskii-perekhod-na-vtoruiu-stroku-tlabel/) 2. принудительно загружал стили (тема: http://fire-monkey.ru/topic/726-pochemu-u-menia-dlia-tlabel-nepravilno-vychisliaetsia-raz/) 3. опирался на свойства TLabel.Height. Что бы я ни делал, построить стабильный вывод компонентов не получается. Постоянно в самые непредсказуемые моменты компоненты либо расползаются, либо высота TListboxItem рассчитывается неверно. Самый стабильный результат дает третий способ. Но при первом выводе компонентов на экран, те, которые завязаны на расчет высоты TLable, расползаются; при последующих открытиях расчет работает стабильно. Думал, что стили не загружены, применял 2 способ, но тоже решения не дало Подскажите, пож-та, как получить реальную высоту текста в TLabel как при первом выводе компонентов на экран, так и при последующих? Также, не сочтите за наглость, но буду признателен за фрагмент кода, работающего при любых условиях для Listbox1.Height:=Label1.height+label2.Height+10 Правда, веру в себя с этим выравниванием потерял

Всем привет. Как на мобилке для Делфи сделать так, чтобы по клику на TLabel открывался браузер(не компонент) и, допустим, страница http://google.com?

На форме 2 метки: Верхняя - FactoryIDCaption (Заводской №) Нижняя - FactoryIDValue (90408223) Нужно чтобы вторая строка (со значением параметра) располагалась после первой (с наименованием параметра) вне зависимости от длины текста в первой метке. У первой метки значение свойства AutoSize = True. И есть такой код FactoryIDValue.Position.X := FactoryIDCaption.Position.X + FactoryIDCaption.Width; По идее начало второй метки должно совпадать с концом первой метки, но на практике это не так. Где я ошибся и как эту ошибку исправить? P.S. Речь идет про Android, на Windows все работает правильно.

Доброго времени суток. Создаю программно компоненты TLabel. Status1 := TLabel.Create(Form1); Status1.Name := 'LabelStatus1_'+idMachine.ToString; Status1.Parent := RectangleStatus; Status1.Align := TAlignLayout(9); Status1.TextSettings.HorzAlign := TTextAlign(0); //По умолчанию, при создании объекта TLabel, размер шрифта устанавливается в значение 12 Status1.TextSettings.Font.Size := 24; Status1.TextSettings.WordWrap := true; Status1.Text := 'Статус 1'; Status1.Visible := true; Изменяю значение размера шрифта: Status1.TextSettings.Font.Size := 24 Значение изменяется, но размер шрифта TLabel при отображении на форме остается прежним. Как можно, или нужно изменять размер шрифта компонента в RunTime?

Привет всем. На 2D форму положил TViewPort3D, на него положил TLayer3D на котором разместил TLabel, TEdit, TButton и анимацию. При открытии формы 3D эффект работает, однако вид выше указанных компонентов совсем не презентабелен. Те же компоненты вне TViewPort3D и TLayer3D отображаются нормально. Такая проблема стала наблюдаться только в XE7. В XE6 ее не было. Прикрепил тестовый проект. Example.zip

ListBox содержит 100 ListBoxItem (созданные в run-time) с кастомным стилем, который содержит TCheckBox и TLabel. Если у первого item'a отметить CheckBox, он выборочно дублируется у остальных item. Пример: отмечаем первый item, отмечаются 20, 30 и т.д. Пробовал перерисовку, перестановку контента и т.д. - не помогает. В чем может быть дело ? Чистый проект прилагается. RAD Studio XE6 ChekBox ListBox.zip

Как сделать Label при вводе текста в который, он будет автоматически увеличиваться по высоте при необходимости?

Пробую задать размер шрифта (TLabel.Font.Size) для TLabel. Но стиль и размер у метки остаются стандартными. Создаю объект так: MyLabel := TLabel.Create(Self); MyLabel.Position.X := 66; MyLabel.Position.Y := 8; MyLabel.Width := 231; MyLabel.Height := 18; MyLabel.Parent := ListBox1.ListItems[ListBox1.Count-1]; MyLabel.HitTest := False; MyLabel.Font.Size := 8; MyLabel.Font.Style := [TFontStyle.fsBold]; MyLabel.Trimming := TTextTrimming.ttCharacter; MyLabel.VertTextAlign := TtextAlign.taLeading; MyLabel.Text := 'Text';