Ошибка

[WIDGET1]

Добрый вечер, и опять я.
Вот объявлена процедура:

procedure zapros_n(st: integer);

Вот ее работа:

procedure zapros_n(st:integer);
var i,j,x:integer;
begin
x:=0;
for j := 1 to glavn.stringgrid1.rowcount - 1 do
if glavn.stringgrid1.cells[st,j]='1' then
begin
zapros.StringGrid1.Cells[0,0]:='№ зачетки';
zapros.StringGrid1.Cells[1,0]:='Фамилия';
zapros. StringGrid1.Cells[2,0]:='Имя';
zapros. StringGrid1.Cells[3,0]:='Отчество';
zapros. StringGrid1.Cells[4,0]:='Вариант';
x:=x+1;
 for i := 0 to glavn.stringgrid1.colcount - 1 do
begin
zapros.StringGrid1.Cells[i,x]:=glavn.StringGrid1.Cells[i,j];
end;
zapros.Show; //форма для вывода результата
end;
end;

Вот процедура ее вызывающая:

procedure TGlavn.N8Click(Sender: TObject);
var stolb,k:integer;
n_zad:string;
begin
k:=0;
if inputQuery('Выполненное задание','Введите номер задания',n_zad) then
case strtoint(n_zad)of
1: begin stolb:=5;zapros_n (stolb);end;
2:begin stolb:=7;zapros_n (stolb);end;
3:begin stolb:=9;zapros_n (stolb);end;
end;
end;

На мой тупой взгляд- все ок. Но компилятор говорит: Unsatisfied forward or external declaration <Имя>. Отсутствует описание блока, объявление которого было дано (заголовок в интерфейсе или в описании объектного типа, либо упреждающее описание).


что это?...

[Kix.IV]

Что за zapros? На какую строку ругается компилятор? Что за <Имя>?

[Алексей_2012]

procedure <Tимя_формы>.zapros_n(st:integer);
var i,j,x:integer;
begin
x:=0;
for j := 1 to glavn.stringgrid1.rowcount - 1 do
if glavn.stringgrid1.cells[st,j]='1' then
begin
zapros.StringGrid1.Cells[0,0]:='№ зачетки';
zapros.StringGrid1.Cells[1,0]:='Фамилия';
zapros. StringGrid1.Cells[2,0]:='Имя';
zapros. StringGrid1.Cells[3,0]:='Отчество';
zapros. StringGrid1.Cells[4,0]:='Вариант';
x:=x+1;
 for i := 0 to glavn.stringgrid1.colcount - 1 do
begin
zapros.StringGrid1.Cells[i,x]:=glavn.StringGrid1.Cells[i,j];
end;
zapros.Show; //форма для вывода результата
end;
end;

Попробуйте так

[Аватар]

Похоже имя zapros не известно процедуре zapros_n

[WIDGET1]

Kix.IV, zapros-это форма, с этим все гут. Ругается на строку объявления процедуру и пишет эту ошибку.

Unsatisfied forward or external declaration <Имя>.

Это из перечня ошибок компилятора. Имя- это на что ругается, в данном случае имя zapros_n, а далее я написала как поясняется эта ошибка..но мне хоть по лбу, я не понимаю объяснения.

Алексей_2012 был прав, для описания процедуры нужно было написать T<имяформы>.zapros_n а дальше описание.

[Алексей_2012]

В коде вашей собственной процедуры нужно указывать форму, к которой эта процедура относится, это не паскаль...

[Аватар]

Если процедура не метод формы и нет её декларации в секции interface, то она должна быть в секции implementation до всех процедур, обращающихся к ней