procedure TForm1.suiButton3Click(Sender: TObject);
begin
    suiPasswordDialog1.Item1Text := '';
    suiPasswordDialog1.Item2Text := '';
    suiPasswordDialog1.Item1Caption := 'User name: ';
    suiPasswordDialog1.Item2Caption := 'Password: ';
    suiPasswordDialog1.Item1PasswordChar := #0;
    suiPasswordDialog1.Item2PasswordChar := '*';
    suiPasswordDialog1.UIStyle := suiForm1.UIStyle;
    suiPasswordDialog1.ShowModal();
end;这样是可以的但我把它换成下面这样就不行, 不好意思,我刚学procedure TForm1.beforeformCreate(Sender: TObject);
begin
    suiPasswordDialog1.Item1Text := '';
    suiPasswordDialog1.Item2Text := '';
    suiPasswordDialog1.Item1Caption := 'User name: ';
    suiPasswordDialog1.Item2Caption := 'Password: ';
    suiPasswordDialog1.Item1PasswordChar := #0;
    suiPasswordDialog1.Item2PasswordChar := '*';
    suiPasswordDialog1.UIStyle := suiForm1.UIStyle;
    suiPasswordDialog1.ShowModal();
end;

解决方案 »

  1.   

    suiPasswordDialog1.Item1Text := '';
    suiPasswordDialog1.Item1Caption := 'User name: '
    这些是什么,请说明一下...
      

  2.   

    放在TForm1.beforeformShow里试一下
      

  3.   

    suiPasswordDialog1.UIStyle := suiForm1.UIStyle;
    suiPasswordDialog1 := Application.create();  //在oncreate加这一句看看
    suiPasswordDialog1.ShowModal();
      

  4.   

    suiPasswordDialog1 := TsuiPasswordDialog.Create(Application); //
      

  5.   

    form还没有create应该不能实现这些操作吧?
      

  6.   

    FB97001(绿豆眼睛) :这是Delphi一个界面控件的登录窗口,我不过是想让它在程序执行之前出现coreblood(菜码):我把suiPasswordDialog1 := TsuiPasswordDialog.Create(Application); 
    加在suiPasswordDialog1.UIStyle := suiForm1.UIStyle;后
    好像不行。
    大家帮帮忙啦。^O^