TSpeedButton->OnClick这类的改成VC该怎么改？

[puddingli]

比较简单的问题，有一小段BCB的函数我要改成VC~
如下：

void TMainFrom::SetImagePara(void)
{
    EdgeSharpRd->OnClick=NULL;
    CheckBox1->OnClick=NULL;
    EdgeScrl->OnChange=NULL;
    TrackBar1->OnChange=NULL;

    MyImage->SetImagePara();
    EdgeSharpRd->Down=true;
    EdgeScrl->Position=MyImage->iStep;
    CheckBox1->Checked=true;
    if(MyImage->ImgCorrectPara.CorrectType==1)
        TrackBar1->Position=MyImage->ImgCorrectPara.CorrectCoef*100;
    else if(MyImage->ImgCorrectPara.CorrectType==2)
        TrackBar1->Position=MyImage->ImgCorrectPara.CorrectCoef/50;
    else if(MyImage->ImgCorrectPara.CorrectType==3)
        TrackBar1->Position=MyImage->ImgCorrectPara.CorrectCoef*20;
    else
        TrackBar1->Position=MyImage->ImgCorrectPara.CorrectCoef*20;

    EdgeSharpRd->OnClick=EdgeLowerRdClick;
    CheckBox1->OnClick=CheckBox1Click;
    EdgeScrl->OnChange=EdgeScrlChange;
    TrackBar1->OnChange=TrackBar1Change;
}

中间的部分我已经改好了，想问的就是下面这些怎么改？
EdgeSharpRd->OnClick=EdgeLowerRdClick;
CheckBox1->OnClick=CheckBox1Click;
EdgeScrl->OnChange=EdgeScrlChange;
TrackBar1->OnChange=TrackBar1Change;
EdgeSharpRd是TSpeedButton类，其他的如下图：

比如EdgeSharpRd->OnClick改成VC的话，是指只让EdgeSharpRd按钮变成按下状态还是既按下状态，又执行EdgeSharpRd按钮的函数？
CheckBox1->OnClick也是，是只打钩还是既打钩又执行里面的函数。
EdgeScrl->OnChange又怎么改？
EdgeSharpRd->OnClick=NULL;又是什么意思？
请大家指教一下，谢谢。

[puddingli]

引用 2 楼 ksrsoft 的回复:

cb多好，干嘛改vc

因为要求我用VC来写啊....

[二班的码农]

将控件类型变成checkbox不就行了

[缘中人]

cb多好，干嘛改vc

[Waiting4you]

CheckBox1->OnClick=CheckBox1Click; 是把CheckBox1的点击事件指向CheckBox1Click方法，这句话本身不会影响CheckBox1的状态的。 在VC里类似于CheckBox1的BN_CLICKED消息事件处理函数会调用CheckBox1->OnClick();

[puddingli]

引用 5 楼 Waiting4you 的回复:

CheckBox1->OnClick=CheckBox1Click; 是把CheckBox1的点击事件指向CheckBox1Click方法，这句话本身不会影响CheckBox1的状态的。 在VC里类似于CheckBox1的BN_CLICKED消息事件处理函数会调用CheckBox1->OnClick();

CheckBox1的点击事件指向CheckBox1Click方法的意思是本条语句要执行一次CheckBox1Click里的函数吗？ 还是说以后点击CheckBox1控件时就会执行CheckBox1Click方法？ 那EdgeSharpRd->OnClick=EdgeLowerRdClick;是执行一遍EdgeLowerRdClick函数，还是说以后点EdgeSharpRd按钮却执行的是EdgeLowerRdClick函数了呢？（原来EdgeSharpRd按钮按下去是执行EdgeSharpRdClick函数） 谢谢啊，我对BCB确实不太了解。