在Delphi的窗口单元中,如何调用其它窗口的单元。

在Delphi的窗口单元中,如何调用其它窗口的单元。(转载)
.

在Delphi中简单的调用单元

unit实例

一,新建一个工程文件,默认的文件是unit1,代码如下:unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm1 = class(TForm)

Button1: TButton;

Edit1: TEdit;

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

var

nTemp:integer;

begin

nTemp:=add(3,4);

//也可以这样nTemp:=unit2.add(3,4);

edit1.Text:=inttostr(nTemp);

end;

end.

2,新建一个unit,默认名称是unit2,代码如下:

unit Unit2;

interface

uses windows,messages, SysUtils, Variants, Classes;

function add(a,b:integer):integer;

implementation

function add(a,b:integer):integer;

begin

result:=a+b;

end;

end.

从这里我们可以看到,单元的引用是非常简单的.

我们的unit2只是一个代码单元,没有窗体.在interface节中我们相当于声明了单元的对外可见部分,在implementation中,定义了实现部分.

在unit1当中,我们引用unit2后,直接可以调用add函数了,当然,也可以在前面加上unit2.add()这样的形式.

.

在这个单元中,我们可以把一些公用函数,类等东西放进去,实现程序的模块化.便于程序结构明晰.也便于程序维护。

时间: 2024-10-30 09:24:32

在Delphi的窗口单元中,如何调用其它窗口的单元。的相关文章

JavaScript子窗口调用父窗口变量和函数的方法

在做一个父窗口开启子窗口并且在子窗口关闭的时候调用父窗口的方法,达到局部刷新的目的. 父窗口: 1 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" 2 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> 3 <html xmlns=" http://www.w3.org/1999/xhtml&qu

Android窗口管理服务WindowManagerService对输入法窗口(Input Method Window)的管理分析

文章转载至CSDN社区罗升阳的安卓之旅,原文地址:http://blog.csdn.net/luoshengyang/article/details/8526644 在Android系统中,输入法窗口是一种特殊类型的窗口,它总是位于需要使用输入法的窗口的上面.也就是说,一旦 WindowManagerService服务检测到焦点窗口需要使用输入法,那么它就会调整输入法窗口在窗口堆栈中的位置,使得输入法窗口位于在焦点窗 口的上面,这样用户可以通过输入法窗口来录入字母或者文字.本文就将详细分析Win

在Delphi中静态调用DLL 引用外部Dll External Dll 导入Dll

  调用一个DLL比写一个DLL要容易一些.首先给大家介绍的是静态调用方法,稍后将介绍动态调用方法,并就两种方法做一个比较.同样的,我们先举一个静态调用的例子. unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Edit1: TEdit; Button1: TButton;

delphi文件打包方式(将多个文件编译到一个单元中)

delphi文件打包方式 在Delphi项目中,通常有一个和项目名称主文件名相同的.RES文件,该文件用于保存应用程式图标等资源,对应于此文件,在项目文件中一定含有编译指示“{$R *.res}”,告诉编译器编译时需要包含和项目主文件名相同的.RES文件.同样,如果需要在应用程式中以资源形式包含所有文件类型,也能利用.RES文件.本文将告诉你怎么利用RES文件在Delphi程式内部包含文件. 一创建.RES文件 这里以一组音频文件为例.首先用记事本等所有文本编辑器编写文件“MyMusic.RC”

(转)C#在父窗口中调用子窗口的过程(无法访问已释放的对象)

C#在父窗口中调用子窗口的过程: 1. 创建子窗口对象 2. 显示子窗口对象 笔者的程序中,主窗体MainFrm通过菜单调用子窗口ChildFrm.在窗体中定义了子窗口对象,然后在菜单项点击事件中,加入了如下代码来创建和显示子窗口: Private childFrm myChildFrm = null; //定义子窗口对象 private void OpenChildFrmToolStripMenuItem_Click(object sender, EventArgs e) { myChildF

delphi xe6中如何调用stringtojstring

uses   Androidapi.Helpers; delphi xe6中如何调用stringtojstring

IE 扩展调用主窗口中的函数

在函数名前加上 parentWindow 即可.如: <script> var doc = external.menuArguments.document doc.parentWindow.函数名(); </script>IE 扩展调用主窗口中的函数

Delphi FMX 手机目录提取,把IO相关的都提取到System.IoUtils单元中

Delphi把IO相关的都提取到System.IoUtils单元中.路径操作使用TPath的方法都很方便.uses System.IoUtils TPath.GetTempPath//临时目录TPath.GetCameraPath//照相机目录(照片/录像)TPath.GetMusicPath//音乐目录TPath.GetDownloadsPath//下载目录……如果使用TPath类的静态方法那么代码就是跨平台的,在Windows,Mac,iOS,Android上都能用.如果仅仅对Android

delphi EncdDecd.pas单元中Encoding方法出现#$D#$A的解决方法

例如: s:= 'http://detail.tmall.com/item.htm?id=45545826531&abbucket=_AB-M129_B17&acm=03130.1003.1.161728&aldid=4HatiDee&abtest=_AB-LR129-PV129_1393&scm=1003.1.03130.13_45545826531_161728&pos=6#detail'; s:=Encoding(s);  //加密后的字符串中间就会多