Я осваиваю Lazarus и не знаком с паскалем. При компиляции Лазарус ругается на 18 строчку: "Label1: TLabel;". Говорит что что-то не так с TLabel.
Вот код:
unit Unit8;
{$mode ObjFPC}{$H+}
interface
uses
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, ExtCtrls;
type
{ TForm8 }
TForm8 = class(TForm)
Image1: TImage;
Image2: TImage;
Image3: TImage;
Label1: TLabel;
Panel1: TPanel;
Panel2: TPanel;
procedure Image3Click(Sender: TObject);
private
public
end;
var
Form8: TForm8;
implementation
{$R *.lfm}
{ TForm8 }
procedure TForm8.Image3Click(Sender: TObject);
begin
close;
end;
end.