Поиск сообщества

Толи я дурак толи лыжи не едут. gesturemanager нужно для перелистывание Tabcontrol left right. Если form.borderstyle:=single; все работает. а вот если borderstyle:=none; или уберешь border.styling=false; и border.icons. то не работает. в чем может быть проблема и как его решить? заранее благодарю

День добрый. Возникла следующая проблема. Если свойству формы BorderStyle поставить любое значение (кроме Sizeable), все подсказки Hint компонентов этой формы перестают отображаться. Аналогично дело обстоит с BorderIcons, стоит убрать хотя бы одну кнопку, как Hint сразу перестаёт работать. Это нормальное поведение или ошибка? И можно ли как-то это обойти?

FireMonkey позволяет гибко управлять видимостью статус бара под iOS. Причем управление видимостью происходит на уровне каждой формы по отдельности. Видимость системного статус бара в рамках одной формы управляется через свойство формы TForm.BorderStyle. Значение TBorderStyle.bsNone скрывает системный тулбар для формы растягивает форму на весь экран. Все остальные значения отличные от TBorderStyle.bsNone отображают статус бар

Столкнулся с такой проблемой, (Delphi Seattle, OSX+ WIndows 10) делаю форму со своим заголовком, при установленных свойствах Transperency := True или BorderStyle := None, переход в режим FullScreen не отрабатывается корректно (форма не изменяет размер на максимальный), решил перед переходом в полноэкранный режим устанавливать Transperency := False и BorderStyle отличный от None, но программа вылетает, иногда сразу иногда на 2-3 раз смены параметров, причем независимо от того что меняю прозрачность или бордер. если запускать через отладчик то вываливается на такое - в System.Internal.ExcUtils; { RaiseSignalException is called from SignalConverter, once we've made things look like there's a legitimate stack frame above us. Now we will just create an exception object, and raise it via a software raise. } procedure RaiseSignalException(ExceptionEIP: LongWord; FaultAddr: LongWord; ErrorCode: LongWord); begin raise GetExceptionObject(ExceptionEIP, FaultAddr, ErrorCode); end; под Windows все работает нормально, без всяких выкрутасов для проверки можно сделать пустую форму, две кнопки , и скажем панель за которую перетаскивать форму и три обработчика- procedure TForm1.Rectangle1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single); begin if (Button = TMouseButton.mbLeft) and (y < 25) then StartWindowDrag; end; procedure TForm1.sbExpandClick(Sender: TObject); begin i f BorderStyle = TFmxFormBorderStyle.None then BorderStyle := TFmxFormBorderStyle.Single else BorderStyle := TFmxFormBorderStyle.None; end; procedure TForm17.sbFullClick(Sender: TObject); begin FullScreen := not FullScreen; end; Может кто то сталкивался, как под OSX в рантайме менять у формы прозрачность и бордер не вываливаясь в исключения, или нормально обрабатывать переход в полноэкранный режим у прозарчной (или без стандартного заголовка) формы Спасибо

Как сделать приложение в котором не будет видно системный Status Bar?