たびたびすいません
ttp://dia.sub.jp/ak/gold/delphilesson.html#010

ここを見てラジオボタンの使いかたがわかったんですけど
ボタン2を押したときにWM_MBUTTONDOWNの状態にする方法がわからなくて・・・orz

WM_MBUTTONDOWNでぐぐったら
#define WM_MBUTTONDOWN = &H207こんな式が出てきたので
ボタン2に
procedure TForm1.WheelOnClick(Sender: TObject);
begin
#define WM_MBUTTONDOWN = &H207

end;

end.
としてみたのですがエラーでした
どうやったらうまくいきますか?お願いします