Hevard
Пользователи-
Постов
84 -
Зарегистрирован
-
Посещение
-
Победитель дней
8
Весь контент Hevard
-
Как боролись и чем победили?
- 9 ответов
-
- tstylebook
- android
-
(и ещё 1 )
C тегом:
-
А на вскидку, какой там пример с использованием стиля?
- 9 ответов
-
- tstylebook
- android
-
(и ещё 1 )
C тегом:
-
Отменил все разрешения
- 9 ответов
-
- tstylebook
- android
-
(и ещё 1 )
C тегом:
-
Без стиля всё прекрасно работало. Если удалить StyleBook - работает, если добавить в свойства Формы StyleBook1 - работает, но без стиля. А если прописать путь в FileName - повторяется прежняя котовасия с зависанием (х32) и вылетом(х64).
- 9 ответов
-
- tstylebook
- android
-
(и ещё 1 )
C тегом:
-
Доброго дня! Не могу победить применение стиля в приложении FMX. Положил на Форму TStyleBook, выбрал 0-Android, открыл и применил стиль Transparent.Style, в свойстве Формы добавил StyleBook = StyleBook1... В окне Design всё изменилось, всё красивое. В Win10 приложение запускается в стиле, на телефоне при параметре Android x32 зависает сплэш, при х64 вылетает. (Delphi 10.4, Samsung A30, Android 11) Подскажите, что я делаю не так?
- 9 ответов
-
- tstylebook
- android
-
(и ещё 1 )
C тегом:
-
Вот решение:
-
В каком месте изменяется?
-
Осталось понять, а как быть с андроид 11?
-
Доброго дня! И что с этим делать? А то пол ветки про магический фикс и никакой конкретики, акромя ссылки на закрытый ресурс...
-
Нет, ибо к IDE это никак не относится. Мне достаточно знания, что такое ацетилсалициловая кислота. ?
-
Ох уж эти суровые челябинские пользователи! А если внимательнее "подпись" автора посмотреть?
-
Прошу прощения за оффтоп, но не нашёл даже упоминаний - что такое Delphi 14.1
-
-
Читаю, диву даюсь! Что мешало сразу сделать корректным расчёт высоты. Хитрости, уловки, танцы с бубном... Я использовал : function TMainForm.DoMeasureText(Canvas: TCanvas; AText: string; Width: single): single; var R: TRectF; begin R := RectF(0, 0, Width-9, 10000); // Width-54 = font.size x 3 Canvas.MeasureText(R, AText, True, [], TTextAlign.Leading, TTextAlign.Leading); Result := R.Bottom; end; Но так и не понял всей премудрости. При шрифте 18, в одну строчку , на один RadioButton она выдаёт 43, 23 , а на какой-то 46,47. Где-то считает одну строчку за две.
-
ну, меня Mouse смутил слегка... но, чем чёрт не шутит. Мало ли, так положено! ?
-
даже так попробовал: if VertScrollBox2.ContainsObject(ICtrl.GetObject) then мёртво!
-
Тоже никак. Оно вообще как-то через одно место. И так, и эдак. А ошибку я бы и не нашел... Вообще впервые этот FMX грызу.? Выбираю 1й пункт, 3-м скролю и он же выделяется...
-
Без изменений.
-
Так вроде в таком порядке они и используются. RB1 - 2 поле БД (1й ответ), в RB2 - 3 поле БД (2й ответ) и т.д. Они заполняются корректно в соответствии, а шатаются по Скроллу, как пьяные матросы. И порядок вроде бы логичный: они же все объявлены как Visible = True. Есть поле 2 - нарисовали, есть поле 3 - нарисовали ... есть поле 7 - нарисовали. Я понимаю, если, к примеру нет поля 4, то 3-го Button-a нет и на его место встаёт 4-й Button.
-
Необычный порядок отображения RadioButton
Hevard опубликовал вопрос в Положение, размеры, выравнивание
Доброго дня! Не пойму, в чём накосячил, ибо Делфил лет 15-20 назад, а тут добрался до FMX... В приложении на Скролле лежат 8 РадиоКнопок с Align = Top; Visible = False; Код заполнения линейно, из БД. Если поле БД не пустое - видим, если пустое - не видим. При работе приложения, они располагаются "по своему усмотрению". -
Доброго дня! Если честно, я сразу предполагал скроллинг, ибо на PC задачу реализовал ещё в конце прошлого года. Пока на больничном, решил реализовать её для мобильной платформы, благо логика вся отлажена. Естественно, не сталкиваясь ранее с FMX, не ожидал столько нерешённых проблем непосредственно с компонентами. Читая ветки, вижу, что множество вопросов возникали лет 5 назад, а воз, как говорится и ныне там. И многое актуально для дня сегодняшнего.
-
Согласитесь, что это не корректное решение? У меня на ScrollBox некуда пальцем ткнуть, что бы не задеть BoundRect. И при скроллинге, естественно отжимается RadioButton ( а их 4 в примере). Т.е. вопрос остаётся открытым и по сей день? Кстати, поймал себя на мысли, что лет 5 назад такая проблема была в браузерах. При пролистывании "срабатывали" ссылки на страницы. Сейчас подобного не встречаю. Так каким методом решить эту проблему?
-
В общем, сам спросил - сам ответил. Нашёл некий пример, проверил - работает. Delphi 1 2 3 4 5 6 7 8 9 10 11 12 var r: TRectF; s: string; begin RadioButton1.Canvas.Font.Size := RadioButton1.TextSettings.Font.Size; r := RectF(0, 0, RadioButton1.Size.Width-24, 10000); // не понял, что за 10000, но ни на что не повлияло s := FDQuery1.FieldByName('ANS1').AsString; // строчная переменная, в моём случае - текст из БД RadioButton1.Canvas.MeasureText(r, s, True, [], TTextAlign.Leading, TTextAlign.Leading); RadioButton1.Size.Height := r.Bottom; RadioButton1.Text := s; end Возможно, кому-то должно пригодиться.