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

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

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

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

Тип контента


Форумы

  • Общие вопросы
    • Анимация
    • Графика
    • Стили
    • Базы данных и REST
    • Компоненты
    • Положение, размеры, выравнивание
    • Работа с текстом
    • Приложение и формы
    • Отладка
    • Развертывание приложений
    • Вопросы по языку Object Pascal и RTL
    • Общая информация о TControl
    • События
    • Прочие вопросы
  • Вопросы по платформам
    • Android
    • iOS
    • OSX
    • Windows
    • Windows Phone
    • Linux
  • Вопросы по использованию RAD Studio
    • Лицензирование
    • Сборка проектов
    • Multi-Device Designer
    • Редактор кода
    • Вопросы
  • Native FGX
    • Новости
    • Обсуждения
    • Предложения
  • Обучение
    • Основная информация
    • Вопросы
    • Отзывы
  • Поиск специалистов по FireMonkey
    • Консультации
    • Ищу подрядчика
  • Дополнительные ресурсы по FireMonkey
    • Сторонние компоненты
    • Приложения, написанные с использованием FireMonkey
    • Примеры
    • Руководства
    • Шаблоны
    • Статьи и заметки
    • Информация о версиях RAD Studio
    • Новости
  • Организация работы данного форума
    • Правила форума
    • Нарушения правил форума
    • Предложения об организации форума
    • Проблемы
    • Функции форума
  • Видеокурсы
    • Основная информация
    • Курсы
    • Предложения и голосования за новые курсы
    • Вопросы

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

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


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

  • Начало

    Конец


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

  • Начало

    Конец


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

Регистрация

  • Начало

    Конец


Группа


AIM


MSN


Сайт


ICQ


Yahoo


Jabber


Skype


StackOverflow


Город


Интересы

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

  1. Barbanel

    TListBoxItem.TagObject = nil

    Всем хай. Пол дня бьюсь, уже с ума начинаю сходить, и как назло не с кем посоветоваться сегодня. Выручайте) Суть: Есть TListBox. В него динамически из кода создаются TListBoxItem. Каждому итему в поле TagObject присваивается некий объект, хранящий дополнительные данные. По клику на итем, вытаскивается этот объект и в зависимости от данных, выполняются разные действия. Проблема: Под Windows ее собсно нет) Под Android при клике на TListBoxItem оказывается что TagObject = nil. Голова уже дымится, у меня закончились мысли, что это может быть... Код, на всякий: while not query.Eof do begin item := TListBoxItem.Create(lbTeilLeistungsArten); lbTeilLeistungsArten.AddObject(item); item.StyleLookup := 'listboxitemTL'; item.Height := 60; item.Text := query.FieldByName('Bezeichnung').AsString; item.OnClick := OnTeilleistungenClick; item.Tag := query.FieldByName('ID').AsInteger; item.DisableDisappear := true; item.ApplyStyleLookup(); lStObj := TStoreObject.CreateTL(query.FieldByName('ID').AsInteger); lStObj.TeilLeistung.Name := query.FieldByName('Bezeichnung').AsString; item.TagObject := lStObj; query.Next(); end; Всем заранее спасибо!
  2. При добавлении новых итемов в листбокс у него появляются скролы но самого итема не видно. как сделать автоскролинг чтобы активный итем был виден ? CurListBoxItem->SetFocus() не делает этого.
  3. chaplin.u@gmail.com

    3 строчки рушат апликацию на старте

    Столкнулся с разницей в нумерации индексов ( в Вин32 начинается с 0 а в Анроиде с 1 ). Решил при запуске программы находить минимальный индекс. Поставил на каждый TListBoxItem Tag > 0 ( 1,2...) . Написал функцию а она рушит апликацию на старте. Не могу понять что ей не нравится. Imin определил как глобальную переменную - int Imin = 0; если убираю эту функцию - программа стартует нормально.
  4. Чтобы использовать Drag and Drop, устанавливаю у компонента TListBoxItem свойство HitTest:= True. Почему у этого компонента не срабатывает событие OnClick? P.S. Win32, XE7.
  5. Следующая ситуация: Есть база данных с полями: id, product_name, price, cart (корзина) - Думаю пояснять излишне. по условию cart>0 формируется запрос и заполняется TListBox кастомизированным Item-ом который содержит SpinBox. при изменении SpinBox вызывается процедура, которая вносит изменение в БД (cart) и высчитывает сумму в этом Item. Все работает, все хорошо, но... Задумал я что при SpinBox = 0, у меня этот TListBoxItem исчезал, для этого на изменение SpinBox если он равен 0, я запускаю процедуру формирования (Заполнения) этого TListBox заново. Вываливается ошибка Access ..to address XXX, при чем при пошаговой трассировки исключение вызывает FMX.Edit строка 3811 CustomEditBox.Change; в procedure TValueRangeCustomEditBox.DoAfterChange; (DELPHI XE6) т.е. моя процедура полностью отрабатывается (Заполняется новый список Item-ов) и возникает эта ошибка. При чем на 32-bit Windows все работает нормально, только на андроиде возникает это исключение, при чем приложение продолжает нормально функционировать. Если я правильно понимаю, то эта процедура DoAfterChange пытается что то сделать с объектом, которого уже нет. Это баг или я неправильно алгоритм построил?
  6. ListBox содержит 100 ListBoxItem (созданные в run-time) с кастомным стилем, который содержит TCheckBox и TLabel. Если у первого item'a отметить CheckBox, он выборочно дублируется у остальных item. Пример: отмечаем первый item, отмечаются 20, 30 и т.д. Пробовал перерисовку, перестановку контента и т.д. - не помогает. В чем может быть дело ? Чистый проект прилагается. RAD Studio XE6 ChekBox ListBox.zip
  7. Здравствуйте! Необходимо реализовать сортировку пользовательских итемов TListBox в зависимости от значений их свойств. Во вложении тестовый пример сортировки по Item.Tag = Random(1000). Пользовательская функция сортировки: function TForm1.SortFunc(Item1, Item2: TFmxObject): Integer; begin if (Item1 as TListBoxItem).Tag > (Item2 as TListBoxItem).Tag then Result:=1; if (Item1 as TListBoxItem).Tag < (Item2 as TListBoxItem).Tag then Result:=-1; if (Item1 as TListBoxItem).Tag = (Item2 as TListBoxItem).Tag then Result:=0; end; Вызов сортировки: procedure TForm1.Button1Click(Sender: TObject); begin ListBox1.BeginUpdate; ListBox1.Sort(SortFunc); ListBox1.EndUpdate; end; К сожалению, сортировка не работает - порядок следования итемов в списке не меняется. Прошу помочь ! ListSort.zip
  8. Здравствуйте, подскажите направление решения следующей проблемы: Есть стилизовнный 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 Подскажите, пожалуйста, а то только туманные решения
  9. Здравствуйте. По статье Ярослава Бровина реализовывал кастомный ListBoxItem. Но тут непонятная ситуация возникла. Я пишу приложение под android/iOS. В версии для windows в том же примере элементы листбокса выделяются "синим" при клике, а в моем случае они остаются белыми. Я еще не очень разобрался со стилями приложения вообще. Как бы StyleBook включен только для ЛистБокса, там все нормально как мне нужно отображается. Вот проблема с выделением. Тестировал и как для win32(активировал в Project Manager'е) и для Android непосредственно на смартфоне. Подскажите пожалуйста как быть. Я полагаю, что дело именно в стилях, но инфы никакой я по этому поводу не нашел. Заранее спасибо. sample.zip
  10. Здравствуйте ! Во вложении - тестовое приложение, иллюстрирующее суть проблемы. Есть пользовательский элемент списка TCustomListBoxItem = class(TListBoxItem) , содержащий: Изображение, Наименование даты Текстовое описание непостоянной длинны. В зависимости от длинны описания меняется высота TCustomListBoxItem. Метод TCustomListBoxItem.SyncChildSizes вычисляет высоту элемента списка в зависимости от содержимого и вызывается из обработчиков TCustomListBoxItem.OnResize и TCustomListBoxItem.OnApplyStyleLookup. Форма приложения содержит две вкладки, вторая из которых содержит сам список и две кнопки для его пополнения и очистки. Первая вкладка содержит только две кнопки, наследующие обработчики кнопок второй вкладки. Суть проблемы Если нажать кнопку "Добавить" на первой вкладке и активировать список на второй вкладке - его элементы (TCustomListBoxItem) будут "навалены" один на другой. Если нажать кнопку "Добавить" на второй вкладке, которая содержит сам список - элементы в нем отображаются корректно. Скриншоты во вложении. Прошу помочь разобраться. List Test.zip
  11. Здравствуйте ! TListBox заполняется посредством добавления к нему TListBoxItem: LBI := TListBoxItem.Create(ListBox); ... ListBox.AddObject(LBI); Как из ListBox извлечь его ListBoxItem, находящийся на i-позиции ? К сожалению, свойства Objects TListBox не имеет, как это было в стандартном делфи.
  12. Как программно на С++ создаваемому TListBoxItem присвоить стиль, например, TMetropolisUIListBoxItem? void __fastcall TMainForm::Button4Click(TObject *Sender) { TListBoxItem * item; TTimeEdit * VideoTimeEdit; ListBox1->BeginUpdate(); int j = 0; for (int i = 0; i < 10; i++) { item = new TListBoxItem(ListBox1); item->Text = "Текст: " + IntToStr(i); item->Height = 44; item->ItemData->Detail = "Детальный текст: " + IntToStr(i); item->ItemData->Bitmap = ImageControl1->Bitmap; //тут bmp 44x44 VideoTimeEdit = new TTimeEdit(item); VideoTimeEdit->Parent = item; VideoTimeEdit->Position->X = 140; VideoTimeEdit->Position->Y = 10 ; VideoTimeEdit->TimeFormatKind = 1; ListBox1->AddObject(item); } ListBox1->EndUpdate(); }
  13. Не отображаются кастомные item's при разворачивании списка TComboBox. Нет отображения конкретно в выпадающем списке, в самом TComboBox всё ок. Пробовал перерисовку во время события onPopup, создание на различных родителях и т.д. - не помогло. Подскажите в чем может быть дело ? Спасибо. Чистый проект прилагается: RAD Studio XE6 CustomComboBox.zip
  14. Как можно узнать, вмещается ли полностью текст в TListBoxItem? На скрине выше видно, что в выделенном TListBoxItem"э текст "ушел" вверх и вниз. Как можно изменить TListBoxItem.Height, что-бы в этот TListBoxItem полностью поместился текст? Спасибо.
  15. Подскажите, если можно с картинками, как поменять цвет выделенного итема в ListBox для андроид стиля Спасибо
  16. Как установить свойство WordWrap в ListBoxItem, когда итемы грузятся из базы через Live Binding? В цикле после открытия таблицы sqlite не прикольно, есть еще варианты?
  17. В TListBoxItem, в свойстве ItemData.Bitmap на платформе Windows пытаюсь загрузить картинку(Пробовал и в рантайм и в дизайнере). Изменения вообще никакого. После этого попробовал создать новый проект на мобильной платформе - там картинка успешно загружается. Загрузка под винду как-то отличается от загрузки под мобильные устройства?
  18. Всем привет. Когда добавляю в TListBox новый Item, и в дизайнере ставлю свойство WordWrap = True, то текст успешно переносится на новую строку. Но если добавлять динамически в TListBox новые Item - то текст не переносится. Добавляю так: procedure TFrame1.GenerateTestVis; var x: integer; Itm: TListBoxItem; begin ListBox1.Clear; ProgressBar1.Value := TestQA1.ItemIndex + 1; Label1.Text := TestQA1.ItemSelected.Quest; for x := 0 to TestQA1.ItemSelected.Count - 1 do begin Itm := TListBoxItem.Create(ListBox1); Itm.WordWrap := true; Itm.Text := TestQA1.ItemSelected.Answers[x].Answer; // Itm.WordWrap := true; ListBox1.AddObject(Itm); //Пользуясь случаем:Itm.Free потом ListBox сам сделает, да? end; end; Но длинный текст не переносится на новую строку, и "уходит в глубь" формы. Выделенный на скрине Итем - я добавил в дизайнере. А вот второй - с помошью вышеописанного кода. Вот собственно необходимо добавить перенос длинного текста для Итемов, которые добавляются динамически. Спасибо.
  19. Ярослав, прочитал ваш совет http://fire-monkey.ru/topic/95-kak-pravilno-zamenit-image-na-webbrowser/?p=297 Интересен вот этот пункт: А точнее, как определить положение картинки в ListBoxItem, если картинка у нас находится тут "TListBoxItem.ItemData.Bitmap"?
  20. Здравствуйте. Возник вопрос, какого размера должны быть иконки в приложении, чтобы оно выглядело одинаково на разных разрешениях/устройствах? Вопрос вроде не сложный, но я что-то запутался… Читал http://developer.android.com/design/style/iconography.html, но так и не понял какой размер использовать для иконок. Пример ситуации: Нам нужно добавить иконку к пункту в ListBox’е, так чтобы иконка одинаково смотрелась на разных разрешениях экрана. Из статьи я понял, что иконки могут быть: MDPI: 32x32 HDPI: 48x48 XHDPI: 64x64 XXHDPI: 96x96 Но все 4-и вида запихнуть в один листбокситем нельзя. Поэтому и возник вопрос. Я пришёл к выводу, что лучше использовать для иконки xxhdpi: 96x96, т.е. максимальный размер, предположив, что на большом или маленьком разрешении она будет ресайзиться сама. Правильно ли я всё понял? Если да, то тогда я не понимаю зачем делать(в том числе и гугл) 4-е вида иконок, если можно сделать одну xxhdpi: 96x96. P.S. Очень нужно понять это, т.к. для приложения, которое я пишу, нужно нарисовать иконки (делаю это впервые). Жаль, что гугл даёт так мало стандартных иконок и в паке нет даже простейшей иконки файла. P.S.2 Решил использовать пока HDPI: 48x48 (http://developer.android.com/design/style/metrics-grids.html)
  21. Есть ли возможность регулировать расстояние между картинкой и текстом в TListBoxItem? Пример прикрепил. Из-за большого отступа, выглядит не очень красиво.
  22. У меня на форме есть ListBox (листбокс), в который я добавляю по 10 итемов. Но когда идёт процесс добавления большого числа TListBoxItem, я вижу как итемы добавляются, это немного не красиво. Можно ли как-нибудь выключить прорисовку, но чтобы AniIndicator работал, а после того как все Items добавятся включить?