Помогите исправить ошибку

[Zurs]

Запускаю функцию

Function GetDUnVNR(Sender: TObject;i:integer):Integer;  /
var
begin
if (frm.CheckBox1.State=cbUnchecked) and (a=1) then
 begin
 a:=a-1;
  TEdit(Components[10]).Text:=IntToStr(10);   //Ошибка
 //TForm1.TEdit(Components[10]).Text:=IntToStr(10);// Ошибка
end;
end;

Ошибка неизвестная переменная TEdit. Пишу то же самое в стандартной процедуре ButtoClick все работает, подскажите как исправить?

[p51x]

Все правильно.

Пишу то же самое в стандартной процедуре ButtoClick все работает

Естественно, она же в том же классе.

[Zurs]

И как мне это поможет?

[Stilet]

И как мне это поможет?

Edit, который ты используешь является компонентом класса Form. Когда ты функцию описал как метод, все ее вызовы стали по умолчанию касаться Form, поэтому Components отработает верно - т.е. дает список компонентов формы.
Когда же ты вынес в отдельную процедуру непривязанную ни к чему - этот список понятное дело начал лажать, поскольку процедура не привязана к объекту.

Короче тебе поможет понимание разницы между методами класса и обычными процедурами.