里面有EXE文件,直接运行就可以,密码也在说明文件里,如有需要可做相应的改变

源代码在线查看: untdmappmdi.pas

软件大小: 2583 K
上传用户: cz6891297
关键词: EXE 运行 密码 改变
下载地址: 免注册下载 普通下载 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.
							

相关资源