Перейти к содержанию

Лидеры


Популярный контент

Показан контент с высокой репутацией за 14.04.2021 во всех областях

  1. 2 балла
    slav_z

    Автопрокрутка TListBox

    скорее всего стиль у TListBox еще не загружен... и ему нечего еще прокручивать... попробуйте это:
  2. 2 балла
    Slym

    Intent Delphi->1C

    Не пробовал... может так? вместо form1.close пишем TAndroidHelper.Activity.setResult(RESULT_OK, Intent); TAndroidHelper.Activity.Finish;
  3. 2 балла
    здесь на форуме это все уже обсуждалось... на андроид 11 изменилось расположение системных библиотек... дельфи 10.2 об этом не знает... 10.3.3 еще можно было заставить работать с андроид 11 (исправлением и перекомпиляцией System.pas)... но надо ставить 10.4... надо... sdk и файл манифеста тыркать бесполезно....
  4. 2 балла
    slav_z

    FMX: Скроллинг и нажатия

    Все разработчики при работе с FMX рано или поздно сталкиваются с одной и той же проблемой: необходимо исключить "случайное" срабатывание нажатий элементов внутри скроллбокса во время его скроллинга. Идут годы, а решения так и нет. Давайте попробуем это исправить. Поехали! Запускаем IDE, создаем новый проект, кидаем на форму TVertScrollBox и на него чего-нибудь побольше... запускаем на мобильном устройстве, пытаемся скроллировать, получаем проблемы в виде срабатывания разных событий типа OnClick элементов. Решение состоит в том, чтобы сделать элементы "невидимыми" для событий связанных с действиями пользователя с экраном во время скроллинга. Делаем следующее: Все. Переносим код в базовую форму, делаем его более гибким, убираем все те костыли, которые мы уже успели сделать ранее... Удачи! https://github.com/slav-libx/scroll-click.git
  5. 1 балл
    Navadvipa Chandra das

    FireDAC, PostgreSQL процедуры и Blob параметры

    Здравствуйте! Блоб параметры в процедурах PostgreSQL победить не удалось, а вот та же функциональность через Блоб-поля TFDQuery была достигнута. В целом такой вариант более универсален. void __fastcall TNNConfig::SaveToDB() { if ( Connection && !Connection->Connected ) return; TMemoryStream* ms = new TMemoryStream(); fFiler = new TNNTextStream( ms ); try { SaveFilerFromUserEvent(); std::unique_ptr< TFDQuery > quReg( new TFDQuery( this ) ); std::unique_ptr< TFDTransaction > trReg( new TFDTransaction( this ) ); quReg->Connection = Connection; trReg->Connection = Connection; quReg->Transaction = trReg.get(); String RK = RegistryKey(); Connection->StartTransaction(); try { quReg->SQL->Text = "SELECT \"UserRegKey\", \"UserData\" FROM \"UserReg\" where \"UserRegKey\" = :UserRegKey_"; quReg->Params->Items[ 0 ]->DataType = ftString; quReg->Params->Items[ 0 ]->AsString = RK; quReg->Open(); if ( quReg->RecordCount == 0 ) { quReg->Insert(); quReg->Fields->Fields[ 0 ]->AsString = RK; } else quReg->Edit(); TBlobField *bf = ((TBlobField *)(quReg->Fields->Fields[ 1 ])); bf->LoadFromStream( Filer ); quReg->Post(); Connection->Commit(); } catch ( ... ) { Connection->Rollback(); } } __finally { delete fFiler; fFiler = nullptr; } } bool __fastcall TNNConfig::LoadFromDB() { if ( Connection && !Connection->Connected ) return false; bool B = false; std::unique_ptr< TFDQuery > quReg( new TFDQuery( this ) ); std::unique_ptr< TFDTransaction > trReg( new TFDTransaction( this ) ); quReg->Connection = Connection; trReg->Connection = Connection; quReg->Transaction = trReg.get(); quReg->SQL->Text = "SELECT \"UserRegKey\", \"UserData\" FROM \"UserReg\" where \"UserRegKey\" = :UserRegKey_"; quReg->Params->Items[ 0 ]->DataType = ftString; quReg->Params->Items[ 0 ]->AsString = RegistryKey(); quReg->Open(); if ( quReg->RecordCount == 1 ) { TBlobField *bf = ((TBlobField *)(quReg->Fields->Fields[ 1 ])); bf->SaveToStream( Filer ); B = true; } return B; } Вопрос закрыт! Спасибо! С уважением, Навадвипа Чандра дас.
  6. 1 балл
    Android

    Как получить IMEI?

    вовсе необязательно ИМЕННО там вставлять
  7. 1 балл
    DENWEB

    Посоветуйте облачную бд

    пробовал TMS - они их написали несколько лет назад и сейчас ничего не работает, почти все сервисы сменили API (например, тот же firebase), а они не обновили
  8. 1 балл
    Приложение может вылетать по разным причинам. Возможно дело в том, что пытаетесь прочитать или записать файл в публичную папку. На Андроид 11 мало запроса разрешения, теперь чтение и запись файлов делается иначе. У меня приложение на Делфи работает на 29 СДК (это от Андроид 10), но пришлось добавить строку, о которой написано в теме на которую дал ссылку. Иначе не работало на Андроид 11.
  9. 1 балл
    Когда экран находиться в ориентации ландшафт при получении фокуса TEdit появляется виртуальная клавиатура на android при нажатии аппаратной кнопки назад приложение закрывается. В портретном режиме закрывается только виртуальная клавиатура. Как отменить закрытие приложения?
  10. 1 балл
    TeeChart Варианты графиков:
  11. 0 баллов
    Поставить галочку и нажать Скачать
Эта таблица лидеров рассчитана в Москва/GMT+03:00
×
×
  • Создать...