一个菜鸟的问题,怎么在两个窗口来回切换? 我刚从vb转学delphi,现在遇到一个很简单的问题. 假设有两个窗口,form1,form2,其对应的单元为unit1,unit2,从form1切换form2这比较容易,在unit1里加uses unit1,然后用form2.show就可以了,可是从form2切回到form1却不能uses unti1,系统会提示"circular unit reference to unit1",请问各位高手,应该怎么改呢? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在form2里引用unit1时,把代码写在执行段.unit2.....implementationuses unit1; 如果是循环的引用的话那么use的时候一个在开始的位置就是最上面的地方use一个在implementation的下面 可能会解决你的问题的 使用Delphi的File菜单下Uses Uint就可以解决了 //-------------------花了几分钟做的.不知能否帮上忙----------------unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementationuses Unit2;{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);begin form2.show;end;end.//------------------------------------------// delphi5程序升级到delphi7的问题 新手上路,请大家多帮忙!! 请教:XPMenu控件如何使用?(仅仅就一个.pas文件,怎么象其他的用.dpk注册呢?) 程序显示问题? 怎样调用全局变量?在线等待? 数据实时更新的设计!!五百分!!!! 能不能把OleContainer里的word文件写到paradox的Ole字段 想问一下,关于北京调查的问题 几个菜问题? help:dbgrid 请问:做一个类似绘图的软件时,如何像开发工具界面一样,可以使元件可以向上向下移一层?选中时,周围出现六个点? 升星散分
unit2
.....implementation
uses
unit1;
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementationuses Unit2;{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
form2.show;
end;end.
//------------------------------------------//