Поиск сообщества
Показаны результаты для тегов 'Stroke'.
Найдено: 2 результата
-
Подскажите куда копать. Пытаюсь нарисовать поле из прямоугольников, часть из которых символизирует фигуру и рисуется закрашенными. Под Windows все чудесно, под Android вижу только закрашенные. Думал не попадаю в пикселы, установил толщину в 3 и AlignToPixel - не помогло. Код: void __fastcall TForm1::imgFieldPaint(TObject *Sender, TCanvas *Canvas, const TRectF &ARect) { int min = Min(ARect.Width() / FieldRows, ARect.Height() / FieldCols); for (int y = 0; y < FieldRows; y++) { for (int x = 0; x < FieldCols; x++) { // ячейка для отрисовки TRectF R(Canvas->AlignToPixel(TPointF(x*min, y*min)), min, min); // если часть фигуры - рисуем квардрат if (iField[y][x]) { Canvas->Fill->Color = CellColors[iField[y][x]]; Canvas->FillRect(R, 0, 0, AllCorners, 1.0); } // рисуем ячейку Canvas->Stroke->Thickness = 3; Canvas->Stroke->Color = TAlphaColor(claRed); Canvas->DrawRect(R, 0, 0, AllCorners, 1.0); } } } Рузультат:
-
TCanvas Почему на мобильных платформах у меня не рисуется окружность?
97mik опубликовал вопрос в Окружность
Пробую нарисовать окружность в заданном регионе на мобильной платформе следующим способом: procedure TForm1.Image14Paint(Sender: TObject; Canvas: TCanvas; const ARect: TRectF); begin Image14.Canvas.Stroke.Color := TAlphaColorRec.Red; PixelRegion := TRectF.Create(TPointF.Create(100, 100), 20, 20); Image14.Canvas.DrawEllipse(PixelRegion, 1); end; В Windows всё отображается, а на мобильных платформах окружность не отображается. Подскажите, с чем может быть связано такое поведение.
