一、设计窗口 1) file---new--Application，新建一个窗体，设置该窗体的属性：Caption==登录窗口 2) procedure TForm1.btn1Click(Sender: TObject); begin form2.show;//需要再建立一个form窗口用来作为登录正确后显示的窗体 Close; self.Hide; end;
本文共 254 字，大约阅读时间需要 1 分钟。
一、设计窗口 1) file---new--Application，新建一个窗体，设置该窗体的属性：Caption==登录窗口 2) procedure TForm1.btn1Click(Sender: TObject); begin form2.show;//需要再建立一个form窗口用来作为登录正确后显示的窗体 Close; self.Hide; end;
转载于:https://www.cnblogs.com/qingsong/p/4033177.html