c语言调用vcl控件，含事件处理

代码如下：
    CreateComponentEx(p,"label","caption","校验数据:","left",10 ,"top",8,"width",170,"height",20,0);
    edtSdTxt=CreateComponentEx(p,"memo","text","12 D4 AA 8E","left",10,"top",25,"width",370,"height",130,"scrollbars","ssboth",0);
    int button0=CreateComponentEx(p,"button","caption","取发送区反选数据","left",80 ,"top",3,"width",140,"height",20,"OnClick",OnGetSelDat,0);
    int button1=CreateComponentEx(p,"button","caption","取发送区所有数据","left",240,"top",3,"width",140,"height",20,"OnClick",OnGetAllDat,0);
    CreateComponentEx(p,"label","caption","校验算法:","left",400 ,"top",8,"width",170,"height",20,0);    cbx1=CreateComponentEx(p,"combobox","left",460,"top",3,"width",220,"height",20,"style","csdropdownlist","itemindex",2,NULL);//创建按钮
    CreateComponentEx(p,"label","caption","十进制求和结果:","left",400,"top",38,"width",170,"height",20,0);
    edtSumTxt=CreateComponentEx(p,"edit","text","","left",100+400,"top",35,"width",180,"height",20,0);
    int lblDatLen=CreateComponentEx(p,"label","caption","数据长度:","left", 400,"top",93,"width",170,"height",20,0);
    edtDatLen=CreateComponentEx(p,"edit","text","","left",100+400,"top",90,"width",180,"height",20,0);
    int lblSumTxt1=CreateComponentEx(p,"label","caption","16进制结果(8bit):","left", 400,"top",68,"width",170,"height",20,0);
    edtSumTxt1=CreateComponentEx(p,"edit","text","","left",100+400,"top",65,"width",180,"height",20,0);
    int button2=CreateComponentEx(p,"button","caption","计算校验","left", 400,"top",125,"width",130,"height",30,"onclick",OnCalcCheckVal,0);
    int button1=CreateComponentEx(p,"button","caption","关闭","left", 550,"top",125,"width",130,"height",30,"onclick",OnClose,0);