Активность

Лента обновляется автоматически     

  1. Сегодня
  2. unauthorized access to "libqslite.so"

    https://blog.xamarin.com/preparing-for-native-library-linking-changes-in-android-n/
  3. Вчера
  4. unauthorized access to "libqslite.so"

    Перейти на Berlin update 2, в Токио под Android много багов.
  5. unauthorized access to "libqslite.so"

    Видимо использовать более свежую версию студии! Со времен XE7 много воды утекло, многое поправили.
  6. unauthorized access to "libqslite.so"

    Здравствуйте! Пишу FMX приложение на XE7. Приложение работает с БД SQLite. Для доступа использую TFDConnection, TFDTransaction, TFDTable. Телефон на Android 7. При запущенном приложении после просыпания телефона, или переключении на это приложение из других программ получаю сообщение: Detected problems with app native libraries (please consult log for detail): myprog.so: unauthorized access to "libsqlite.so". Как мне устранить эту проблему? Не подавить сообщение, а именно исправить проблему.
  7. Tlabel Click

    Добавил, помогло. СПАСИБО!
  8. Последняя неделя
  9. Tlabel Click

    lblCompanyMail.HitTest := True; Есть такая строчка у вас?
  10. Tlabel Click

    Доброго времени суток, на Delphi 10.2.3 наблюдается странное поведение компоненты TLabel (FMX) Из свойств установлено: lblCompanyMail.StyleLookup := 'labelstyle'; lblCompanyMail.ApplyStyleLookup; lblCompanyMail.AutoSize := True; lblCompanyMail.WordWrap := False; lblCompanyMail.Text := 'info@company.com'; lblCompanyMail.Position.X := 10; lblCompanyMail.Position.Y := 10; lblCompanyMail.TabStop := False; По событию OnClick ничего не происходит. В чем может быть затык? Заранее, спасибо!
  11. Как бы это по мягче сказать.... он (почти) работает. На андроиде работает (хоть как-то) только он, на винде глюков в несколько раз меньше стокового. Я про российский компонент. TRichView. Даже бэкап сайта на его основе делал. Честно скажу - 700к в него не пихал, но порядка 80-100к - живал без проблем.
  12. Windows 7x64 (но собирал под x32). А так прога с прицелом и на Android тоже. TMS браузер не пробовал, в чём собственно его преимущество? RichEdit от TMS пробовал - очень сильно медленно работает, а у меня около 700k чистого текста. И кроме того - в html легко сделать мягкие переносы, выравнивание по обоим краям, колонки через табличную вёрстку и подгонка высоты и ширины колонок через встроенный javascript - так что richedit-ы для меня использовать не вариант. А браузер не перерисовывается не потому, что команда не успевает сработать, а не обновляется вообще, и через минуту, если не дёрнешь. Так вот - как можно программно это "дёрганье" сэмулировать?
  13. Обработка ява-скрипт команды занимает некоторое время и происходит асинхронно. Поэтому если сразу сделать репаинт - ничего не изменится. P.S. Что за ОС? Как ведёт себя браузер от TMS? Вообще если статический html и якоря, то на дельфе лучше richedit какой-нибудь сторонний использовать... Ну это так, к слову.
  14. Хм, что-то получилось. Вот таким костылём, но меня вполне устраивает: WebBrowser1.EvaluateJavaScript('document.location.href=''#z10'';'); Только одно "но" - браузер не обновляется автоматически, только когда начнёшь скроллить происходит реальное отображение новой позиции. WebBrowser.Repaint и Application.ProcessMessages не дают нужного эффекта.
  15. Есть динамически создаваемая страница, на ней размечены опорные точки <a name="zXXX"></a> WebBrowser1.LoadFromStrings(GenerateHtml, ''); Есть TreeView, нажатие на пункты которого должно скроллить браузер к этим якорям. Вот так: не получается... WebBrowser1.Navigate('#z10'); Как это можно сделать? Может, есть какое-то внутреннее имя у страницы, чтобы указать в Navigate? В LoadFromStrings в качестве 2-го параметра задавал имя, допустим 'test', в Navigate указывал 'test#z10' - не работает. Подскажите кто знает...
  16. Скругление углов у Edit

    Всем привет. Кто поможет подсказать, как сделать скругление углов у Edit только с одной стороны (слева, сверху, справа, снизу и так далее), а не везде сразу? Есть задача сделать: Но пока что у меня: Спасибо за помощь.
  17. Тут в процессе работы над одним проектом понадобилось узнать IP адрес устройства. Очень не хотелось включать дополнительные разрешения приложению. Думал ограничится одним "Доступ в Интернет". Вот как это можно сделать: С помощью TIdUDPServer посылаем широковещательное сообщение, с помощью того же TIdUDPServer сами получаем его и в ABinding узнаем с какого IP оно пришло. Таким образом мы узнаем IP адрес интерфейса с маршрутом по умолчанию. Вот код, все просто: unit Unit1; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, IdGlobal, IdSocketHandle, IdBaseComponent, IdComponent, IdUDPBase, IdUDPServer; const ConstUDPSendString = 'dfgb2hd3f6gbf'; type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); private { Private declarations } FUDPServer : TIdUDPServer; FMyIP : String; procedure OnUDPServerUDPRead(AThread: TIdUDPListenerThread; const AData: TIdBytes; ABinding: TIdSocketHandle); procedure GetMyIP; public { Public declarations } end; var Form1: TForm1; implementation {$R *.fmx} procedure TForm1.FormCreate(Sender: TObject); begin GetMyIP; end; procedure TForm1.GetMyIP; begin FMyIP:=''; FUDPServer:=TIdUDPServer.Create; FUDPServer.DefaultPort:=46734; FUDPServer.BroadcastEnabled:=True; FUDPServer.OnUDPRead:=OnUDPServerUDPRead; FUDPServer.Active:=True; FUDPServer.Broadcast(ConstUDPSendString, FUDPServer.DefaultPort); end; procedure TForm1.OnUDPServerUDPRead(AThread: TIdUDPListenerThread; const AData: TIdBytes; ABinding: TIdSocketHandle); begin AThread.Synchronize(AThread, procedure begin if BytesToString(AData).Equals(ConstUDPSendString) and FMyIP.IsEmpty then FMyIP:=ABinding.PeerIP; end ); end; end.
  18. Использование SSL

    Благодарю всех ответивших !
  19. Да ничего сложного. Вы как в телеграмме дублируйте новости на английском языке. Все. Мы сами позаботимся, чтобы иностранцы имели прямую ссылку на этот раздел форума...
  20. Так поиск в словаре O(1). Вычисление хеша и получение индекса.
  21. Но ведь еще нужно время чтобы в словаре найти сответствие.
  22. Если я все помню, то поиск в не упорядоченном списке Бинарным поиском - это O(nlog(n)). А поиск в словаре О(1).
  23. Проще использовать бинарный поиск для поиска своего индекса-идентификатора контрола, готовый бинарный поиск реализован в TList и его потомках, также в массивах.
  24. Использование SSL

    Лучше спросить у хостера. Обычно у них в панели есть кнопка для включения этого - ткнул и появился https c сертификатом от Let's Encrypt.
  25. ListView - DynamicAppearance - header

    у винды было такое например свойствоTListView.TopItem, по которому можно было узнать где сейчас отрисовка. OnPullRefresh - это событие, когда пользователь на первом элементе крутит вверх. используется для обновления данных. а тут чуть другое. попробую определять верхний индекс итема через indx := Trunc(ListView.ScrollViewPos / ListView.ItemAppearance.ItemHeight); далее прибавить кол. видимых итемов (ListView.Height / ListView.ItemAppearance.ItemHeight) и узнать примерно подходим мы к концу или нет.
  1. Загрузить ещё активность