Проблема с переменными в классе.

← →
nejest (2004-06-24 12:19) [0]

Написал свой невизуальный компонент:
unit NCalc;
interface
type
TNCalc=class
op1:real;
op2:real;
oper:char;
procedure AddCalc();
private
public
end;
implementation
procedure AddCalc();
begin
op1:=op1+op2;
end;
end.
Дельфи ругается на строчку op1:=op1+op2; пишет op1 Undeclared identifier. Если изменить строчку на op1:=op1+op2, то пишет то же самое про op2.
Что я неправильно делаю?

← →
Некто (2004-06-24 12:24) [1]

Процедура AddCalc должна быть методом класса:
procedure TNCalc.AddCalc();

← →
nejest (2004-06-24 12:50) [2]

2 Некто
Сэнкс. Работает, но при попытке присваивания значения op1 или op2
выдаёт Access Violation. Например
clc.op1:=StrToFloat(Edit1.Text);
clc.op2:=StrToFloat(Edit2.Text);
Пробовал создавать специальный метод:
procedure TNCalc.SetOp(i:integer;v:real);
begin
if(i=1)then
op1:=v
else
op2:=v;
end;
результат тот же.

clc.op1:=StrToFloat(Edit1.Text);
clc.op2:=StrToFloat(Edit2.Text);

clc не проинициализирован

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