procedure TAndroidModule1.jButton1Click(Sender: TObject);
var
jGraphicsBuffer: jObject;
w, h: integer;
begin
w := jPanel2.Width;
h := jPanel2.Height;
ViewPort1.Height := h;
ViewPort1.Width := w;
ViewPort1.SetScaleXY(0 {minx}, 12 {maxx}, 0 {miny}, 12 {maxy});
FPNoGUIGraphicsBridge1.SetSurfaceSize(w, h);
FPNoGUIGraphicsBridge1.PathToFontFile := '/system/fonts/Roboto-Regular.ttf';
//or DroidSerif-Bold.ttf
//FPNoGUIGraphicsBridge1.ActiveViewPort:= ViewPort1; //or in design time
FPNoGUIGraphicsBridge1.PaintViewPort;
FPNoGUIGraphicsBridge1.PaintGrid(True);
ViewPort1.PenColor := colbrRed;
FPNoGUIGraphicsBridge1.DrawFillRectangle([ToRealPoint(0, 2), ToRealPoint(2, 1)]);
{left-top, right-bottom}
ViewPort1.PenColor := colbrGreen;
FPNoGUIGraphicsBridge1.DrawFillRectangle([ToRealPoint(2, 4), ToRealPoint(4, 3)]);
{left-top, right-bottom}
ViewPort1.PenColor := colbrBlue;
FPNoGUIGraphicsBridge1.DrawFillRectangle([ToRealPoint(4, 6), ToRealPoint(6, 5)]);
{left-top, right-bottom}
ViewPort1.PenColor := colbrYellow;
FPNoGUIGraphicsBridge1.DrawFillRectangle([ToRealPoint(6, 8), ToRealPoint(8, 7)]);
{left-top, right-bottom}
ViewPort1.PenColor := colbrOrange;
FPNoGUIGraphicsBridge1.DrawFillRectangle([ToRealPoint(8, 10), ToRealPoint(10, 9)]);
{left-top, right-bottom}
ViewPort1.PenColor := colbrLime;
FPNoGUIGraphicsBridge1.DrawFillRectangle([ToRealPoint(10, 12), ToRealPoint(12, 11)]);
{left-top, right-bottom}
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(-0.2, -0.5), 'Jan', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(0.8, -0.5), 'Fev', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(1.8, -0.5), 'Mar', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(2.8, -0.5), 'Abr', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(3.8, -0.5), 'Mai', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(4.8, -0.5), 'Jun', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(5.8, -0.5), 'Jul', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(6.8, -0.5), 'Ago', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(7.8, -0.5), 'Set', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(8.8, -0.5), 'Out', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(9.8, -0.5), 'Nov', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(10.8, -0.5), 'Dez', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(-0.4, 1), 'A1', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(-0.4, 3), 'A2', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(-0.4, 5), 'A3', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(-0.4, 7), 'A4', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(-0.4, 9), 'A5', 22);
FPNoGUIGraphicsBridge1.TextOut(ToRealPoint(-0.4, 11), 'A6', 22);
jGraphicsBuffer := jBitmap1.GetJByteBuffer(w, h);
PGlobalDirectImagePixel := jBitmap1.GetJByteBufferAddress(jGraphicsBuffer);
FPNoGUIGraphicsBridge1.Surface.GetRGBAGraphics(PGlobalDirectImagePixel);
jImageView1.SetImageBitmap(jBitmap1.GetBitmapFromJByteBuffer(jGraphicsBuffer, w, h));