HL:=(DONCHIANHI+DONCHIANHI)/2;
IF HL<>REF(HL,1) THEN BEGIN
R_HL:=REF(HL,1);
X:=X+1;
SUMAG:=SUMAG+REF(HL,1);
IF X>2 THEN BEGIN
HLAVERAGE:=SUMAG/X;
SUMAG:=0;
X:=0;
END
END
这种ref不能在if中使用的,得怎么修改?
把REF拿到IF外面,例如:
HL:=(DONCHIANHI+DONCHIANHI)/2;
A:=REF(HL,1);
IF HL<>A THEN BEGIN
R_HL:=A;
X:=X+1;
SUMAG:=SUMAG+A;
IF X>2 THEN BEGIN
HLAVERAGE:=SUMAG/X;
SUMAG:=0;
X:=0;
END
END