tekstdokument

hej...

jeg er igang med at lave et tekstdokument, men jeg er stødt på et problem!

jeg har lavet et font-komboboks og en spinedit-komponent, som så skal synkroniseres med memo!!
jeg har skrevet dette:

procedure TForm1.FormCreate(Sender: TObject);
var
I: Integer;
begin
Application.HintColor := clYellow;
for I := 1 to Screen.Fonts.Count - 1 do
cmbFont.Items.Add(Screen.Fonts.Strings[I]);
cmbFont.ItemIndex := cmdFont.Items.IndexOf(memAction.Font.Name);
speFont.Value := memAction.Font.Size;
end;

men den brokker sig over:
:= cmdFont.Items.IndexOf(memAction.Font.Name)

hvor den kommer med denne error:
[Error] tekstdokum.pas(82): Undeclared identifier: 'cmdFont'

hvad har jeg gjordt galt har prøvet delphi's hjælpe fil, men med uden held!!
håber at en af jer kan hjælpe mig!!