Вячеслав
Пользователи-
Постов
127 -
Зарегистрирован
-
Посещение
-
Победитель дней
3
Весь контент Вячеслав
-
Всем добрый день! Возник вопрос, можно ли при динамическом создании VCL компонента (Vcl.ExtCtrls.TPanel) указать в качестве предка форму FireMonkey? А то на данный момент приходится поступать так: procedure TForm1.FormCreate(Sender: TObject); var VCLform: Vcl.Forms.TForm; VCLPanel: Vcl.ExtCtrls.TPanel; begin //Создаем родительскую VCL форму для размещения на ней VCL панели VCLform := Vcl.Forms.TForm.Create(Self); VCLform.Width := 1300; VCLform.Height := 500; VCLform.Show; //Создаем VCL панель VCLPanel := Vcl.ExtCtrls.TPanel.Create(Self); VCLPanel.Parent := VCLform; // <--- Интересует, по сути, вот эта строчка VCLPanel.Left := 0; VCLPanel.Top := 0; VCLPanel.Width := 640; VCLPanel.Height := 480; end; Хотелось бы избавится от необходимости создавать VCL форму только для того, чтобы она служила контейнером для VCL панели.
-
В некоторых случаях даже на Windows на достаточно мощном ПК наблюдаются подтормаживания. И глобально эту проблему решить пока не представляется возможным, только постепенной оптимизацией.
-
Проверить сейчас нет возможности, но я бы для начала попробовал поместить оба изображения в родительский контрол TRectangle со свойством ClipChildren=true для обрезки дочерних изображений, выходящих за границы контрола. Одну картинку растянул по Rectangle, а вторую поместил ровно под ним (через Image2.Position.X:=0, Image2.Position.Y:=Rectangle.Height). Она должна быть полностью "обрезана" нижней границей Rectangle. Ну а дальше через FloatAnimation уменьшаем Image2.Position.Y с начального значения до нуля за нужное время с задержкой в пару секунд.
-
Все, вопрос снят. Всего-навсего нужно было отрисовать форму через PaintTo в Canvas. Единственное отличие от отрисовки контрола-у метода PaintTo формы входной параметр только один-TCanvas.
-
Господа, озадачился вопросом получения скриншота формы. Статью Ярослава прочитал, разобрался, но в ней описан метод получения скриншота произвольного контрола с помощью метода PainTo. У формы же этот метод иной, поэтому возникли затруднения.
-
Решение оказалось довольно простым. Кидаем на форму Layout, в него устанавливаем Lable и позиционирует таким образом, чтобы центр Lable находился в том же месте, что и верхний левый угол Layout. Сделать это нетрудно как в Design Time, так и в Run Time. После этого масштабируем Layout, что приведет к автоматическому масштабированию Lable относительно его центра. Думаю, на этом тему стоит закрыть.
-
Понял, спасибо!
-
По-видимому, у них сейчас что-то обновилось. По ссылке нет файлов.
-
[Windows] Можно ли получить Handle компонента в FMX?
Вячеслав опубликовал вопрос в Общая информация о TControl
Добрый день, друзья! Пытаюсь восстановить старый код, в котором использовался Handle у панели: FVideoWindow.put_Owner(Panel.Handle); Теперь же у панели отсутствует хендл как таковой, и я все никак не разберусь, как этот момент следует обходить. Может, у кого-нибудь есть мысли на этот счет? -
Несомненно, Вы правы. Поэтому я и написал про "очень трудно". А так и на ассемблере можно под Windows писать
- 8 ответов
-
- xe7
- Style Designer
-
(и ещё 1 )
C тегом:
-
Несомненно, в версиях RAD Studio присутствуют непонятные баги, о которых довольно часто пишут на этом и иных форумах. Иногда это жутко мешает, приходится терять много времени на разбор проблемы, поиск иного решения и пр. Но справедливости ради хотел бы высказать несколько слов в защиту разработчиков. Вы говорите о реальном коммерческом продукте со своими плюсами и минусами. И абсолютно нормально то, что он не идеален за такие деньги. Используя Delphi всего лишь 6 лет и вспоминая о Delphi7, приятно ностальгирую о действительно корректной и простой работе. Работе над МОРАЛЬНО УСТАРЕВШИМИ приложениями. Время не стоит на месте, и задачи, решавшиеся ТОГДА, уже совершенно неактуальны сейчас. К примеру, для меня очень важна быстрая разработка красивых и живых интерфейсов пользователя, кому-то другому подавай приложения под Андроид/IOS. И на Делфи7 это сделать невозможно или очень трудно. А на этом форуме очень много разработчиков получают помощь от Ярослава Бровина и других участников, решают свои проблемы. Абсолютно бесплатно. Прошу прощения за флуд, думаю, что корректнее обсуждать проблемы продуктов Embarcadero в отдельной ветке.
- 8 ответов
-
- xe7
- Style Designer
-
(и ещё 1 )
C тегом:
-
Поигрался с этими свойствами, результат прежний, увы. ScaleAnimation.zip
-
Спасибо! Попробую) Странно, но не помогло. После Align = Center анимация продолжает масштабировать компонент "вправо", а не из центра.
-
Как задать форме размер больше размера экрана?
Вячеслав опубликовал вопрос в Положение, размеры, выравнивание
День добрый! Необходимо создать форму, размер которой превышал бы размер экрана (буквально на несколько пикселей). А ее даже вручную растянуть не получается, windows, по ходу, блокирует эту возможность. Есть способы? -
Добрый день! Хочу заанимировать Lable таким образом, чтобы параметр Scale.X линейно увеличивался. Но при этом необходимо, чтобы центр компонента оставался на своем месте. А параметр Scale.X за начало отсчета принимает верхний левый угол лейбла. Есть ли возможность изменить центр масштабирования компонента? Я данную задачу уже решил путем добавления анимации смещения влево, но этот способ мне кажется топорным и неоптимальным.
-
Хм, а есть возможность ее обойти в 5 версии RAD Studio? Или только в более поздних версиях будет исправлено?
-
Добрый вечер, Ярослав! Хочу поделиться еще одним интересным фактом: сегодня проверил данную проблему на другом компьютере, версия RAD Studio XE3 и все завелось без проблем. Таким образом начинаю сомневаться в том, что это баг ФМ, возможно, просто на моей машине по каким-то причинам на XE5 не хотят запускаться жесты при bsNone. Быть может не хватает каких-либо библиотек. Не подскажете, каким образом это лучше всего проверить?
-
Ярослав, добрый день! Думаю, с моей стороны назойливо спрашивать, но Вы смотрели проект? Просто у меня сейчас стоит дилемма о том, отказываться ли от жестов или от полноэкранного режима отображения. Либо искать обходные пути, вроде задания координат и размеров формы при запуске.
-
Вот пара скриншотов, на первом приложение не реагирует на жесты, на втором все корректно.