-
Постов
2 517 -
Зарегистрирован
-
Посещение
-
Победитель дней
264
Весь контент Равиль Зарипов (ZuBy)
-
для каких платформ? если для Win то вроде у Ярослава в компонентах есть AplicationEvents, а для других платформ попробуй OnSaveState. он обрабатывается когда приложение должно сохранить свои данные т.к. может быть выгружено менеджером памяти автоматически. срабатывает на кнопке последние приложения (в android)
-
IntToStr(ActionID) - всегда правильное значение? может дело в этом?
-
Нет, такое может только TListBoxItem
-
в итоге получилось так ContentView - TListView procedure TForm1.ContentViewItemClickEx(const Sender: TObject; ItemIndex: Integer; const LocalClickPos: TPointF; const ItemObject: TListItemObject); var pMy: TPoint; pItem: TRect; begin // вычисляем прямоугольник, где распологается кнопка pItem.Left := trunc(ContentView.Width - ContentView.ItemAppearanceObjects.ItemObjects.Accessory.WidthWhenVisible - ContentView.ItemAppearanceObjects.ItemObjects.TextButton.WidthWhenVisible) - 12; pItem.Right := pItem.Left + trunc(ContentView.ItemAppearanceObjects.ItemObjects.TextButton.WidthWhenVisible); pItem.Top := trunc((ContentView.ItemAppearance.ItemHeight / 2) - (ContentView.ItemAppearanceObjects.ItemObjects.TextButton.HeightWhenVisible / 2)); pItem.Bottom := pItem.Top + trunc(ContentView.ItemAppearanceObjects.ItemObjects.TextButton.HeightWhenVisible); { смотрим куда тыкаем ShowMessage('click : ' + LocalClickPos.X.ToString + ' ' + LocalClickPos.Y.ToString + #13#10 + 'client: ' + ContentView.Width.ToString + #13#10 + pItem.Left.ToString + ' ' + pItem.Top.ToString + #13#10 + pItem.Right.ToString + ' ' + pItem.Bottom.ToString + #13#10); } pMy.X := trunc(LocalClickPos.X); pMy.Y := trunc(LocalClickPos.Y); if PtInRect(pItem, pMy) then begin ShowMessage('Нажалось))'); end else begin // нажатие на Item, выполняем код тут, не в OnItemClick end; end; стиль вот такой используется
-
удали из манифеста сам, такого не встречал
-
Здравствуйте! Вопрос в следующем: Почему при клике на TextButton вызывается OnItemClick? Как запретить вызов OnItemClick?
-
TMemo [TMemo] Ошибка рендеринга при большом кол-ве строк
Равиль Зарипов (ZuBy) опубликовал вопрос в TMemo
Здравствуйте! Хотелось бы узнать подробней об этом баге программа была запущена в течении нескольких часов, и вот выдало такой баг как лечить? или какое максимальное кол-во символов оно может содержать? в Мемо был лог, который писался в течении всего этого времени, но на скрине его нет. бывает еще такое проявление когда Мемо не рендерит текст и даже фон, просто принимает фон формы, остается толька каретка -
расширенная форма -> прикрепить файлы
-
1. ввёл Павловская 2. начал стирать, образовалась подсказка 3. ввёл Палисадная (несколько букв), выбрал 4. начал стирать, осталось подсказка Павловская Сделай чтобы при выборе Item'a менялась подсказка и кликнуть нужно два раза
-
begin fSSL := TIdSSLIOHandlerSocketOpenSSL.Create(fHTTP); fHTTP.IOHandler := fSSL; fHTTP.AllowCookies := True; fHTTP.HandleRedirects := True; end; Указать НУЖНЫЙ тип SSL/TLS и его версию и если это Windows программа, то надеюсь вы не забыли библиотеки ssl положить вместе с исполнительным файлом ответ на запрос, проверьте id вашего приложения
-
этот у параметр у формы есть, посмотри в свойствах формы
-
уверен что для этого нужна служба, а т.к. из коробки нет службы и её реализация через костыли (которые есть в интернете) не внушает доверия. т.к. на моём девайсе так и не получилось запустить. а те у кого получилось, быстро поняли что это туфта и приложение весом в сотни мегабайт в ОЗУ не способно жить долго, её менеджер памяти быстро выгрузит. хотя дерзайте
-
код будет таким marker:=Map1.AddMarker(markerDescription); ... if Assigned(marker) then marker.remove; а если хранить точки в TList<TMapCoordinate> то просто очистить List не приведет к удалению маркеров с карты нужно использовать for marker in List do marker.remove; List.clear; а на счет вываливания приложения с ошибкой, то перед выходом скорей всего нужно прописать Удаление Сервиса есть такой код в FMX.Maps.Android var MapService: TAndroidMapService; procedure RegisterMapService; begin MapService := TAndroidMapService.Create; TPlatformServices.Current.AddPlatformService(IFMXMapService, MapService); end; выполняется он в FMX.Maps initialization RegisterMapService; но я нигде не нашел UnRegisterMapService (ну или что-то подобное) во-общем суть такова: написать самому UnRegisterMapService (для всех платформ) и тогда можно будет избавиться от ошибок с другими формами и динамическим созданием
-
а у вас в приложении точно не стоит FullScreen? т.к. я сам имею на борту последнюю релизную версию 5.1.1, такого поведения не встречал
-
вперед и с песней в Android Studio, там такое есть