三天起名字,进来

这是unit1unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Con... 这是unit1
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, bsSkinData, BusinessSkinForm, ComCtrls, bsSkinTabs, bsSkinCtrls,
ExtCtrls, Menus, bsSkinMenus, StdCtrls, bsSkinBoxCtrls, ImgList, MPlayer,
bsSkinShellCtrls, shellapi, unit2, unit3, bsColorCtrls, bsDialogs;

type
TForm1 = class(TForm)
bsBusinessSkinForm1: TbsBusinessSkinForm;
bsSkinData1: TbsSkinData;
bsCompressedStoredSkin1: TbsCompressedStoredSkin;
bsSkinMainMenuBar1: TbsSkinMainMenuBar;
bsSkinControlBar1: TbsSkinControlBar;
bsSkinToolBar1: TbsSkinToolBar;
bsSkinSpeedButton1: TbsSkinSpeedButton;
bsSkinSpeedButton2: TbsSkinSpeedButton;
bsSkinSpeedButton3: TbsSkinSpeedButton;
bsSkinPageControl1: TbsSkinPageControl;
bsSkinTabSheet1: TbsSkinTabSheet;
bsSkinStatusBar1: TbsSkinStatusBar;
bsSkinMemo1: TbsSkinMemo;
bsSkinMainMenu1: TbsSkinMainMenu;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4: TMenuItem;
N5: TMenuItem;
N6: TMenuItem;
N7: TMenuItem;
N8: TMenuItem;
N9: TMenuItem;
N10: TMenuItem;
N11: TMenuItem;
N12: TMenuItem;
N13: TMenuItem;
N14: TMenuItem;
N15: TMenuItem;
N16: TMenuItem;
bsSkinStatusPanel1: TbsSkinStatusPanel;
bsSkinStatusPanel2: TbsSkinStatusPanel;
bsSkinStatusPanel3: TbsSkinStatusPanel;
bsSkinSpeedButton4: TbsSkinSpeedButton;
MediaPlayer1: TMediaPlayer;
bsSkinOpenDialog1: TbsSkinOpenDialog;
bsSkinSaveDialog1: TbsSkinSaveDialog;
N18: TMenuItem;
bsSkinFontDialog1: TbsSkinFontDialog;
bsSkinSpeedButton5: TbsSkinSpeedButton;
bsSkinStatusPanel4: TbsSkinStatusPanel;
Timer1: TTimer;
procedure N2Click(Sender: TObject);
procedure N3Click(Sender: TObject);
procedure N4Click(Sender: TObject);
procedure N6Click(Sender: TObject);
procedure bsSkinSpeedButton1Click(Sender: TObject);
procedure bsSkinSpeedButton2Click(Sender: TObject);
procedure bsSkinSpeedButton3Click(Sender: TObject);
procedure N8Click(Sender: TObject);
procedure N9Click(Sender: TObject);
procedure N10Click(Sender: TObject);
procedure N11Click(Sender: TObject);
procedure bsSkinSpeedButton4Click(Sender: TObject);
procedure N13Click(Sender: TObject);
procedure N14Click(Sender: TObject);
procedure N18Click(Sender: TObject);
procedure bsSkinSpeedButton5Click(Sender: TObject);
procedure N16Click(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation
uses unit3;
{$R *.dfm}
展开
 我来答
三天起个名
2007-08-11 · TA获得超过952个赞
知道大有可为答主
回答量:1445
采纳率:0%
帮助的人:1697万
展开全部
这个里面要把

uses unit3;

这行去掉,因为你在岩贺上面的一个uses里面咐行己经uses了一遍了
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, bsSkinData, BusinessSkinForm, ComCtrls, bsSkinTabs, bsSkinCtrls,
ExtCtrls, Menus, bsSkinMenus, StdCtrls, bsSkinBoxCtrls, ImgList, MPlayer,
bsSkinShellCtrls, shellapi, unit2, unit3, bsColorCtrls, bsDialogs;

仔细看看,己有有了unit3了,衡枣哗就不需要再uses了。
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式