| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Подпрограмма не определяет компонент [D7]

jagr ©   (2005-07-06 20:09:00) 

procedure XXX;
var S1: Array[1..3,1..3] Of Extended;
begin
For i:=1 to 3 do
 For j:=1 to 3 do begin
S1[i,j]:=StrToFloat(StringGrid1.Cells[j,i];
end; end;

- Неизвестная переменная StringGrid1.
Что я делаю не так?

---

Просто Джо   (2005-07-06 20:21:00) [1]

Блин, вечная спешка :-(
Разумеется 1,2 следует воспринимать как 1 или 2.

---

Просто Джо   (2005-07-06 20:18:00) [2]

Комментарии к [1] Просто Джо

Вопрос: откуда твоей процедуре может стать известно, что на какой-то там форме находится компонент TStringGrid?
Следовательно, что бы идентификатор StringGrid1 имел какое-то значение внутри процедуры XXX, нужно:
1. Объявить процедуру XXX методом класса TForm1 (или какой там у тебя класс формы?).
2. Передать в эту процедуру ссылку на экземпляр конкретного StringGrid'а через параметр.

---

Просто Джо   (2005-07-06 20:13:00) [3]

> Что я делаю не так?

Всё.

1.

 TForm1 = class(TForm)
 private
   procedure XXX;
 public
   { Public declarations }
 end;

implementation

procedure TForm1.XXX;
begin
 // код
end;


2.

procedure XXX (StringGrid: TStringGrid);
begin
 // код
end;


---

Наверх