Проблемы с StringGrid

← →
Dyakon_Frost © (2006-04-01 14:01) [0]

Здраствуйте!

У меня наверное не самый умный вопрос, но все же:

Как из процедуры обратиться к StringGrid!
Пытался так, но это неправельно:
Procedure Rec(SG: TStringGrid);
...

Заранее спасибо!

← →
Kolan © (2006-04-01 14:37) [1]

Procedure Rec(SG: TStringGrid);
Можно итак. Только что ты передаещь в кач. фактического параметра?

← →
Dyakon_Frost © (2006-04-01 14:47) [2]

К примеру вот так:

procedure PoluchD(var T,C: matrix; N: word; k,m:integer; str: TStringGrid);
var i,j: integer;
D: matrix;
begin
str.ColCount := N;
str.RowCount := N+1;
for i := 1 to N do
for j := 1 to N do
begin
D[i,j] := C[i,j] + m*T[i,j];
str.Cells[i-1,j] := inttostr(D[i,j]);
end;
end;

...
PoluchD(T,C,strtoint(Edit3.Text),strtoint(Edit1.Text),strtoint(Edit2.Text),Strin gGrid4);
...

Спасибо, но я уже разобрался в чем дело!

Ну и ладушки... :)

Проблемы с StringGrid Найти похожие ветки