如何在Delphi中对带有两个单选按钮的单选按钮组进行if声明

Question

我该如何对带有两个单选按钮的TRadioGroup进行if语句，以便在检查TRadioGroup中的特定单选按钮时输出文本。

TradioGroup.Items具有以下值：

• 男
• 女

因此，当选中“男”按钮时，它必须输出'Mr'，如果选中了“母”按钮，则必须输出'Ms'进行丰富的编辑。

Answer 1

将 ItemIndex 的 TRadioGroup 属性用作

Case RadioGroup1.ItemIndex of
 0: //Add Mr to RichEdit;
 1: //Add Ms to RichEdit;
 //else if needed
end;

如果您确实需要使用if，那么

if RadioGroup1.ItemIndex = 0 then
  //Add Mr to RichEdit
else
if RadioGroup1.ItemIndex = 1 then
  //Add Ms to RichEdit;
//else if needed

在添加字符串 Clear之前，您无需指定是否要 TRichEdit Add 组件或 Insert 字符串，或者甚至根据Index用它替换另一个字符串，因此我留给您自己，只写评论即可。

由于您有两个按钮（假设Mr-Ms依次排列），因此ItemIdex组件的TRadioGroup属性将保持不变：

• -1（如果未选择任何一个）。
• 0表示已选择'Mr'。
• 1表示已选择'Ms'。

Answer 2

您可以使用if语句来确定如果某个事件发生了该怎么办。 在radioGroup中，索引从 0 1个 2 3 等

runtimeCaching: [
    urlPattern: '/index.html',
    handler: 'networkFirst'
]