这段程序错在哪?

[sanno]

unit demoform;

interface

uses
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.

菜鸟问题,请帮忙指点.谢谢!

[kaguo]

这样看不出来...

[sanno]

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

[数字蛋糕]

具体是什么错误？

[sanno]

[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'

[sanno]

初入DELPHI行,小事无人帮,悲~

[zijida]

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

[primeP]

检查一下你代码中是否有非法字符。

[getit911]

代码里有中文全角的'　'空格