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

sargon

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

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

  • Посещение

Информация

  • Пол
    Мужчина

Посетители профиля

1 364 просмотра профиля
  1. Ах да CannotClose не нужен здесь, это костыль исходя из логики работы приложения, приложение не должно закрываться во время работы, на скорую руку делал, можно и красивее сделать было конечно
  2. Да, все верно, там были ошибки, наверное уже не актуально, но выложу. Тот код у меня вырос до такого вот WM_SYSCOMMAND: begin case wParam of SC_MINIMIZE:begin PlatformWin.MinimizeApp; Result:=DefWindowProc(HWND, uMsg, wParam, LPARAM); FinalActionsOfPopups; end; SC_RESTORE:begin PlatformWin.RestoreApp; if Application.MainForm <> nil then if OldWindowState = TWindowState.wsMaximized then Application.MainForm.WindowState := TWindowState.wsMaximized ; DefWindowProc(HWND, uMsg, wParam, LPARAM); Winapi.Windows.SetActiveWindow(FormToHwnd(LForm){WinAPI.Windows.FindWindow('TForm1','Form1')}); end; SC_CLOSE:begin if CannotClose = True then exit else if Application.MainForm <> nil then begin for I := 0 to Screen.FormCount - 1 do // if FormToHWND(Screen.Forms[I]) = hwnd then // begin Screen.Forms[I].Close; // Exit; // end; Application.MainForm.BorderStyle:=TFmxFormBorderStyle.None; Application.MainForm.Height:=0; Application.MainForm.Width:=0; PlatformWin.RestoreApp; // Application.MainForm.Activate; end; Result := DefWindowProc(hwnd, uMsg, wParam, lParam); end; SC_MAXIMIZE:begin Winapi.Windows.ShowWindow(FormToHwnd(LForm), SW_MAXIMIZE); DefWindowProc(HWND, uMsg, wParam, LPARAM); end; end; end; С такими изменениями вроде все работает корректно, еще раз просмотрел сейчас тот проект, вроде бы все адекватно отрабатывает, как и в VCL.
  3. Ярослав, а что стало с проектом, вы не знаете случайно? Сайт их не доступен. Как раз пару недель назад вспомнил про этот проект, стало интересно как он развивается, а сайта уже и нет...
  4. Благодарю, но не помогло, попробовал, оказалось, что в первую очередь срабатывает нажатие для контролов, а потом уже для формы, ну такое у меня впечатление сложилось... но даже если прописать обработчик контролу, он тоже срабатывает после Ctrl+Tab
  5. Добрый день, у меня есть один вопрос, делаю приложение в виде программы-мастера на FMX, в качестве страничек мастера использую TTabControl, случайно обнаружил, что при нажатии Tab+Ctrl вкладки переключаются, вроде так и должно быть, но мне вот такое поведение не подходит. Можно ли как-то отключить\заблокировать переключение вкладок по нажатию клавиш. Пробовал обрабатывать события KeyUp и KeyDown для TTabItem, но переключение вкладки происходит раньше, чем происходит вызов обработчика. Оно не критично конечно, но может быть кто-то сталкивался (если коротко, хочу переключать вкладки только по нажатию кнопок в программе)? Спасибо.
  6. Старая тема, но столкнулся с такой же проблемой, также добавил WM_SYSCOMMAND, точно также после разворота не активировалось окно, пофиксил это дело, выложу тут, может кому пригодится. Такая же проблема ив Tokyo 10.2.2 - хотелось бы, чтобы такой глюк был пофиксен из коробки, хотя бы в следующей версии WM_SYSCOMMAND: begin if wParam = SC_MINIMIZE then PlatformWin.MinimizeApp else if wParam = SC_RESTORE then PlatformWin.RestoreApp; DefWindowProc(HWND, uMsg, wParam, LPARAM); sleep(50); // у FMX какая-то беда с потоками, иногда при нажатии по иконуе приложения в TaskBar окно не сворачивается а снова активируется, sleep уменьшает количество таких глюков Winapi.Windows.SetActiveWindow(FormToHwnd(LForm)); // после разворота активирует окно - проверил в Berlin и Tokyo 10.2.2 end; Нужно добавить код в FMX.Platform.Win в функцию function WndProc(hwnd: HWND; uMsg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
  7. Ой да, виноват, прошу прощения, не указал. Да Android, Delphi Berlin.
  8. Добрый день уважаемое сообщество. Возможно ли, и если возможно, то как, сделать что-то наподобие этого http://developer.alexanderklimov.ru/android/animation/overridependingtransition.php. В Android есть стандартная анимация при переходе между окнами в приложениях, мне было бы достаточно и такой, не знаю только как ее прикрутить, в какую сторону рыть - ничего не нагуглил, знаю про TFloatAnimation но может быть есть какой-нибудь нативный способ для этого в FMX. Заранее благодарю за помощь.
  9. Отличная идея, Ярослав, благодарю, буду пробовать. В принципе Rusland тоже интересное решение предлагает.
  10. Добрый день! Нигде не нашел, как сделать в FMX что-то наподобие этого? Идея такая, выбирать из ListBox параметры, а после выбора хотелось бы чтобы они отображались в каком-нибудь контролле (наиболее для этого подходящем) подобным образом как на рисунке. Направьте хотя бы в какую сторону копать. Заранее благодарю!
  11. Заранее прошу простить если не в ту ветку, не знаю в какую лучше написать - больше вроде к жестам относится, Есть боковое меню на Android которое прекрасно выезжает и заезжает по жестам влево-вправо, может быть кто-то уже сталкивался, как сделать чтобы панель как бы "прилипла" к пальцу и следовала за ним, т.е. пока палец без отрыва от тачскрина двигается вправо - панель следует за ним вправо, если палец пошел влево она следует влево и закрывается. В общем так как сделано в большинстве приложений на Java - Facebook, VK и других. И вообще возможно ли это сделать на Delphi. (у меня Delphi Berlin android 4.2)
  12. Уважаемый ZuBy, большое спасибо!!! Видел ваш компонент, но не додумался заглянуть внутрь! То что нужно! Вопрос решен
  13. Добрый день, уважаемое сообщество! Может быть кто-то подобное делал - хочу отрисовать маршрут между двумя точками, нужна помощь кодом. Что-то не могу ничего нагуглить похожего, интересует именно реализация (надеюсь гугл не забанил). Прошу помощи или совета. (Во время поисков понял, что нужно делать через GoogleDistance, но не могу понять с какой стороны подступиться)
×
×
  • Создать...