如何屏蔽 with ?
with MenuRecentFile do
begin
for i:=0 to .Count -1 do
begin
str2:=string(items[i].Caption);
delete(str2,1,9); /////这里 delete 出错,因为menuitem 里有一个个delete函数。但是有想用with,如何让delphi理解这里的delete不是menuitem的。
if str2=str1 then items[i].Checked :=true;
end;
end;
//////////////不用with的语句 正确
for i:=0 to MenuRecentFile.Count -1 do
begin
str2:=string(MenuRecentFile.items[i].Caption);
delete(str2,1,9);
if str2=str1 then MenuRecentFile.items[i].Checked :=true;
end;
问题点数:20、回复次数:3Top
1 楼dq(独轻)回复于 2001-10-18 14:39:21 得分 10
写成System.Delete(str2, 1, 9);Top
2 楼m_leaner(和日本鬼子势不两立)回复于 2001-10-18 14:45:59 得分 5
同意楼上因为DELETE是在SYSTEM单元中定义的把他的域加上就可以了Top
3 楼arthurwww(青萍)回复于 2001-10-18 14:46:40 得分 5
system.deleteTop
4 楼m_leaner(和日本鬼子势不两立)回复于 2001-10-18 14:47:06 得分 0
同意楼上Top




