如何取得RadioGroup在点选改变前的选择项?100分,在线等。 我的意思在选择RadioGroup中的选项的时候,能获得选择前的选项。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 RadioGroup1.Items[RadioGroup1.ItemIndex]就是它的当前项。 迭代一下各项的Checked属性不就可以了吗? 我的意思是讲:在选择一个选项的时候,能够获得在选择这个选项之前的选项是哪一个。举例说就,Items中有三个,初始情况下,第一(也有可能是第二,第三)被选定,然后我选择不同的选项的时候能知道,原来选项是哪一个。 WGYKING(【修罗】牵着蚂蚁过街) :能不能举个例子说明,谢谢! ......implementationvar gOldItem : String;{$R *.dfm}procedure TForm1.RadioGroup1Click(Sender: TObject);var StrYouWant : String;begin StrYouWant := gOldItem; gOldItem := RadioGroup1.Items[RadioGroup1.ItemIndex];end;..... 可以设置一个标志---A,每次点击RadioGroup1的时候,每次点击之前判断A的值,结束前给A赋当前的选中的值!! RadioGroup1.Items[RadioGroup1.ItemIndex点选前用一个变量先保存就行了 关于面向对象多态的问题? delphi有内存管理的概念吗? Access数据类型不对 Socket控件问题,我出60分,谢谢 求教:如何将大段文本插入数据库(不使用insert语句) 关于flash下载的问题 Webservice的哪里算中间层,可以进行逻辑控制?客户端是否需要midas.dll? 求教:SendMessage 函数的用法? 可能是注册表的简单问题 这种算法怎么写:从一个字符串里,每隔两个取一个字符:比如:str:='abcdefgh',那么取出来的是:'ab','cd','ef','gh' 请问如何降低cpu占用率 高分求一个函数,Belong()函数。100分!谢谢。
implementation
var
gOldItem : String;
{$R *.dfm}procedure TForm1.RadioGroup1Click(Sender: TObject);
var
StrYouWant : String;
begin
StrYouWant := gOldItem;
gOldItem := RadioGroup1.Items[RadioGroup1.ItemIndex];
end;
.....
点选前用一个变量先保存就行了