2 a814123 a814123 于 2018.08.10 22:24 提问

delphi 主窗体里的常量传递?

我在主窗体里声明了一个常量。
const
vs = 2.0;

想在其他窗体里调用这个vs,请问怎么操作呢?

2个回答

hgameaaa
hgameaaa   2018.08.11 10:22
已采纳

图片说明
把常量放在INTERFACE下,其他单元USES UNIT1就可以了

caozhy
caozhy   Ds   Rxr 2018.08.10 23:03

定义成public的

var
f: MainForm;

f := TModalForm.Create(Application);
i = f.vs;
...

Csdn user default icon
上传中...
上传图片
插入图片
准确详细的回答,更有利于被提问者采纳,从而获得C币。复制、灌水、广告等回答会被删除,是时候展现真正的技术了!
其他相关推荐
Delphi窗体间发送消息或字符串
在Delphi 开发中,常常应用到窗体消息传递,以达成某种操作要求,以下列举一个应用的例子,供大家参考。 自定义过程/函数方法://发送字符串到指字句柄的窗口中 (接收窗体需用发送时的消息常量WM_COPYDATA)procedure SendMessageData(AHandle: THandle; AStr: String);var sData: TCopyDataStru
delphi窗体之间的相互传值
效果图如下所示 Form1代码 //定义一个用户信息类 type   TUsersInfo=class     //声明三个全局变量     public        UserName: string;        UserPwd:string;        UserAge:Integer;   end; //引用form2 uses Unit2;
移花接木,Delphi中主窗体的转移。
在Delphi中,创建一个工程,并添加一个窗体,这样就有两个窗体了。 Form1(Unit1.pas)和Form2(unit2.pas)。Form1是默认的主窗体。我们从工程文件中,将Form2的创建代码删除掉。我们打算动态创建Form2。 我们代码的目的,是要将Form1销毁掉,并创建Form2,并将Form2变为主窗体。Form2关闭,程序就退出。 在Form1上放置一个按钮
Delphi如何设置主窗体
   1、 Delphi如何设置主窗体?答:Delphi在默认情况下认为第一个建立的窗体就是主窗体,并且默认情况下是从主窗体开始启动,我们可以选择主菜单的“Prjoect / Options”(工程 / 选项)菜单,在弹出的对话框中点击“Forms”选项卡,在里面的“Main Form”项目中设置主窗体。
Delphi实现非模态主窗口最小化子窗口不最小化
重载窗口CreateParams过程 TForm2= class(TForm) protected   procedure CreateParams(var Params: TCreateParams); override; end; procedure TForm2.CreateParams(var Params: TCreateParams); begin   inherit
delphi登录窗口与主窗口的显示先后。
1、登录窗口form1,主窗口form2,在form1的create中加下if form2.showmodal <> mrok then Application.Terminate;2、在form1的确定按钮中加入         F_main.Show;        F_dl.Hide;...
子窗子显示在MDI主窗体panel控件之上
机房收费系统中,需要将子窗子显示在MDI主窗体panel容器控件之上。查了资料。大概网上有两种方法。一种是是可以将子窗体上的控件直接内嵌到panel控件之上,还有一种是子窗子显示在MDI主窗体panel控件之上。 通过这个需求的实现,感觉到知识学习是无穷尽,因为对于panel容器控件,自己也是第一次使用,所以这个知识对于自己而言是新的东西,面对这样无穷尽的新知识的学习,我要学会的站到一个高的位置上去抽象出这些学习这种新知识的方法,自己总结了一下方法: 1.学会去网上查询。 去网上查自己想要的东西,不
BPL窗体及类的封装方法
------------------BPL中的类封装PAS文件bplclass(类输出接口)-------------------- 方法二:在文件中定义BPL窗口pas中的类(接口) unit bplclass; interface uses bplUnit1;//引用BPL窗口PAS,即可输出其中的类 implementation end. 次方法有不利之处,也就是说主程序编程
在DockPanel 的子窗体打开另一子窗体使其停靠在主窗体的方法
1、新建主窗体frmMain,并在其类增加一属性   public DockPanel DockPanel        {            get            {                return this.dockPanel;            }        } 2、增加子窗体frmSysMenu,并增加一方法      private Contr
关于父窗口与子窗口传值的Demo
本Demo案例为父窗口打开具有分页功能的子窗口并选择需要的值为id和id对应的值传给父窗口并以二维数组进行暂时存储,等选好之后,二维数组再把其中的元素以字符串形式分开存储在对应的input中。