Delphi   发布时间:2022-04-11  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了在delphi SDI中创建新表单时传递参数大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
好吧,如果这有点令人困惑,我很抱歉,但我不知道如何更好地解释它.我有一个聊天表单,在用户事先在TLoginForm中进行身份验证后显示.

用户登录然后显示chatForm:

with TChatForm.Create(Application) do
begin
    Show;
end;

我的问题是,如何将用户名传递给chatForm,以便我可以在聊天中将其用作昵称,虑到表单自动连接到服务器OnShow的事实,所以我将需要已经发送的用户名.

我是delphi的新手,所以如果我的代码中有任何错误,请原谅.

解决方法

如果用户名应在对象的整个生命周期内修复,则应将其传递给构造函数.好处是不能滥用课程而忘记分配用户名.

声明一个在参数中接收额外信息的构造函数:

type
  TMyForm = class(TForm)
  private
    FUserName: String;
  public
    constructor Create(Aowner: TComponent; 
        const UserName: String);
  end;

constructor TMyForm.Create(Aowner: TComponent; 
        const UserName: String);
begin
  inherited Create(Aowner);
  FUserName := UserName;
end;

像这样创建表单:

@H_897_4@myForm := TMyForm.Create(Application,UserName);

大佬总结

以上是大佬教程为你收集整理的在delphi SDI中创建新表单时传递参数全部内容,希望文章能够帮你解决在delphi SDI中创建新表单时传递参数所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。