Перейти к содержанию
Fire Monkey от А до Я

Равиль Зарипов (ZuBy)

Модераторы
  • Постов

    2 517
  • Зарегистрирован

  • Посещение

  • Победитель дней

    265

Весь контент Равиль Зарипов (ZuBy)

  1. неплохо было бы выложить ответ, как вы решили это. чтобы у других не было проблем в будущем
  2. если используется SDK > 23, то приложение должно запросить права у пользователя. Но стандартный SDK студии < 23 так что достаточно использовать старый способ (указать в настройках проекта)
  3. картинка из примера Загружаем её в BitmapListAnimation настройка BitmapListAnimation ну и не забываем BitmapListAnimation1.Enabled := true;
  4. вот есть такой пример, может поможет разобраться TBitmapAnimation.zip
  5. если убрать этот стиль, то можно всю настройку делать цветом (как показано в демке) там же и задавать цвет для разделителей
  6. смотрим внимательно if not AValues[0].IsEmpty then begin ShowMessage(val[0]); // ???? end;
  7. 1) Динамическая подгрузка описана тут http://blog.rzaripov.kz/2016/12/3-modernlistview.html 2) так критические баги не фиксят, куда им до рюшечек 3) вроде поправил в последней версии (на гите)
  8. Все прекрасно работает InputQuery.zip
  9. Есть небольшой проект с горизонтальным режимом в статье, если не получится реализовать, то помогу http://blog.rzaripov.kz/2016/11/1-modernlistview.html
  10. Не будем разбирать конкретно этот случай, пока Токио очень сырой. Сломали всё что можно было. (обсуждали в чате) Чтобы не плодить темы на форуме, вернитесь на Берлин апдейт 2, до какого нить хот-фикса от Ембы.
  11. @Anasazi исправил код, проверьте его. там всего один параметр - принимает ссылку
  12. это бот постит, от имени Ярослава. Все обсуждения были по этой новости вчера в чате
  13. переименуйте методы, компилятор скажет где она вызывается
  14. При том, что ошибка такая была только под Windows, на других платформах её не было. и фикс соответственно для Windows Вы хоть поняли для чего этот файл нужен? видимо нет, я распишу тогда Используете код который дал @HyperZen Кладете файлик рядом с проектом и подключаете в uses с директивой {$IFDEF MSWINDOWS} FMX.DialogHelper.pas {$ENDIF} Готово, бага больше не будет, и остается кросс-платформенное решение
  15. а что на других платформах также? проблема была только в Windows на сколько я помню
  16. положи в папку с проектом этот файл и подключи его в проект это решение для Windows FMX.DialogHelper.zip
  17. по секрету, никто им не пользуется
  18. да есть такое. но китай это имеется ввиду, те аппараты которые просто шлак. для примера на вид айфон, внутри андроид я бы по этому поводу даже не переживал, Meizu, ZTE и прочие качественные (истинные) китайцы, такой проблемой не страдают
  19. У TBitmap есть метод BoundsF, достаточно посмотреть его реализацию property BoundsF: TRectF read GetBoundsF; ... function TBitmap.GetBoundsF: TRectF; begin Result := TRectF.Create(0, 0, Width, Height); end;
  20. ну если вам для андроида, то есть один вариант ANDROID_ID // uses Androidapi.Helpers, Androidapi.JNI.Provider; // permission read_phone_state ShowMessage(JStringToString(TJSettings_Secure.JavaClass.getString(TAndroidHelper.ContentResolver, TJSettings_Secure.JavaClass.ANDROID_ID)));
  21. Нужно помнить это FMX это кроссплатформенный фреймворк и содержит функционал который есть в каждой из платформ (ну в большинстве случаев) так вот эти самые деления есть только в Windows, так что их просто вырезали из компонента
  22. ничего страшного в этом нет, главное пакет устанавливается на телефон. у меня тоже такое часто, иногда все нормально. причины не ясны
  23. проверка интернета function CheckInet: boolean; var aResp: IHTTPResponse; aHTTP: THTTPClient; begin Result := false; aHTTP := THTTPClient.Create; try try aResp := aHTTP.Head('http://google.com'); Result := aResp.StatusCode < 400; except Result := false; end; finally FreeAndNil(aHTTP); end; end; get запрос function HTTPGet(const aURL: string): string; var aHTTP: THTTPClient; aResp: TStringStream; begin Result := 'Error'; aResp := TStringStream.Create('', TEncoding.UTF8); aHTTP := THTTPClient.Create; try try aHTTP.Get(aURL, aResp); Result := aResp.DataString; except Result := 'Error'; end; finally FreeAndNil(aHTTP); FreeAndNil(aResp); end; end;
  24. Сейчас не за компом, но решение есть
×
×
  • Создать...