20 USERES(
"emb_sample.res");
 
   21 USEFORM(
"emb_samples.cpp", Form1);
 
   22 USELIB(
"libmysqld.lib");
 
   24 WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, 
int)
 
   28                  Application->Initialize();
 
   29                  Application->Title = 
"MySQL Embedded Server Sample";
 
   30                  Application->CreateForm(__classid(
TForm1), &Form1);
 
   33         catch (Exception &exception)
 
   35                  Application->ShowException(&exception);