关于自绘图形的问题？(200分)

我按照《Delphi 2.0高级程序设计指南》教程编写一文件管理程序
的部分程序如下：
procedure TFMForm.FormCreate(Sender: TObject);
var
Drive, AddedIndex: Integer;
DriveLetter: Char;
begin
FileMana := TFMForm.Create(Application);
for Drive := 0 to 25 do
begin
DriveLetter := Chr(Drive + ord('a'));
case GetDrivetype(Drive) of
DRIVE_REMOVABLE:
AddedIndex := DriveTabSet.Tabs.AddObject(DriveLetter, Floppy.Picture.Graphic);
DRIVE_FIXED:
AddedIndex := DriveTabSet.Tabs.AddObject(DriveLetter, Fixed.Picture.Graphic);
DRIVE_REMOTE:
AddedIndex := DriveTabSet.Tabs.AddObject(DriveLetter, Network.Picture.Graphic);
end;
if UpCase(DriveLetter) = UpCase(FileListbox1.Drive) then
DriveTabSet.TAbIndex := AddedIndex;
end;
end;
执行后，显示undeclared identifier:'Floppy'和missing operator or semicolon
提示信息，双击提示信息，标记都返回到上面部分
的AddedIndex := DriveTabSet.Tabs.AddObject(DriveLetter, Floppy.Picture.Graphic);处。
FMform中已有一image控件的picture属性赋值为Floppy.bmp。
请问各位大侠这是什么原因，该如何解决？
[]

Floppy是指图像控件的名字才对[]

>>

不仅是Floppy, 还有Fixed, Network呢.

我运行成功,可以随便找几副图片,添加如下代码:
...
private
Floppy, Fixed, Network: TBitmap;
...

Form.OnCreate中添加如下代码:
Floppy := TBitmap.Create;
Floppy.LoadFromFile('...');
Fixed := TBitmap.Create;
Fixed.LoadFromFile('...');
Network := TBitmap.Create;
Network.LoadFromFile('...');
在Form.OnDestroy中添加如下代码:
Floppy.Free;
Fixed.Free;
Network.Free;

应该就是TBITMAP图片控件。如JOHNSONGUO的意思。

接受答案了.