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

Rusland

Пользователи
  • Постов

    1 204
  • Зарегистрирован

  • Посещение

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

    26

Активность репутации

  1. Like
    Rusland отреагировална Alex7wrt в Что лучше: TIdHttp или TNetHTTPClient?   
    Раньше использовал TIdHttp, затем перешёл на THttpClient.
    THttpClient и TNetHttpClient - по сути одно и то же, только последний является визуальным компонентом.
    Поэтому в вашем случае корректнее сравнивать THttpClient и TIdHttp.
    Конкретно для моих целей использование THttpClient предпочтительнее, поскольку он из коробки работает с https на всех платформах, а в случае TIdHttp для этого ещё нужно подключать ssl.
    Разницы в скорости работы не замечал.
  2. Like
    Rusland отреагировална FREEFAR в Ошибка при определении адреса по координатам   
    У нас при масштабировании одного проекта сталкивались со следующим:
    - на устройствах отсутствовали Google Maps Service (или что-то в это духе)
    - сервис режима энергосбережения тушил сервис Google Maps Service (или что-то в это духе)
     
  3. Like
    Rusland получил реакцию от Anatoliy в Программа не запускается под Android   
    Вообще никаких сообщений не показывается?

    Тогда только смотреть через monitor.bat, что там происходит с приложением.
  4. Like
    Rusland получил реакцию от Andrey Efimov в Программа не запускается под Android   
    Судя по скринам ini-файл берется из папки Android\Debug. Зачем так делать? Эту папку создает сама студия. Возможно что Clean очищает все содержимое в этой папке и строка становится неактивной, потому что файла больше нет.
     
    Какую ошибку при этом выдает?
  5. Like
    Rusland отреагировална valdemar в Как включить/выключить звук у MediaPlayer?   
    Вообще да, нужно после каждого открытия файла ставить в 0 громкость. Плеер берёт из файла максимальную громкость.
    MediaPlayer1.FileName:=file_;
    MediaPlayer1.Volume :=0;
    MediaPlayer1.Play;
  6. Like
    Rusland отреагировална enatechno в Покрасить ячейку Stringgrid в зависимости отзначения ячейки   
    У Вас перепутаны строки и столбцы. Нужно или так:
     
    for i := 0 to n-1 do for j := 0 to m-1 do Или же так:  
    SG.Cells[i,j]:=inttostr(ImMas[i,j]); TStringGrid:  property Cells[const ACol, ARow: Integer]
     
    TestSGDraw.zip
  7. Like
    Rusland отреагировална mazayhin в Программа не запускается под Android   
    За это отвечает Deployment.
    Добавьте нужные файлы, укажите путь и все.
    Подробнее смотрите http://docwiki.embarcadero.com/RADStudio/Berlin/en/Deployment_Manager и http://docwiki.embarcadero.com/RADStudio/Berlin/en/Creating_an_Android_App#Loading_and_Deploying_Files
    Так же есть статья в блоге Андрея Ефимова http://delphifmandroid.blogspot.ru/2014/02/deployment-manager.html
  8. Like
    Rusland получил реакцию от Anatoliy в Слайд с пролистывание картинок в форме   
    Если нужен именно слайдер, то посмотрите на этот компонент Ярослава
     
  9. Like
    Rusland получил реакцию от Anatoliy в Слайд с пролистывание картинок в форме   
    var Form1: TForm1; ind: integer; implementation {$R *.fmx} procedure TForm1.FormCreate(Sender: TObject); begin ind := 0; end; procedure TForm1.Timer1Timer(Sender: TObject); begin ind := ind + 1; if FileExists(System.IOUtils.TPath.Combine( System.IOUtils.TPath.GetDocumentsPath, 'picture' + ind.ToString + '.png')) then Image1.Bitmap.LoadFromFile(System.IOUtils.TPath.Combine( System.IOUtils.TPath.GetDocumentsPath, 'picture' + ind.ToString + '.png')); end;  
  10. Like
    Rusland получил реакцию от enatechno в Слайд с пролистывание картинок в форме   
    Если нужен именно слайдер, то посмотрите на этот компонент Ярослава
     
  11. Like
    Rusland отреагировална enatechno в Ссылка на "Политика конфиденциальности"   
    Либо использовать TWebBrowser,  либо вызвать внешний браузер:
    http://fire-monkey.ru/topic/3236-открыть-ссылку/
  12. Like
    Rusland отреагировална enatechno в TEdit с автозавершением   
    Пользуйтесь поиском на сайте.
    У TMS есть еще такой вариант TTMSFMXEdit. Но он платный
  13. Like
    Rusland отреагировална Kitty в Программа не запускается под Android   
    #include <System.IniFiles.hpp> #include <System.IOUtils.hpp> #include <memory> //**** #ifdef __ANDROID__ String path = System::Ioutils::TPath::Combine(System::Ioutils::TPath::GetSharedDownloadsPath(), L"options.ini"); #elif _Windows String path = System::Ioutils::TPath::Combine(ExtractFilePath(ParamStr(0)), L"options.ini"); #endif if(FileExists(path)) { std::unique_ptr<TIniFile> FileINI(new TIniFile(path)); String ip = FileINI->ReadString(L"HOST", L"ip", L"127.0.0.1"); //**** 1. std::unique_ptr используется чтобы избавиться от delete. std::unique_ptr все делает сам.
    2. Файл ini для Андроида надо сохранить в UTF-8.
  14. Like
    Rusland отреагировална enatechno в Не отображается Splash форма на iOS   
    Цитирую Виталия из этой темы:
    Там же есть пример реализации сплеша с прогрессбаром. 
  15. Like
    Rusland отреагировална Кривяков Виталий в Splash Form не отображается   
    Добрый день!
     
    Firemonkey имеет много отличий в работе от VCL. Одно из них связано с порядком создания форм. Когда в модуле проекта вы видите код:
     
    Application.CreateForm(TfrmDM, frmDM);
     
    То это не означает, что форма или модуль будут созданы в в момент исполнения этого вызова, вместо этого программа запомнит, что нужно создать такую форму TfrmDM и поместить указатель на нее в frmDM. Реальное создание форм произойдет при выполнении Application.Run. Поэтому, все обращения к "созданным" формам и модулям в модуле проекта приведет к ошибке.
    Чем еще FM занимается до реального создания основной формы - одним разработчикам известно, и я бы поостерегся выполнять какие либо действия связанные с отрисовкой форм в модуле приложения.
    Набросал пример, посмотрите, возможно такое решение вам подойдет.
    SplashDemo.zip
  16. Like
    Rusland отреагировална haword в [Андроид]не видно картинки   
    в делфи делается так - 
                        li:= lv.Items.Add;
                        lii:=li.Objects.FindObjectT<TListItemImage>('Image');
                        lii.OwnsBitmap:=True;
    далее можно грузить картинку, если в потоке то 
                TThread.Synchronize(TThread.CurrentThread, procedure()
                begin
                   // присваивание битмапу картинки 
                            lii.Bitmap:= TBitmap.Create;
                            lii.Bitmap.SetSize(ItemBitmap.Width, ItemBitmap.Height);
                            lii.Bitmap.Clear(TAlphaColors.Null);
                            lii.Bitmap.CopyFromBitmap(ItemBitmap);
                   
                end
                );
  17. Like
    Rusland отреагировална Maximus в Как подавить экранный курсор crSQLWait ?   
    На самом деле это поведение можно достаточно просто отключить
    var Connect : TFDConnection; Query : TFDQuery; ... Connect.ResourceOptions.SilentMode := true; Query.ResourceOptions.SilentMode := true; ...  
  18. Like
    Rusland получил реакцию от Вольдемар в Почему зависает программа под Андроидом с TEdit?   
    Почитайте эту тему
  19. Like
    Rusland отреагировална Ilya.Z в Delphi + Firepower wwLayoutGrid + MySQL   
    День добрый, может кто то сталкивался с такой проблемой - при использовании связки Unidac (пробовал и  FireDac) Delphi 10,1 + FirePower 10
    Подключаю Grid и в обычном wwDataGrid отрабатывается нормально,
    если взять wwLayoutGrid то ,при запуске программы, во всех ячейках отображается первая запись таблицы, при этом в дизайн моде все правильно показывает.
    в демосах при использовании MemDataset все норм, все красиво
    PS если dataset находится в той же форме что и layoutgrid все работает как надо, стоит перенести в отельный datamodule показывает лишь первую запись во всей таблице
    может кто подскажет идею, куда копать ? или сталкивался с похожей ситуацией ?
    Спасибо
     
    PS Вопрос закрыт, проблема в моем же дополнительном компоненте ..сорри мдам, буду разбираться от чего )
  20. Like
    Rusland отреагировална Anasazi в Проблема при активации memo или edit программа зависает и закрывается.   
    У меня подобная хрень была. 
    Пришлось совсем отказаться от Tedit и Tmemo. Заменил на Tlabel, при клике открываю диалоговое окно с полем ввода.
  21. Like
    Rusland отреагировална kami в VCL procedure to FMX   
    Your code can be replaced with:
    var Stream: TStream; begin Stream:=TMemoryStream.Create; try SourceBitmap.SaveToStream(Stream); Stream.Seek(0, soBeginning); NewBitmap.LoadFromStream(Stream); finally Stream.Free; end; end;  
  22. Like
    Rusland отреагировална Вадим Смоленский в Одновременное использование TFloatAnimation и TShadowEffect   
    Пока эксперты размышляли, нашел решение сам. Эффекты нужно было просто разнести по времени - мне ведь не нужна тень, пока идет анимация, тень можно налепить по ее окончании. Два обработчика событий для TFloatAnimation решили вопрос: по OnProcess свойство Enabled компонента TShadowEffect устанавливается в False; по OnFinish - в True.
  23. Like
    Rusland отреагировална enatechno в [ListView]пример от embarcadero   
    По умолчанию в DynamicAppearance есть только один объект - Text. Соответственно, из кода вы должны убрать все упоминания AItem.Objects.TextObject, AItem.Objects.AccessoryObject и изменить заполнение текста в ListViewItem (например так):
    for Item in [1..10] do ListView1.Items.Add.Data['Text1']:= Format('Regular item %d.%d', [Group, Item]); Как добавить свои объекты в LIstViewItem читайте Using the DynamicAppearance Value или смотрите видео.
     
  24. Like
    Rusland отреагировална kami в Нестандартная клавиатура для своего приложения   
    Раз уж пошла такая пьянка - выложу сюда то, что по виртуальной клавиатуре есть у меня на текущий момент (в телеграме уже выложил).
    Поддерживаются операционные системы: iOS, Windows. Оттестировано на 10.1 (Berlin)
    Итак: архив распаковать куда угодно, в проект в uses подключить модули uCommonCustomKeyboard (отвечает за подмену "штатной виртуальной клавиатуры" на свою) и ufrCustomNumpad (отвечает за отображение цифровой клавиатуры).
    Алфавитную, e-mail-овскую и тому подобные виды клавиатур оставляю на ваше усмотрение. Они делаются на основе ufrCustomNumpad, там больше заморочек с красивым размещением кнопок, чем с кодом.
    CustomKeyboards.7z
  25. Like
    Rusland отреагировална Alex7wrt в Запуск Google Play из своего приложения   
    uses ..... FMX.Platform.Android, FMX.Helpers.Android, Androidapi.Helpers, Androidapi.JNI.GraphicsContentViewText, Androidapi.JNI.JavaTypes, Androidapi.JNI.App, Androidapi.JNIBridge, Androidapi.JNI.Embarcadero, AndroidApi.JNI.Net, Androidapi.JNI.Util; ... var Intent: JIntent; begin Intent := TJIntent.Create; Intent.setAction(TJIntent.JavaClass.ACTION_VIEW); try Intent.setData(StrToJURI('market://details?id=name_of_app')); //если установлен google play except Intent.setData(StrToJURI('http://play.google.com/store/apps/details?id=name_of_app')); //иначе открываем ссылку в браузере end; TAndroidHelper.Context.startActivity(Intent); В uses есть даже лишнее, поскольку взял из  проекта, где были и другие функции под Android
×
×
  • Создать...