高校党员管理系统源代码有用的可以下载来用

源代码在线查看: untdmappmdi.~pas

软件大小: 3969 K
上传用户: ll122644144
关键词: 管理系统 源代码
下载地址: 免注册下载 普通下载 VIP

相关代码

				unit UntDMAppMDI;
				
				interface
				
				uses
				  SysUtils, Classes, DB,Forms, ADODB;
				
				type
				  TDM = class(TDataModule)
				    ADOConnection: TADOConnection;
				    procedure DataModuleCreate(Sender: TObject);
				  private
				    { Private declarations }
				  public
				    { Public declarations }
				  end;
				
				var
				  DM: TDM;
				
				implementation
				
				{$R *.dfm}
				
				procedure TDM.DataModuleCreate(Sender: TObject);
				begin
				ADOConnection.ConnectionString:='FILE NAME='+Application.GetNamePath+'Connect.udl';
				end;
				
				end.
							

相关资源