Локальное объявление Edit Опции

[Tan]

Добрый день. Не могу решить следующую проблему: необходимо сделать процедуру которая будет записывать определённые символы из моего личного типа в компонент Edit Как объявить локально (в подпрограмме) компонент Edit, чтобы подпрограмма не ругалась ? То есть:

procedure StringShow;
var k: integer;
    Edit1:???;
begin
  Edit1.Clear;
  {тут работаем с EDIT} 

end;

[Tan]

он сказал создать процедуру которая использует TEdit для .... задания. Я недвано только с паскаля на делфи перешёл и воспринял это выражение "по паскалевски", забыв что делфи и есть процедурный язык.