graphics := TGPGraphics.Create(DC);
fontFamily:= TGPFontFamily.Create('Times New Roman');
font := TGPFont.Create(fontFamily, 24, FontStyleRegular, UnitPixel);
pointF := MakePoint(30.0, 10.0);
solidBrush:= TGPSolidBrush.Create(MakeColor(255, 0, 0, 255));
graphics.DrawString('Hello', -1, font, pointF, solidBrush);
fontFamily.Free;
font.Free;
solidBrush.Free;
graphics.Free;