这段程序错在哪?

Question

unit demoform;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls, Buttons;type
  TForm1 = class(TForm)
    Shape1: TShape;
    ColorDialog1: TColorDialog;
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    BitBtn1: TBitBtn;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    procedure BitBtn1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
Shape1.Shape:= stRectangle;　
end;procedure TForm1.Button2Click(Sender: TObject);
begin
Shape1.Shape:= stRoundRect;　
end;procedure TForm1.Button3Click(Sender: TObject);
begin
Shape1.Shape:= stEllipse;
end;procedure TForm1.BitBtn1Click(Sender: TObject);
begin
　ColorDialog1.Execute;　　Shape1.Brush.Color:= ColorDialog1.Color;
end;end.菜鸟问题,请帮忙指点.谢谢!

Answer 1

Shape1.Shape:= stRectangle;　
运行到这的时候提示错误

Answer 2

[Error] demoform.pas(36): Illegal character in input file: '　' ($A1A1)
[Error] demoform.pas(41): Illegal character in input file: '　' ($A1A1)
[Error] demoform.pas(51): Illegal character in input file: '　' ($A1A1)
[Error] demoform.pas(53): Illegal character in input file: '　' ($A1A1)
[Fatal Error] sample.dpr(5): Could not compile used unit 'demoform.pas'

Answer 3

小问题，你的代码段里有不可识别的字符，估计跟你Ctrl+V的源头有关，你是从网页上直接切来的吧？