************************一段代码，请大虾解释一下为什么没有执行************************

Question

检查一下Form的OnCreate事件是否确实连接了FormCreate这个函数。另：没有什么为什么好问的。如果要问，你应该到C++组里去问，为什么在.h文件的Class CTest中声明了函数ASample。到.cpp文件中要写成CTest::ASample?

Answer 1

查看你的工程文件,看有没有初始化该窗体;
interface为类的方法,事件之类的声明,所以不要

Answer 2

  简单的，在Form1的Object Inspect中的Event页面设置Form1的OnCreate事件为你的formCreate。  但需要注意，函数procedure Tform1.formCreate(sender:tobject);声明最好放在published段。