procedure TMainForm.AppMsgCBClick(Sender: TObject);
{ enables/disables proper radio button for checkbox click }
begin
if EatMsgCB.Checked then
begin
with TRadioButton((Sender as TCheckBox).Tag) do //****
begin
Enabled := TCheckbox(Sender).Checked;
if not Enabled then Checked := False;
end;
end;
end;其中***处什么意思?
{ enables/disables proper radio button for checkbox click }
begin
if EatMsgCB.Checked then
begin
with TRadioButton((Sender as TCheckBox).Tag) do //****
begin
Enabled := TCheckbox(Sender).Checked;
if not Enabled then Checked := False;
end;
end;
end;其中***处什么意思?
解决方案 »
- dbgrideh上如何显示提示信息
- delphi中stringGrid不同行显示不同颜色字体出现闪烁。
- Turbo Delphi 2006如何升级?
- dbgrideh单元格直接编辑问题
- 在一个树型记录的表中,怎么判断在当级的记录关键字(Code)是唯一的呢?
- 问大家:关於数据库连接
- 用new分配一个动态对象的,一操作就崩溃
- 如何把DBgrid中的数据传到office中的excel去
- 初学数据库第一天
- paradox和access中的自增加字段类型应该是什么类型啊?也就是说如何可以把这个值给as出来,如asinteger?
- delph5中string与widestring的转换错误,如何解决?
- 树型控件
Comments are ignored by the compiler, except when they function as separators (delimiting adjacent tokens) or compiler directives.
There are several ways to construct comments:{ Text between a left brace and a right brace constitutes a comment. }
(* Text between a left-parenthesis-plus-asterisk and an asterisk-plus-right-parenthesis also constitutes a comment. *)// Any text between a double-slash and the end of the line constitutes a comment.A comment that contains a dollar sign ($) immediately after the opening { or (* is a compiler directive. For example,{$WARNINGS OFF}tells the compiler not to generate warning messages.
我说:
with TRadioButton((Sender as TCheckBox).Tag) do
这行什么意思?
我说:
with TRadioButton((Sender as TCheckBox).Tag) do
这行什么意思?