Форум АНТИЧАТ - Показать сообщение отдельно

Ошибка, потому что Label1.Caption типа string, а Stroki.Count типа integer.
Надо:

Код:

Label1.Caption := IntToStr(Stroki.Count);

Чтобы при открытии сразу количество строк выводилось, то вот так:

Код:

procedure TBrutForm.LoadButtonClick(Sender: TObject);
begin
 Open1.InitialDir := GetCurrentDir;
if
 Open1.Execute
then
 begin
  Password.Text := Open1.FileName;
  Stroki:=TStringList.Create;
  Stroki.LoadFromFile(Open1.FileName); 
  Label1.Caption := IntToStr(Stroki.Count);
 end                            
else
 ShowMessage('Файл не выбран!');
end;

Подскажите, как прикрутить подсчет строк к этому?
P.S. Извиняюсь за глупые вопросы, просто занимаюсь Delphi недавно...[/QUOTE]