-
Постов
828 -
Зарегистрирован
-
Посещение
-
Победитель дней
13
Весь контент x11
-
Ну в общем, я нашёл CustomPicker
-
зашёл в папку Embarcadero\Studio\18.0\Samples
-
AllowSelection не влияет на CheckBox`ы. Это свойство влияет на выбор строки.
-
и этот TListBoxItem.Text можно разместить слева/справа/сверху основной компоненты? сейчас нету IDE под рукой
-
Вот именно, что хорошо бы без TLabel, чтобы у контейнера была своя подпись. Шикарное решение у DevExpress в TcxLayoutControl. И пользлватель сам может редактировать форму в Runtime.
-
хмммм, неплохо, а где и как можно поизучать матчасть и примеры о том, как вставлять компоненты в TListBox или в TListView?
-
А на Андроиде (у мну 5.0.2) проблем и не было.
-
Я знаю. И EditMode включено. procedure TfmReference.actRefreshExecute(Sender: TObject); Var sTableName: string; begin sTableName := GetTableName; qRef.sql.Text := Format('select id, name from %s', [sTableName]); qRef.Open; ListView1.EditMode := not ListView1.EditMode; if ListView1.EditMode then ShowMessage('Режим редактирования включен'); end;
-
но там лежит же Label1 c надписью FMX.StatusBar почему метка не отображается? Теперь я на форму кинул 2 метки и верхнюю покрасил в красный цвет. Запустил на BlueStacks. Как видите, красная заползла под панель статуса.
-
Мультиплатформенное приложение. Проверяю на Windows (на Android пока не проверял). На форме лежит TVertScrollBox, а внутри этого ScrollBox`а лежит GridPanelLayout. Проблема в том, что у VertScrollBox не появляется полоса прокрутки. Изначально задача такая. На форме мобильного приложения для смартфона может быть много разных компонент. И нужно иметь возможность прокручивать форму, а вернее компоненты, вверх вниз. Сейчас пытаюсь сделать так. Компонента TGridPanelLayout разделена 2 колонки: подпись слева (в левой колонке TLabel) и в правой колонке компоненты редактирования (TEdit, TComboBox и другие). Пытаюсь спроектировать форму редактирования объявления, где много разных параметров: дата, тип, картинки, многострочный текст, выпадающие списки, кнопки и т.д.
-
ииии а где заголовок? или его не должно быть?
-
Нет такого свойства у TListView
-
запустил Тормозит, конечно, при изменении цвета ужасно.
-
странно, ошибка через раз проявляется
-
я ошибся - проблема не решилась
-
Не могу понять, что я не так делаю. Почему при щелчке мышкой по чекбоксу он не реагирует?
-
у меня решилась проблема FMX.Platform.Android.pas в USES НЕ надо добавлять.
-
а сам файл FMX.Platform.Android.pas в USES надо добавлять?
-
спасибо нужно бы это всё в какую-то простую форму вызова обернуть
-
ЧЯДНТ
-
Компилирую проект, получаю ошибку [dcc32 Fatal Error] FMX.Platform.Android.pas(18): F2613 Unit 'Androidapi.Helpers' not found.
-
тьфу ты а я ищу здесь ))) http://www.ixbt.com/portopc/lenovo-tab-s8-50lc.shtml
-
Тут ещё вопрос. Почему ShowMessage(val[0]) показывает старое значение? procedure TfmReference.actEditExecute(Sender: TObject); Var val: array of string; sTableName, cap: string; id: integer; begin SetLength(val, 1); val[0] := ListView1.Items[ListView1.Selected.Index].Objects.FindObjectT<TListItemText>('name').Text; id := StrToIntDef(ListView1.Items[ListView1.Selected.Index].Objects.FindObjectT<TListItemText>('id').Text, -1); cap := comboRefType.Items[comboRefType.ItemIndex]; sTableName := GetTableName; TDialogService.InputQuery(cap, ['Изменить: '], Val, procedure(const AResult: TModalResult; const AValues: array of string) begin case AResult of mrOk: begin if not AValues[0].IsEmpty then begin ShowMessage(val[0]); end; end; mrCancel: begin Exit; // тут выполняем действия по кнопке Отмена end; end; end ); end;
-
агааа, у Вас TDialogService, а у мну TDialogServiceAsync Спасибо
-
Просмотрел статью. Решения не нашёл. Даже не нашёл там описание похожей проблемы.