Перейти к содержанию

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

Показаны результаты для тегов 'stylesdata'.

  • Поиск по тегам

    Введите теги через запятую.
  • Поиск по автору

Тип контента


Форумы

  • Общие вопросы
    • Анимация
    • Графика
    • Стили
    • Базы данных и REST
    • Компоненты
    • Положение, размеры, выравнивание
    • Работа с текстом
    • Приложение и формы
    • Отладка
    • Развертывание приложений
    • Вопросы по языку Object Pascal и RTL
    • Общая информация о TControl
    • События
    • Прочие вопросы
  • Вопросы по платформам
  • Вопросы по использованию RAD Studio
  • Native FGX
  • Обучение
  • Поиск специалистов по FireMonkey
  • Дополнительные ресурсы по FireMonkey
  • Организация работы данного форума
  • Видеокурсы

Поиск результатов в...

Поиск контента, содержащего...


Дата создания

  • Старт

    Конец


Дата обновления

  • Старт

    Конец


Фильтр по количеству...

Регистрация

  • Старт

    Конец


Группа


AIM


MSN


Сайт


ICQ


Yahoo


Jabber


Skype


StackOverflow


Защита от ботов


Город


Интересы

Найдено: 8 результатов

  1. eser

    StylesData и Livebinding

    Как связать кастомный элемент стиля (например к тексту на кнопке лежащей на элементе listbox'а) с полем FDQuery при помощи Livebinding?
  2. Добрый день, не знаю уместен ли вопрос в этой ветке, но тем не менее. Задача следующая: есть ListBox на форме, с помощью стилей создан специальный ListItem с множеством edit'ов и т.д. При загрузке excel файла все это заполняется и выводится. Так вот, все это работает хорошо, до тех пор пока не начинаешь прокручивать - через некоторое время вылетает ошибка Собственно вопрос - По каким причинам она возникает и как ее можно исправить? проект выложил, подгрузка из файла - по умолчанию путь к файлу - C:\Users\Admin\Documents\Embarcadero\Studio\Projects\. Projects.rar
  3. Не нашел ответа на форуме. не могу понять почему FindStyleResource не возвращает объекта. procedure TMainForm.Button1Click(Sender: TObject); var item : TListBoxItem; lbName:TLabel; begin Item := TListBoxItem.Create(Self); Item.Parent := ListBox; Item.StyleLookup := 'lyItemBoxDetail'; lbName := Self.FindStyleResource('lbname') as TLabel; // Здесь получаю nil ShowMessage( Item.StylesData['lbname.Text'].AsString) // А этот код работает end;
  4. ListBox содержит 100 ListBoxItem (созданные в run-time) с кастомным стилем, который содержит TCheckBox и TLabel. Если у первого item'a отметить CheckBox, он выборочно дублируется у остальных item. Пример: отмечаем первый item, отмечаются 20, 30 и т.д. Пробовал перерисовку, перестановку контента и т.д. - не помогает. В чем может быть дело ? Чистый проект прилагается. RAD Studio XE6 ChekBox ListBox.zip
  5. Здравствуйте, подскажите направление решения следующей проблемы: Есть стилизовнный ListBoxItem, содержащий два поля: TText: [styleName = 'TextPrice' и 'TextSum'] TSpinBox: [styleName = 'Count'] Каким образом: Можно повесить обработчик на SpinBox.OnChange, чтобы рассчитывать Sum? И как обратиться к значению SpinBox.Text? Код обработчика события изменения SpinBox: procedure TFormMain.SBCountChange(Sender: TObject); // Какой вызов и где его назначить? var Item: TListBoxItem; begin Item:= ??? //Определение того итема, в котором был изменен TListBox [Name=StyleName='SBCount'] Item.StylesData['TextSum'] := StrToInt( Item.StylesData['TextPrice'] ) * StrToInt( ??? SBCount.Text ); end Подскажите, пожалуйста, а то только туманные решения
  6. Выделение вопроса от Nixon в отдельную тему, В общем, я пытаюсь на основании этой статьи, сделать автоматический пересчет высоты объекта, в зависимости от содержания с учетом изображений и т.д. Для этого мне необходимо получить ширину и высоту конкретного текстового элемента в стиле. Как бы это не звучало странно, но ListBoxItem.StylesData['text.width'].asInteger постоянно возвращает нуль. Естественно пытаюсь получить размеры после того, как ListBoxItem создан и размещен на родителе. И ListBoxItem.StylesData['text.text'].asString не возвращает текст. Это может быть связано с тем что text это TActiveStyleTextObject ? RAD Studio XE6
  7. Я создаю элементы дерева следующим способом: procedure TFForder.ComboBox1Change(Sender: TObject); var It: TTreeViewItem; i: integer; Dir: Tstringdynarray; Click1: TNotifyEvent; begin dir := TDirectory.GetDirectories(ComboBox1.Selected.Text, '*', TSearchOption(2), FilterPredicate); Treeview1.Clear; Button1.OnClick := Click; for I := 0 to length(Dir) do begin with It do begin It := TTreeViewItem.Create(Self); Parent := Treeview1; Text := TPath.GetFileName(Dir[i]); It.StyleLookup := 'Tree'; It.StylesData['button.OnClick'] := TValue.From<TNotifyEvent>(Click); It.StylesData['text.Text'] := 'sdf'; TreeView1.AddObject(It); AddObject(TTreeViewItem.Create(It)); end; end; end; Все элементы создаются корректно, но я не хочу нагружать старт программы загрузкой всех директорий, поэтому хочу подгружать дочернии элементы по мере открытия дерева. Для этого задаю элементу (я написал свой стиль для элементов дерева, нем содержится только кнопка для теста и текст) стиль It.StyleLookup := 'Tree'; И присваиваю кнопке в этом стиле обработчик onClick. Но этот обработчик не срабатывает при нажатии. Я не могу понять почему. Так же для тестирования я присваиваю дочернему элементу свойство текст, но и этого не происходит. Помогите разобраться. На всякий случай уточню, HitText выставлен в true для кнопки и в false для всех остальных элементов (а их в стиле всего три, кнопка текст и layout
  8. Для примера: Есть объект ListBoxItem. В StyleBook загружен стиль по умолчанию. Для итема лист бокса задан стандартный стиль: ListBoxItem.Stylename = "listboxitemlabel" Если заглянуть в StyleBook, то мы увидим что "listboxitemlabel" это TLayout. Каким образом можно изменить/получить свойства этого объекта, к примеру текущую его высоту для нашего ListBoxItem?
×
×
  • Создать...