从未见过的问题!!!!!!!(50分)

  • 主题发起人 主题发起人 szchengyu
  • 开始时间 开始时间
program Project1;

uses
; Forms,
; Unit1 in 'Unit1.pas' {Form1},
; Unit2 in 'Unit2.pas' {Form2};

{$R *.res}

begin
; Application.Initialize;
; Application.CreateForm(TForm1, Form1);
; Application.Run;
end.


unit Unit1;

interface

uses
; Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
; Dialogs, StdCtrls,Unit2;

type
; TForm1 = class(TForm)
; ; Button1: TButton;
; ; procedure Button1Click(Sender: TObject);
; private
; ; { Private declarations }
; public
; ; { Public declarations }
; end;

var
; Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
; f:TForm2;
begin
; f:=TForm2.Create(nil);
; f.Show;
end;

end.



unit Unit2;

interface

uses
; Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
; Dialogs, StdCtrls;

type
; TForm2 = class(TForm)
; ; Label1: TLabel;
; private
; ; { Private declarations }
; public
; ; { Public declarations }
; end;

var
; Form2: TForm2;

implementation

{$R *.dfm}

end.
 
哦, 不是BUG,
谢谢各位, 根据你们的思路,我找到问题了,
原来窗体的 Visbale 被改为 True 了(如果设了MDI性质,就会自动改为这样, 可能是误动作)
改回来就没事了

为刚才抱怨道歉!!!, 来者有分
 
我一开始就告诉你,让你看看你窗体的visible属性是不是还是false了,自己没看到别人的
回答就开始抱怨别人,没搞清楚的是你吧?!!!!![:(!][:(!]
 
呵呵 你用了多文档窗口?
哈哈~~~~~~~笑死我~
 
你的Project-options-Forms中的Auto-create forms是不是都选了,
把不想在运行时出现的窗体放到Availabel Forms中就可以了。
 
多人接受答案了。
 
后退
顶部