Скачать: CL | DM;

Подпрограмма не определяет компонент   Найти похожие ветки 

← →
jagr ©   (2005-07-06 20:09) [0]

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:13) [1]

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

Всё.

1.

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

implementation

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


2.

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


---

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

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

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

---

← →
Просто Джо ©   (2005-07-06 20:21) [3]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c