ТИПЫ КЛАССОВ

Подскажите пожалуйста какие типы классов реализованы в скриптовом языке .
Почему на такой код SL ругается.
Var
f:TForm;
b:TButton;
procedure ButtonClick(Sender:TButton);
begin
ShowMessage(Sender.Name);
f.ModalResult:=mrOk;
end;
procedure ButtonMouseMove(Sender: TButton);
begin
b.Caption:='moved over';
end;
Begin
f:= TForm.Create(nil);
with f do
begin
Caption:='ZDOROBO!';
BorderStyle:=bsDialog;
Position:=poScreenCenter;
end;
b:=TButton.Create(f);
with b do
begin
Name:='Button1';
Parent:=f;
SetBounds(20,20,175,55);
Caption:='CLICK MI';
OnClick:=@ButtonClick;{same as b.OnClick:='ButtonClick'}
OnMouseMove:=@ButtonMouseMove;
end;
with f do
begin
ShowModal;
Free;
end;

end.

Could not convert variant of type (NULL)into type (String)

С уважением Михаил.