Поиск сообщества
Показаны результаты для тегов 'Map'.
Найдено: 4 результата
-
Здравствуйте, есть такая задача: 1) Необходимо вставить карту от Яндекса на форму. 2) Необходимо вставить информацию текстовую (информация о доставке или оплате), это можно также вставить HTML кодом, а лучше просто отформатированным содержанием. Заранее спасибо всем за ответы.
-
Здравствуйте всем! Проверял на OS X - Mountain Lion 10.8.3 После Map/Unmap-обновления картинки, изображение на 3D-форме с TImage3D не обновляется. Вот простой пример - TestMap.zip - по таймеру заносит шум в TImage3D.Bitmap. В XE7 работает и под Win32 и под OSX. В XE8 под win32 работает, а под OSX отображает белый фон. Если над формой провести каким-то другим окном, то в этом месте картинка, т.е. ее часть (в нашем случае шум), отрисовывается. Тоже самое если нашу форму вывести за экран и потянуть обратно - в местах появления формы отображается часть нашей картинки (шума). BeginUpdate/EndUpdate и Repaint результата не дали. XE8 Update1 - тоже самое. Как сие побороть? (Обычный TImage отрабатывает нормально).
-
Добрый вечер. Помогите с таким вопросом. Пытаюсь сделать эффект "Падающих звезд" для Android. Но не получается даже нарисовать точку на канве. Взял ваш пример с форума: procedure TForm9.Panel1Click(Sender: TObject); var M: TBitmapData; i, j: integer; begin if Panel1.Canvas.Bitmap.Map(TMapAccess.maWrite, M) then try for i := 0 to Panel1.Canvas.Bitmap.Width - 1 do for j := 0 to Panel1.Canvas.Bitmap.Height - 1 do M.SetPixel(i, j, TAlphaColorRec.Red); finally Panel1.Canvas.Bitmap.Unmap(M); end; // Stars1.Stars := not Stars1.Stars; end; Но даже при его запуске получаю ошибку: Если нажать на Break то кидает на функцию function TBitmap.GetCanvasClass: TCanvasClass; begin if not Assigned(FCanvasClass) then FCanvasClass := TCanvasManager.GetDefaultCanvas; Result := FCanvasClass; end; Собственно вопрос: Как нарисовать точку на канве в FMX?