这个循环怎么做啊。。谢谢！！
有个string 。值为110。1为可用。0为不可用
110分别对应3个菜单。
要怎么做前2个可用。第3个不可用啊。
问题点数：100、回复次数：6Top
1 楼DDGG（叮叮当当）回复于 2005-04-01 01:19:23 得分 0
110分别对应3个菜单是什么意思？
Top
2 楼amer（）回复于 2005-04-01 01:34:20 得分 0
就是有3个菜单分别是user name pwd
110就是让user可用。name可用.pwd不可用
要怎么做才能这样啊。Top
3 楼amer（）回复于 2005-04-01 01:37:44 得分 0
101这3个菜单就变成
可用。不可用，可用。
请DDGG帮帮我。好吗？Top
4 楼shunbing（）回复于 2005-04-01 08:13:39 得分 30
if Copy('110',1,1)='1' then
user能用
else user不能用;
if Copy('110',2,1)='1' then
name能用
else name不能用;
if Copy('110',3,1)='1' then
pwd能用
else pwd不能用;Top
5 楼gzmhero（hihihi）回复于 2005-04-01 08:52:47 得分 70
假设MainMenu是一个菜单，3项，分别为User,name,pwd
Edit1放置字符串
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
for i:=1 to 3 do
MainMenu1.Items[i-1].Enabled:=Edit1.Text[i]='1';
end;
Top
6 楼amer（）回复于 2005-04-01 11:35:18 得分 0
谢谢：gzmhero(hihihi）Top
