LPDIRECT3D9       g_pD3D;
LPDIRECT3DDEVICE9 g_Device;
ID3DXFont*        font;
bool __fastcall TForm1::InitD3D9()
{
 HWND              g_hwnd;
 g_hwnd = Form1->Handle;
 g_pD3D = Direct3DCreate9(D3D_SDK_VERSION);
 if(g_pD3D == NULL)
 {
   return false;
 }
 D3DDISPLAYMODE d3ddm;
 if(FAILED(g_pD3D->GetAdapterDisplayMode(D3DADAPTER_DEFAULT, &d3ddm)))
 {
   return false;
 }
  //Create a structure to hold the settings for our device
 D3DPRESENT_PARAMETERS d3dpp;
 ZeroMemory(&d3dpp, sizeof(d3dpp));      //Fill the structure.
  //We want our program to be windowed, and set the back buffer to a format
  //that matches our current display mode
 d3dpp.Windowed = true;
 d3dpp.SwapEffect = D3DSWAPEFFECT_DISCARD;
 d3dpp.BackBufferFormat = d3ddm.Format;
 d3dpp.hDeviceWindow = g_hwnd;
  //Create a Direct3D device.
 if(FAILED(g_pD3D->CreateDevice(D3DADAPTER_DEFAULT, D3DDEVTYPE_HAL,g_hwnd,D3DCREATE_SOFTWARE_VERTEXPROCESSING, &d3dpp, &g_Device)))
 {
    return false;
 }
 LOGFONT lf;
 ZeroMemory(&lf, sizeof(LOGFONT));
 lf.lfHeight = 24; // in logical units
 lf.lfWidth = 24; // in logical units
 lf.lfWeight = 500; // boldness, range 0(light) - 1000(bold)
 lf.lfItalic = false;
 lf.lfUnderline = false;
 lf.lfStrikeOut = false;
 lf.lfCharSet = DEFAULT_CHARSET;
 strcpy(lf.lfFaceName, "Times New Roman"); // font style
 D3DXCreateFontIndirect(g_Device, &lf, &font);
 return true;
}
void __fastcall TForm1::DrawText()
{
 TRect rect;
 rect.top = 200;
 rect.left = 200;
 rect.Bottom = 400;
 rect.right = 400; 
 font->Begin();
 font->DrawText("Hello World",-1,&rect,DT_TOP | DT_LEFT,0xff000000);
 font->End();
}