Alex7wrt
-
Постов
508 -
Зарегистрирован
-
Посещение
-
Победитель дней
31
Активность репутации
-
Alex7wrt получил реакцию от Ingalime в [Статья][AdMob] Добавляем рекламный блок в приложение
http://www.tahribat.com/forum/android---delphi-xe7-firemonkey-admob-interstitial-204528
-
Alex7wrt получил реакцию от Rusland в [Статья][AdMob] Добавляем рекламный блок в приложение
http://www.tahribat.com/forum/android---delphi-xe7-firemonkey-admob-interstitial-204528
-
Alex7wrt отреагировална vovanse в Не удается перетащить (Drag and Drop) итем TListBoxItem между двумя TListBox
private .... procedure DragOver(const Data: TDragObject; const Point: TPointF; var Operation: TDragOperation); override; procedure DragDrop(const Data: TDragObject; const Point: TPointF); override; .... procedure TMainForm.DragOver(const Data: TDragObject; const Point: TPointF; var Operation: TDragOperation); begin inherited; Operation:=TDragOperation.Link; end; procedure TMainForm.DragDrop(const Data: TDragObject; const Point: TPointF); begin ... свой код... inherited; end; -
Alex7wrt отреагировална Равиль Зарипов (ZuBy) в TDropTarget, пунктирная линия между компонентами, Windows
да отредактируйте стиль, там лежит Rectangle
убрать Sides
-
Alex7wrt отреагировална Brovin Yaroslav в TDropTarget, пунктирная линия между компонентами, Windows
Через стиль. Отредактировать стиль и убрать эту линию
-
Alex7wrt отреагировална krapotkin в TDropTarget, пунктирная линия между компонентами, Windows
вот. один компонент на форме. граница есть
никто вас не заставляет использовать dropTarget но реализация перетаскивания из explorer полностью ляжет на вас, как и было раньше
-
-
Alex7wrt отреагировална Brovin Yaroslav в [TMultiView] Починили TMultiView.Enable в Tokyo
Моя работа По просьбе трудящихся на этом форуме сделал эту задачу. А еще добавил настройки, чтобы можно было линию убирать.
-
Alex7wrt отреагировална kami в [Форум]Последние сообщения - проблемы
То, что "жирность" шрифта в этом блоке скачет как хочет - это, по большому счету, ерунда.
Но вот то, что "последнее сообщение" в теме не соответствует реальному - это уже плохо.
В качестве примера:
1 - скрин главной страницы после нажатия Ctrl+F5 (полное обновление, минуя кеш)
2 - скрин темы. Самое интересное - что цифра 4 на главной странице действительно соответствует количеству ответов в теме. Вот только последний - не от того пользователя.
-
Alex7wrt отреагировална alexbirukov в [Статья] PHP сервер для рассылки Push на Android и iOS
Ссылка на статью. Автор: Александр Бирюков В статья я максимально подробно попытался описать работу с PHP скриптом для рассылки Push сообщений из любой программы вне зависимости от платформы. Затрагивается вопроса от экспорта скриптов до кода программы: отправка и получение Push, регистрация устройств.
Надеюсь кому-нибудь пригодится. Буду рад комментариям, обоснованной критике и доработкам.
-
Alex7wrt отреагировална enatechno в Расположение компонентов Panel ImageViewer
1). Если в design-time: Задайте для ImageViewer: Align - None, Anchors - [akTop,akRight] и разместите ImageViewer на нужном месте (с необходимыми отступами).
2). Если не ошибаюсь, то нет свойства позволяющего сделать объект постоянно поверх все компонентов, поэтому рекомендую при добавлении компонентов перекрывающих ImageViewer делать ImageViewer.BringToFront;
3). Пропорционально относительно чего? Если пропорционально размера формы, то самостоятельно пересчитывайте размер ImageViewer в TForm.OnResize
4). Если речь идет о TPanel, то это стилевой объект и его цвет меняется через стиль. Более простой вариант - в качестве "панелек" использовать "не стилевой" TRecangle. Цвет TRectanle можете задать и в design-time и runtime (Rectangle1.Fill.Color := TAlphaColorRec.White)
И кстати, почему ImageViewer? Может TImage будет достаточно?
-
Alex7wrt отреагировална zairkz в Более быстрая альтернатива DrawBitmap
Попробуй движок Shadow Engine для Firemonkey, FPS впечатляет.
https://www.youtube.com/watch?v=w6lGasU61HQ
Gihub: https://github.com/dimsa/ShadowEngine
-
Alex7wrt отреагировална ENERGY в Запрет потери активности приложения
{$IFDEF ANDROID} procedure KeepScreenOn(aEnable: boolean); var vFlags: integer; begin vFlags := TJWindowManager_LayoutParams.JavaClass.FLAG_KEEP_SCREEN_ON; if aEnable then begin CallInUIThread ( // uses FMX.Helpers.Android procedure begin TAndroidHelper.Activity.getWindow.setFlags (vFlags, vFlags); end ); end else CallInUIThread ( procedure begin TAndroidHelper.Activity.getWindow.clearFlags (vFlags); end ); end; {$ENDIF} Это для Berlin и ниже.
При использовании Tokyo - вызов CallInUIThread не нужен, можно вызывать напрямую, т.к. теперь главный Delphi поток это Java UIThread.
iOS
uses iOSapi.UIKit; {$R *.fmx} procedure TForm6.Button1Click(Sender: TObject); var UIApp : UIApplication; begin UIApp := TUIApplication.Wrap(TUIApplication.OCClass.sharedApplication); UIApp.setIdleTimerDisabled(True); end; -
Alex7wrt отреагировална HyperZen в Запрет потери активности приложения
Запретить отключение экрана приложения в Андроид:
в файл проекта (Project - View Source) добавить строки:
// в uses {$IFDEF ANDROID} Androidapi.Helpers, Androidapi.JNI.App, Androidapi.JNI.GraphicsContentViewText, {$ENDIF} {$R *.res} // и далее - перед Application.Initialize begin {$IFDEF ANDROID} TAndroidHelper.Activity.getWindow.addFlags(TJWindowManager_LayoutParams.JavaClass.FLAG_KEEP_SCREEN_ON); {$ENDIF} Application.Initialize; ...
-
Alex7wrt отреагировална enatechno в Get запросы в iOS
Result у Вас какого типа? Попробуйте без него:
xml_result:=HTTPGet('https://geocode-maps.yandex.ru/1.x/?geocode='+ 'Кунгур'+ ',+' +street+ '+улица,+дом+'+ house);
-
Alex7wrt отреагировална Равиль Зарипов (ZuBy) в Область, занимаемая TBitmap
У TBitmap есть метод BoundsF, достаточно посмотреть его реализацию
property BoundsF: TRectF read GetBoundsF; ... function TBitmap.GetBoundsF: TRectF; begin Result := TRectF.Create(0, 0, Width, Height); end;
-
Alex7wrt отреагировална krapotkin в Область, занимаемая TBitmap
потому что вы видите Width/Height, а рассуждаете про Right/Bottom
в GDI, где указывались именно координаты, а не ширина/высота, тем не менее, эта единичка тоже отнималась внутри функции, так что самому это делать было также не нужно))
-
Alex7wrt отреагировална Равиль Зарипов (ZuBy) в Get запросы в iOS
проверка интернета
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;
-
Alex7wrt отреагировална Brovin Yaroslav в List of new features and customer reported issues fixed in RAD Studio 10.2 Tokyo
Прочитать всю новость целиком на сайте Embarcadero
-
Alex7wrt отреагировална ENERGY в id: warning: directory not found for option ...PrivateFrameworks
Tools/Options/SDK Manager и удалите фрэймворк UIFoundation из всех конфигов iPhoneOS.
Apple удалили этот фреймворк начиная с iOS 9.3, а Platform Assistant не может получить ассоциированные файлы. источник
-
Alex7wrt отреагировална AngryOwl в TVideoCaptureDevice, трансляция в потоке
На случай "своими руками", я бы порекомендовал Вам копать в сторону WebRTC. Разумеется все зависит от конечных задач, стоящих перед Вашей программой. Судя по всему - это организация потокового видео в режиме реального времени на соответствующие сервисы. А это значит, что:
- нужно организовать формирование и передачу RTMP (RTSP) потока, с чем в Delphi (если о нем речь идет) есть определенные сложности) (в ситуации с С++ будет немного проще);
- нужно использовать кодеки (encoder), формат которых поддерживается теми системами, на которых вы хотите видеть воспроизведение потока. Аналогично, как и в вопросе с rtmp-потоком, ситуация с реализацией в Delphi будет сложнее (хотя тоже можно);
- что касается конвертации кадров из одного формата в другой, то тут все немного проще. В интернете полно алгоритмов описывающих конвертацию битмапа из одного формата в другой. Разумеется - не все так просто. Поскольку необходимо не просто конвертировать кадры, перед тем как передать их энкодеру, но еще и правильно от энкодера получить сам поток и передать его. После энкодера, конечно, идут не просто "кадры". В зависимости от настроек энкодера, сначала идет "ключевой кадр" (и он повторяется с определенной периодичностью), а за ним последовательность "фреймов" - "описывающих" лишь изменения в "ключевом кадре".
Кратко как-то так...
В любом случае, я бы порекомендовал Вам сначала пошарить по ресурсу, описывающему работу с потоковым видео. Просто понять как это работает, в принципе. Ну и многое можно там же подчерпнуть. Например, просто как оптимальнее настроить энкодер для трансляции того или иного видео.
-
Alex7wrt отреагировална AngryOwl в TVideoCaptureDevice, трансляция в потоке
Добрый!
Есть. Можно использовать сторонние библиотеки и модули, но цена у них приличная, а можно самому сделать. Вот на счет "самому" - будет непросто))) Очень непросто)
-
Alex7wrt отреагировална sinuke в Учебное приложение "Слесарное дело"
Название: Слесарное дело
Платформа: Android, Windows, macOS
Устройство: ПК, смартфон, планшет
Разрешение экрана: любое
Ссылки на скачивание Windows-версии: https://yadi.sk/d/iIeC0OE8ukMoi
Ссылка на скачивание macOS-версии: https://yadi.sk/d/wBpoFcKe3LgiKx
Google Play: https://play.google.com/store/apps/details?id=com.sinukeapps.locksmithery
Описание: Приложение представляет собой электронный конспект по слесарному делу, с помощью которого можно самостоятельно подготовится к занятиям. В него включены 16 тем, поделённые на блоки. Для каждой темы разработаны тесты для самоконтроля. В приложении имеется глоссарий для быстрого поиска по основным понятиям, а также возможность экспорта материалов в текстовый PDF-формат для дальнейшей печати.
-
Alex7wrt отреагировална Равиль Зарипов (ZuBy) в Прозрачные контролы
в FMX все делается с помощью стилей, нужно отредактировать стиль TGroupbox
-
Alex7wrt отреагировална enatechno в Прозрачные контролы
Это решается редактированием стиля.
Например так:
1). Размещаете TGroupbox на форме
2). ПКМ на нем
3). в контекстном меню выбираете Edit Custom Style (или Edit Default style)
4). в открывшемся редакторе стиля указываете платформу (Android)
5). выбираете объект background (по умолчанию он белый).
6). задаете ему свойство Visible=false