x1,x2: string;x1:=floattostr(abs(-0.5*strtofloat(stingdrid1.cells[2,i-1])-0.5*strtofloat(stingdrid1.cells[3,i-1])));
x2:=floattostr(abs(-1*strtofloat(stingdrid1.cells[1,i])-strtofloat(stingdrid1.cells[3,i-1])+3));
运行提示:
"is not a valid pointer value"
x2:=floattostr(abs(-1*strtofloat(stingdrid1.cells[1,i])-strtofloat(stingdrid1.cells[3,i-1])+3));
运行提示:
"is not a valid pointer value"
x1 := ...;
x2 := ...;
except
...
end;
x2:=floattostr(abs(-1*strtofloatDef(stingdrid1.cells[1,i],0)-strtofloatDef(stingdrid1.cells[3,i-1])+3),0);