Показать сообщение отдельно
  #1  
Старый 13.11.2011, 15:44
rutic rutic вне форума
Прохожий
 
Регистрация: 13.11.2011
Сообщения: 2
Репутация: 10
По умолчанию Написание процедуры

Не могу понять в чем дело. Надо что бы при нажатии на Button1 вызывалась процедура которая выводила текстовое сообщение в Memo1.
Код:
procedure Lab;
begin
Memo1.Text := 'Процедура';
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Lab;
end;
Админ: Пользуемся тегами для оформления кода!

При компиляции возникает ошибка: Undeclared identifer: 'Memo1'.
Если выводить текст в Memo1 из процедуры TForm1.Button1Click все нормально получается. Но мне надо что бы это делала другая процедура которая вызывается из Button1Click.
Delphi7
Ответить с цитированием