Лидеры

Место проведения: Москва (16 сентября 10:00 am - 14:00pm) - Русаковская ул., д. 13, стр. 5 Гостиница «Бородино» Астана (18 сентября 10:00 am - 14:00pm) - ул.Карасакал Еримбет, 65 Отель "Жумбактас" Екатеринбург (23 сентября 10:00 am - 14:00pm) - ул. Б. Ельцина, 1а БЦ «Президент» Ссылка на мероприятие: http://www.delphitour.ru/ Регистрация: http://forms.embarcadero.com/EM14Q3RUDeveloperDirectLive Описание: На конференции вы узнаете, как с помощью новых возможностей RAD Studio XE7: разрабатывать кроссплатформенные приложения с новым конструктором единого интерфейса; улучшать производительность настольных и мобильных приложений с помощью библиотеки параллельных вычислений, используя преимущества многоядерных процессоров; cбалансировать ИТ инфраструктуру за счет включения мобильных сервисов Количество мест ограничено, регистрируйтесь заранее.

Такая кнопка доступна, только когда вы создаёте не мобильный проект. В случае с мобильными проектами, необходимо кидать на форму компонент TStyleBook, в него подгружаете необходимый стиль и прописываете StyleBook в форме, в свойстве StyleBook. Как изменить дизайн конкретного стиля, вам написал AlexG. На форуме есть большой раздел "Стили", посвящённый работе со стилями, там можно найти ответы на многие вопросы. Вот ещё полезная тема: [Mobile platform] где редактор стилей?

Самый простой способ - отредактировать стиль, добавив копию "donetoolbutton", но обозвав ее иначе, например "donetoolrectbutton". Создав копию, и обозвав ее "donetoolrectbutton", у вас останется и старый стиль и будет новый (собственный). А вот с "donetoolrectbutton" вы уже можете делать что пожелаете. Т.е. - добавить в слой новый объект - тот же TRectangle. Можете изменить и "родной" стиль, добавив ему то, что требуется. P.S. Как создать копию... На мой взгляд - проще всего в том же редакторе (например Notepad++).

Вам требуется, в первую очередь, подключить модули для возможности использования HBITMAP uses ... {$IFDEF MSWINDOWS} Vcl.Graphics, {$ENDIF} ... Далее, предположим, у Вас есть изображение tmpBmp - в формате Vcl.Graphics.TBitmap (для примера - я его гружу из файла. Это как-раз тот формат, о котором идет речь в Вашем вопросе) Ну и далее все действия Вам должны быть понятны.. var tmpBmp : Vcl.Graphics.TBitmap; tmpStream : TMemoryStream; begin tmpBmp := Vcl.Graphics.TBitmap.Create; try tmpBmp.LoadFromFile('d:/index_cr.bmp'); tmpStream := TMemoryStream.Create; tmpBmp.SaveToStream(tmpStream); Image1.Bitmap.LoadFromStream(tmpStream); finally tmpBmp.Free; tmpStream.Free; end; end; Думаю, что все достаточно просто и понятно написал P.S. все написано "на коленке" и за пару минут, так-что сорри, что не учитывал все "нюансы". Собственно FMX сделает за вас всю работу по преобразованию...

Добрый день, У FireMonkey нету готового решения из коробки. Но, можно реализовать вручную так: Получаем хендл окна формы: uses FMX.Platform.Win; //...... var WinHandle: TWinWindowHandle; begin WinHandle := WindowHandleToPlatform(Handle); // WinHandle.Wnd < -- Хендл окна end Вешаем Hook на оконную процедуру, используя полученный хендл и функции установки хука: Hook Functions В перекрытой нами оконной процедуре перехватываем сообщение WM_WINDOWPOSCHANGING и корректируем позицию окна, используя информацию о границе экрана и других окнах на экране. Таким способом можно сделать прилипание не только к границе экрана, но и к другим окнам (так же как прилипают между собой окна виджетов).

В общем ничего кроме стандартных знаний линейной алгебры здесь не требуется. Согласно линейной алгебры нужно построить матрицу трансформации задать ее для канвы и рисовать все что угодно. Если вспомнить, то выполнить нужно следующее: Сместить Систему Координат (СК) на вектор центра поворота. Повернуть СК на угол поворота Сместить СК на обратные вектор центра поворота. В коде это будет выглядеть так: uses System.Math.Vectors; {$R *.fmx} procedure TForm1.ButtonDrawRotatedTextClick(Sender: TObject); var RotationMatrix: TMatrix; TranslationMatrix: TMatrix; ReverseTranslationMatrix: TMatrix; begin Image1.Bitmap.SetSize(200, 200); Image1.Bitmap.Clear(TAlphaColorRec.Null); with Image1.Bitmap.Canvas do begin BeginScene; try TranslationMatrix := TMatrix.CreateTranslation(100, 100); RotationMatrix := TMatrix.CreateRotation(-Pi / 180 * nbAngle.Value); ReverseTranslationMatrix := TMatrix.CreateTranslation(-100, -100); SetMatrix(ReverseTranslationMatrix * RotationMatrix * TranslationMatrix); Fill.Color := TAlphaColorRec.Red; Fill.Kind := TBrushKind.Solid; Font.Size := 20; FillText(TRectF.Create(50, 50, 150, 150), 'Текст', False, 1, [], TTextAlign.Center, TTextAlign.Center); finally EndScene; end; Image1.Repaint; end; end; Результат: Проект: DrawRotatedTextDemo.zip