|

楼主 |
发表于 2010-7-17 17:11:03
|
显示全部楼层
回 9楼(panlifeng) 的帖子
首先,这个工程只有一个窗体和一个按钮,其它所有代码都是lazarus自动添加上的,应该不会有错。
其次,如果begin和end出现次数不是对应的,那么这个工程在编译时会出现错误或警告,但这个工程倒是可以编译并运行的,并且没有任何警告。
再次,创建一个新的工程后问题依旧。
unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
StdCtrls;
type
{ TForm1 }
TForm1 = class(TForm)
Button1: TButton;
private
{ private declarations }
public
{ public declarations }
end;
var
Form1: TForm1;
implementation
initialization
{$I unit1.lrs}
end. |
|