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

Проблемы с 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);
...

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

---

← →
Kolan ©   (2006-04-01 15:11) [3]

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

---

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

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



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