Ra72
Пользователи-
Постов
141 -
Зарегистрирован
-
Посещение
-
Победитель дней
4
Весь контент Ra72
-
Нужно вставить еще один Item. var item: TListViewItem; begin item := ListView1.Items.Add; item.Text := 'Header'; item.Purpose := TListItemPurpose.Header; ...
-
Вот это работает, спасибо!
-
Есть фрейм, на фрейме кнопка. Фрейм создается динамически. При нажатии на кнопку, осуществляем действие и уничтожаем фрейм. Приложение валится с AV на секции finally. procedure TControl.Click; var LAction: TCustomAction; begin ... if Assigned(FOnClick) then FOnClick(Self); finally if ActionClient and (Action is TCustomAction) then TCustomAction(Action).ShortCutPressed := False; end; end; Как правильно уничтожить фрейм по нажатию на кнопку, которая на нем?
-
Вопрос снимаю, разобрался. Надо другой линк использовать.
- 10 ответов
-
- ListView
- база данных
-
(и ещё 1 )
C тегом:
-
Вопрос снимаю, разобрался. Надо другой линк использовать.
-
А вот для ClientDataSet не происходит. Как сделать чтобы происходило?
-
И все-таки, хотелось бы понять, перемещение по набору данных не происходит при перемещении по ListView? Вот тут написано, что в FireDAC это возможно настроить, а в ClientDataSet? Конечно, можно это перемещение организовать, но неужели не предусмотрено?
- 10 ответов
-
- ListView
- база данных
-
(и ещё 1 )
C тегом:
-
...или так: procedure TForm1.LinkFillControlToField1FilledListItem( Sender: TObject; const AEditor: IBindListEditorItem); var Item: TListViewItem; begin if AEditor.CurrentObject is TListViewItem then begin Item := TListViewItem(AEditor.CurrentObject); Item.Data['ID'] := BindSourceDB1.DataSet.FindField('ID').AsInteger; end; end;
-
Скачал, действительно юзабельно, но! При выкладке на Google Play даже в альфа-тестирование пишет что: Оповещение системы безопасности Ваше приложение использует версию OpenSSL, в которой есть уязвимость. Подробную информацию (в том числе о том, к какому сроку должна быть устранена уязвимость) можно найти в этой статье. Как быть? -------------------- От модератора: Сообщения вынесены в отдельную тему из темы [Android] Шифрование
-
На какое?
-
Да, стиль был для двух платформ, для андроида icon был другого размера, спасибо.
-
Так совсем маленькая. Item-ы сами высокие, а картинка маленькая совсем в центре слева.
-
Добрый день! Создаю свой стиль для TListBoxItem. Картинка стиля "icon" в Win32 выводится большая (как надо), а в Android - маленькая, не зависит от высоты Item-а. Как сделать, чтобы и в Android нормально выводилось?
-
Как это? Можно подробнее?
-
krapotkin, Вот мне тоже так показалось. Тогда где же BindScope ? GoldenEalge, спасибо большое за видео.
-
В результате действия такого кода, не происходит отображения картинки Image1 в квадрате SubImage1. Почему? Image1: TImage; SubImage1: TSubImage; ... procedure TForm1.FormCreate(Sender: TObject); begin SubImage1.BeginUpdate; SubImage1.Source := Image1; SubImage1.EndUpdate; end;
-
Воспроизведение лабораторных условий Apple сети IPv6
Ra72 опубликовал вопрос в Публикация в AppStore
Тоже не могу долгое время опубликовать приложение на AppStore. Проблема та же что и в соседней ветке, Apple требует работу в сети IPv6. Хочу осветить проблему немного под другим углом. А как воспроизвести условия, для проверки данного требования? Проще говоря, как сделать так чтобы у меня на стенде тоже не работало? Потому что сейчас у меня все работает, и я не могу отладить данное требование. (в стендовом MacBook разъем для подключения LAN отсутствует) -
билд не находит файлы библиотеки... ...После успешного билда все удалось выложить.
-
Нет, только компиляцию, билд не работает.
-
При вызове Deploy сборки для Application Store стала возникать следующая ошибка: [PAClient Error] Error: E4356 File does not exist: /Users/<UserName>/PAServer/scratch-dir/<UserName>-<UserName>/<ProjectName>.app/<ProjectName>.armv7 Delphi 10.1 Berlin, iOS 9.3.5