請教各位大大,我的程式裏面有個MainMenu,RadioGroup,Button
procedure TForm1.N1Click(Sender: TObject);
begin
radiogroup1.items.Clear;
radiogroup1.items.add('選擇壹');
radiogroup1.items.add('選擇二');
radiogroup1.items.add('選擇三');
end;
end;
procedure TForm1.N2Click(Sender: TObject);
begin
radiogroup1.items.Clear;
radiogroup1.items.add('選擇四);
radiogroup1.items.add('選擇五');
radiogroup1.items.add('選擇六');
end;
end;
...... //菜單項不止壹個.有N個NClick~~
請問我應該在Button按鈕寫判斷咧??例如選擇二時showmessage('2')
選擇四時showmessage('4')...
=.= 謝謝指點~~~

------
!!^_^..我愛Delphi*^_^*!!

Hi, 可以這樣子寫
[code delphi]
procedure TForm1.Button1Click(Sender: TObject);
begin
if RadioGroup1.ItemIndex >= 0 then
ShowMessage(RadioGroup1.Items.Strings[RadioGroup1.ItemIndex]);
end;
[/code]

------
價值的展現，來自於你用哪一個角度來看待它!!

Hi..留意妳很久咧~妳的頭像超可愛喲~..~
雖然答案不是我理想中的,但還是從妳的回答中悟出答案了.~謝謝..

------
!!^_^..我愛Delphi*^_^*!!

不客氣.....不過我看你給我的性別似乎都是女性，我是男的哦!!

===================引 用 with 文 章===================
Hi..留意妳很久咧~妳的頭像超可愛喲~..~
雖然答案不是我理想中的,但還是從妳的回答中悟出答案了.~謝謝..

------
價值的展現，來自於你用哪一個角度來看待它!!