回 帖 发 新 帖 刷新版面

主题:各位请教了。。

procedure TForm1.ToolButton1Click(Sender: TObject);
begin
form2.Height:=80;
form2.Width:=80;
form2.Show;
end;

这样写进去 FORM2的大小 还是原来的大小 他怎么不会改变啊

回复列表 (共3个回复)

沙发

这段代码对其他FORM3 或者FORM4 都有效  就对FORM2 无效。。。 FORM2 上面被我删掉了几个EDIT组件

板凳

会变的!

3 楼

这是DELPHI里机制有点问题,你删除Form2然后再增加一个窗体取名为FORM2就可以了

我来回复

您尚未登录,请登录后再回复。点此登录或注册