XXXXXX
Пользователи-
Постов
46 -
Зарегистрирован
-
Победитель дней
2
XXXXXX стал победителем дня 24 августа 2016
XXXXXX имел наиболее популярный контент!
Информация о XXXXXX
- День рождения 02.06.2023
Информация
-
Пол
Не определился
Посетители профиля
Блок последних пользователей отключён и не показывается другим пользователям.
Достижения XXXXXX
-
Евгений Корепов отреагировал на ответ на вопрос: Gif File
-
Здравствуйте. Есть один вариант с использованием TBitmapListAnimation: Кидаем обычный TImage на форму. Под TImage создаём TBitmapListAnimation. Структура должна выглядеть так: В свойствах TBitmapListAnimation: AnimationBitmap - загружаем ленту картинок. Например: Для коротких Gif -ок можно использовать онлайн конверторы: http://ezgif.com/split - разделение Gif на отдельные фреймы (картинки) http://www.photojoiner.net/merge-photos/editor/# - соединение нескольких картинок в одну (соединяет до 8 штук) AnimationCount - сколько раздельных картинок в нашей объеденённой по горизонтали (в нашем слечае 8) AnimationRowCount - сколько рядов в нашей картинке (в нашем случае 1) Enabled = True Duration - указываем промежуток времени, которое должна занимать гифка (в секундах). PropertyName - прописываем Bitmap
-
Axbor отреагировал на вопрос: Listbox как в сообщениях на андроиде
-
zairkz отреагировал на сообщение в теме: Обновление форума
-
#WAMACO отреагировал на сообщение в теме: Обновление форума
-
Отличные изменения. Ещё было бы неплохо увидеть закреплённую верхнюю панель при скролле вниз, ну или плавающую кнопку которая будет скролить вверх
-
TNotificationCenter получить количество активных уведомлений?
XXXXXX опубликовал вопрос в TNotificationCenter
var Notification: TNotification; begin Notification := NotificationCenter1.CreateNotification; Notification.Name := 'Notification1'; Notification.AlertBody := 'Message'; Notification.FireDate := Now; NotificationCenter1.ScheduleNotification(Notification); есть такой код, он выкидывает локальное уведомление. можно ли получить кол-во "Неотменённых" уведомлений, т.е. активных? -
Rusland отреагировал на ответ на вопрос: Получить уровень сигнала GSM/LTE
-
Код: function TfMain.CheckMobileInternetSpeed: String; var mTelephonyManagerObj: JObject; mTelephonyManager: JTelephonyManager; mNetworkType: Integer; ReturnValue: string; begin mTelephonyManagerObj := SharedActivityContext.getSystemService(TJContext.JavaClass.TELEPHONY_SERVICE); mTelephonyManager := TJTelephonyManager.Wrap((mTelephonyManagerObj as ILocalObject).GetObjectID); mNetworkType := mTelephonyManager.getNetworkType(); with TJTelephonyManager.JavaClass do begin if mNetworkType = NETWORK_TYPE_UMTS then ReturnValue := 'GPRS' else if mNetworkType = NETWORK_TYPE_UMTS then ReturnValue := 'EDGE' else if mNetworkType = NETWORK_TYPE_UMTS then ReturnValue := 'CDMA' else if mNetworkType = NETWORK_TYPE_UMTS then ReturnValue := '1xRTT' else if mNetworkType = NETWORK_TYPE_UMTS then ReturnValue := 'IDEN' else if mNetworkType = NETWORK_TYPE_UMTS then ReturnValue := 'UMTS' else if mNetworkType = NETWORK_TYPE_EVDO_0 then ReturnValue := 'EVDO_0' else if mNetworkType = NETWORK_TYPE_EVDO_A then ReturnValue := 'EVDO_A' else if mNetworkType = NETWORK_TYPE_HSDPA then ReturnValue := 'HSDPA' else if mNetworkType = NETWORK_TYPE_HSUPA then ReturnValue := 'HSUPA' else if mNetworkType = NETWORK_TYPE_HSPA then ReturnValue := 'HSPA' else if mNetworkType = NETWORK_TYPE_EVDO_B then ReturnValue := 'EVDO_B' else if mNetworkType = NETWORK_TYPE_EHRPD then ReturnValue := 'EHRPD' else if mNetworkType = NETWORK_TYPE_HSPAP then ReturnValue := 'HSPAP' else if mNetworkType = NETWORK_TYPE_LTE then ReturnValue := 'LTE'; end; Result := ReturnValue; end; Советую почитать, насчёт того, какие буквы используются чтоб отобразить уровень сигнала на андроиде (G, E, H, H+ и т.д.) П.с. учтите, что это уровень сигнала а не скорость подключения.
- 12 ответов
-
- delphi
- SignalStrength
-
(и ещё 1 )
C тегом:
-
Попробуйте использовать этот модуль. При помощи него можете выполнять действие в отдельном потоке. Использование: procedure StartAsyncThread; begin Run(TAsyncTask, procedure(ATask: IAsyncTask) begin //что делать end, procedure(ATask: IAsyncTask) begin //Что делать после завершения end); end; AsyncTask.zip
-
XXXXXX отреагировал на вопрос: Поздравляю всех с Новым Годом!
-
Странно, нет у меня ничего подобного, всё устанавливается/ запускается, помимо самого сервиса
-
я тоже пытался выполнить задачу этим компонентом, но ничего не вышло, стрим просто не хочет запускаться, хотя в VLC плеере проигрывается отлично
- 3 ответа
-
- Url Video
- Stream Video
-
(и ещё 2 )
C тегом:
-
Спасибо большое, действительно помогли посты, к сожалению для стрима у меня вот такая ссылка, rtmp://92.51.103.10/live/tiflistv2 я с самого начала неправильно написал, извините, наверное это уже для новой темы вопрос, если можно тут задам, кто-нибудь сталкивался с rtmp? как обычную ссылку не могу проиграть, насколько я понял там другая структура потока.
- 3 ответа
-
- Url Video
- Stream Video
-
(и ещё 2 )
C тегом:
-
Есть ли возможность проиграть видео на андроиде находящееся по определённой ссылке? Допустим: https://archive.org/download/ksnn_compilation_master_the_internet/ksnn_compilation_master_the_internet_512kb.mp4 Желательно запустить видео в самой программе, без интентов. После поисков в интернете наткнулся на ссылку http://code.tutsplus.com/tutorials/streaming-video-in-android-apps--cms-19888 Тут объясняется как сделать это в андроид студие (при помощи VideoView). К сожалению на fm не нашёл нигде рабочего примера.
- 3 ответа
-
- Url Video
- Stream Video
-
(и ещё 2 )
C тегом:
-
Kitty отреагировал на вопрос: Listbox как в сообщениях на андроиде
-
а запуск звонока и смс работают? нет, но можете вызывать любую процедуру в окончании ивентов
-
Если кому-нибудь понадобится Listbox такой-же как и в списке сообщений в андроиде. ListboxInteractions.zip
-
XXXXXX отреагировал на ответ на вопрос: Алфавитный скроллинг для ListView
-
Я думаю можно изменять размер ползунка в стиле динамически, но вот как это реализовать не уверен.
- 38 ответов
-
- listview
- fast scrolling
-
(и ещё 1 )
C тегом:
-
XXXXXX отреагировал на ответ на вопрос: Алфавитный скроллинг для ListView
-
Кстати на скролбаре что ползунок, его никак не увеличить? Из-за того что он меньше чем ползунок listview, образуется "слепая зона", в которой двигаешь ползунок а список остаётся на месте
- 38 ответов
-
- listview
- fast scrolling
-
(и ещё 1 )
C тегом:
-
Если посадить на ListView1ScrollViewChange, то будет вечный конфликт ) Изменение Scrollbar1.Value влечет вызов ScrollBar1Change где происходит скроллирование LV. Следовательно будет вызван ListView1ScrollViewChange... получится бесконечный цикл ) ну тогда можно взять переменную, и переключать её когда меняется из ListView ListView1ScrollViewChange: ScrollBarChange := True; ScrollBar1.Value := ListView1.getFirstVisibleItemIndex; ScrollBarChange := False; ScrollBar1Change: if not ScrollBarChange then ListView1.ScrollTo(Round(ScrollBar1.Value));
- 38 ответов
-
- listview
- fast scrolling
-
(и ещё 1 )
C тегом: