Другая система координат?

[Steepe_Hare]

Объясните, пожалуйста, почему этот простой код работает по-разному в Win32 и на Андроиде? Картинка 150x200 в битмап уже загружена и нужно ее расчертить.
 

  Image1.Bitmap.Canvas.BeginScene;
  try
    Image1.Bitmap.Canvas.Stroke.Kind := TBrushKind.Solid;
    Image1.Bitmap.Canvas.Stroke.Color := TAlphaColors.Blue;
    for I := 0 to 9 do
      Image1.Bitmap.Canvas.DrawLine(TPointF.Create(I * 15, 0),
        TPointF.Create(I * 15, Image1.Bitmap.Height), 1);

    for J := 0 to 9 do
      Image1.Bitmap.Canvas.DrawLine(TPointF.Create(0, J * 20),
        TPointF.Create(Image1.Bitmap.Width, J * 20), 1);

  finally
    Image1.Bitmap.Canvas.EndScene;
  end;

Под Виндой создается точная сетка 10x10, а под Андроид как будто другая система координат и территория делится на огромные квадраты (больше, чем надо).

Изменено 18 октября, 2016 пользователем Steepe_Hare

[Равиль Зарипов (ZuBy)]

скорей всего у вас трансформируется Image, Align/Anchors стоят?

[Steepe_Hare]

10 минут назад, ZuBy сказал:

скорей всего у вас трансформируется Image, Align/Anchors стоят?

Align = None, Anchors = [akLeft,akTop]

[Равиль Зарипов (ZuBy)]

как то так

 

 

UPDATE: У меня так ваш код отработал

[Steepe_Hare]

Нашел причину ошибки!

Если в самой среде на этапе дизайн-тайм загрузить картинку, то расчерчивание в ран-тайме идет корректно.

Но если грузить картинку в битмап в OnCreate из ресурсов, то расчерчивание странным образом идет.  Часть линий как будто накладывается друг на друга.

Как исправить во втором случае? Спасибо заранее.

[dnekrasov]

Проблема еще может быть в свойстве WrapMode. Попробуйте поиграться с ним. По идее, в Вашем случае, его надо выставить в Original