Delphi   发布时间:2022-04-11  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了delphi – 在TRadioGroup中选择了哪个单选按钮?大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
正如您在我的问题历史中所看到的,我正在开发一个电子书管理器,它将是开源的,我会在大约10天内发布它,但我有一个TRadioGroup,你可以看到:
TRadioGroup Used On My Form http://img85.imageshack.us/img85/1830/radiogroup.png

我想将一些东西存储在一个变量(需要是一个整数)中,该变量将与这个TRadioGroup“链接”.

我需要做一个这样的if函数:

但是我只使用了TRadioGroup和TRadioButton一次,不同于C#,我使用了20多次.然后我想知道我需要把什么放在if函数上,因为它会做什么我已经知道怎么做了

var
  num: Integer;

begin
  if(TRadioButton1 checked?)
  begin
    num := 0;
  end;
end.

我需要把它放在if函数的括号内?

PS:我将把这些学分放在帮助我完成这个小项目的人的计划中.

解决方法

TRadioButton具有checked属性.但是TRadioGroup具有ItemIndex属性.

TRadioGroup中的项目使用TStrings存储.因此,您可以将对象关联到每个选项,并且可以将整数转换为要存储的TObject.

例:

// fill the radiogroup
radiogroup.Items.AddObject('Fit 2xWidth',TObject(0));
radiogroup.Items.AddObject('Fit 2xHeight',TObject(1));
radiogroup.Items.AddObject('Fit Width',TObject(2));
radiogroup.Items.AddObject('Fit Height',TObject(3));
radiogroup.ItemIndex := 0;

要阅读当前设置:

value := radiogroup.ItemIndex;

或者获取关联的整数:

index := radiogroup.ItemIndex;
Assert(index>=0); // Sanity check
value := Integer(radiogroup.Items.Objects[index]);

在您的情况下,值为0到3,因此您可以使用ItemIndex.

作为一个注释,如果不是一个功能.函数是一段代码,它根据输入参数返回一个值. If是一个语句,这是一个可以执行的命令. if语句是特殊的,因为它使您能够基于if条件执行不同的语句.

大佬总结

以上是大佬教程为你收集整理的delphi – 在TRadioGroup中选择了哪个单选按钮?全部内容,希望文章能够帮你解决delphi – 在TRadioGroup中选择了哪个单选按钮?所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。