delphi7 edit1,edit2,edit3输入自然数后,label1要显示“10×60×3”格式,10为edit1输入的数60为edit2输
delphi7edit1,edit2,edit3输入自然数后,label1要显示“10×60×3”格式,10为edit1输入的数60为edit2输入的数,我这样写了代码但...
delphi7 edit1,edit2,edit3输入自然数后,label1要显示“10×60×3”格式,10为edit1输入的数60为edit2输入的数,我这样写了代码但当我用多个label时,就不行了,不该显示的却显示出来了,
label1.Caption := Format( '%sx%sx%s', [ edit1.text, edit2.text, edit3.text ] ); 展开
label1.Caption := Format( '%sx%sx%s', [ edit1.text, edit2.text, edit3.text ] ); 展开
展开全部
如果有多个label要用的话,自己写个过程调用就方便了:
procedure LblShow(txt1, txt2, txt3: String; var MyLbl: TLabel);
begin
if MyLbl = nil then Exit;
MyLbl.Caption := txt1 + 'X' + txt2 + 'X' + txt3;
end;
调用语句例:
LblShow(Edit1.Text, Edit2.Text, Edit3.Text, Label1);
procedure LblShow(txt1, txt2, txt3: String; var MyLbl: TLabel);
begin
if MyLbl = nil then Exit;
MyLbl.Caption := txt1 + 'X' + txt2 + 'X' + txt3;
end;
调用语句例:
LblShow(Edit1.Text, Edit2.Text, Edit3.Text, Label1);
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
label1.Caption := edit1.text+ 'X'+edit2.text+'X'+ edit3.text; 应该就是正解
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
label1.Caption := edit1.text+ 'X'+edit2.text+'X'+ edit3.text;
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你很纠结,1个问题提问好几次,就是没有把问题说清楚
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询