(Delphi) Aiuto! :cry:

[camaleonteplus]

procedure TForm1.RubricaClick(Sender: TObject);
var
CLines, I : Integer;
begin
Lista.items.loadfromfile('Rubrica.Txt')
CLines := 0;
for I := 0 to  Lista.Items.Count - 1 do
begin
CLines := CLines + 1;
end;
Label7.Caption := 'Ci sono '+ IntToStr(CLines) + ' linee!';
end;

Ho letto il manuale di inglese delphi ma non ho capito dove sta l'errore.
[Error] Email.pas(211): Missing operator or semicolon

mi dovrebbe caricare la rubrica in listbox e diovrebbe dirmi anche quanti ne sono.