(答对另加20分啊!!!)Delphi错误提示[Error] Project1.dpr(11): Undeclared identifier: 'Form1' 20
小弟刚刚开始接触delphi。在拿书上的例子研习。感觉非常的理论脱离实际。unitUnit1;interfaceusesWindows,Messages,SysUtils...
小弟刚刚开始接触delphi。在拿书上的例子研习。感觉非常的理论脱离实际。
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ComCtrls, ExtCtrls;
type
TfrmMain = class(TForm)
Image1: TImage;
TrackBar1: TTrackBar;
procedure FormCreate(Sender: TObject);
procedure TrackBar1Change(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
frmMain: TfrmMain;
implementation
{$R *.dfm}
procedure TfrmMain.FormCreate(Sender: TObject);
begin
self.AlphaBlend:=true;
self.TrackBar1.Min:=0;
self.TrackBar1.Max:=255;
self.TrackBar1.Frequency:=25;
end;
一个窗体透明小程序,我直接抄来试试的。一开始报错
Declaration of Class TForm1 is missing or incorrect.于是我按照帮助文件的提示在
type的下面加上了如下语句:
TForm1 = class(TForm);
然后就出现了[Error] Project1.dpr(11): Undeclared identifier: 'Form1'
请问这是什么问题,我头都晕了。
因为没有上过正规的课,对这个软件相当的头大。例如:
1.怎么新建工程,为什么不是像C++那样新建工程,该怎么新建啊?我只是新建了一个应用程序,也不知道这工程和程序究竟什么关联。
2.是不是编程序就一定要自己画窗体啊,还是说有了$R *.dfm就是要画窗体的程序,谢谢!
非常感谢!
procedure TfrmMain.TrackBar1Change(Sender: TObject);
begin
self.AlphaBlendValue:=self.TrackBar1.Max-self.TrackBar1.Position;
end;
end. 展开
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ComCtrls, ExtCtrls;
type
TfrmMain = class(TForm)
Image1: TImage;
TrackBar1: TTrackBar;
procedure FormCreate(Sender: TObject);
procedure TrackBar1Change(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
frmMain: TfrmMain;
implementation
{$R *.dfm}
procedure TfrmMain.FormCreate(Sender: TObject);
begin
self.AlphaBlend:=true;
self.TrackBar1.Min:=0;
self.TrackBar1.Max:=255;
self.TrackBar1.Frequency:=25;
end;
一个窗体透明小程序,我直接抄来试试的。一开始报错
Declaration of Class TForm1 is missing or incorrect.于是我按照帮助文件的提示在
type的下面加上了如下语句:
TForm1 = class(TForm);
然后就出现了[Error] Project1.dpr(11): Undeclared identifier: 'Form1'
请问这是什么问题,我头都晕了。
因为没有上过正规的课,对这个软件相当的头大。例如:
1.怎么新建工程,为什么不是像C++那样新建工程,该怎么新建啊?我只是新建了一个应用程序,也不知道这工程和程序究竟什么关联。
2.是不是编程序就一定要自己画窗体啊,还是说有了$R *.dfm就是要画窗体的程序,谢谢!
非常感谢!
procedure TfrmMain.TrackBar1Change(Sender: TObject);
begin
self.AlphaBlendValue:=self.TrackBar1.Max-self.TrackBar1.Position;
end;
end. 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询