读书人

新手求教一个简单的 文件调用有关问题

发布时间: 2012-02-15 12:09:44 作者: rapoo

新手求教一个简单的 文件调用问题
我在登陆窗体的文件夹里面又建立了一个文件夹“入库”,里面新建了我要调用的工程。我想实现在单击登陆窗体上的一个label控件时,他能调用“入库”文件夹里面的工程或者单元。代码怎么实现。

[解决办法]
楼主你是要调用例外一个工程文件还是你想把工程文件的单元放到同目录下的文件下再来调用呢?
菜单project下的 add to project 找到你要的文件,在.pas中uses一下就ok
program Project1;

uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2},
Unit3 in 'tt\Unit3.pas' {Form3};

{$R *.res}

begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm3, Form3);
Application.Run;
end.



unit Unit1;

interface

uses
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;

implementation

uses Unit3;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
application.CreateForm(tform3,form3);
form3.showmodal;
end;

end.

读书人网 >.NET

热点推荐