delphi类型问题

procedure TFrmChargeReg.ComboBox5Click(Sender: TObject);
var
sSql:string;
Area,Nature,pgjiazhi,jyjiage:string;
shuilv:integer;
begin
if (g_userinfo.CurrentRegInfo.StepName='收税') then begin
if (ComboBox5.text='评估价值') then begin
sSql:='select * from view_chargereg where 受理ID='+g_userinfo.CurrentRegInfo.RegID;
with frmPricetabledlg do begin
dqInfo.close;
dqInfo.sql.text:=sSql;
dqInfo.open;
if not dqInfo.IsEmpty then
begin
Area :=dqInfo.fieldbyname('建筑面积').asstring;
Nature :=dqInfo.fieldbyname('产权使用性质').asstring;
pgjiazhi:=dqInfo.fieldbyname('评估价值').asstring;
jyjiage:=dqInfo.fieldbyname('交易价格').asstring;
end
end ;
if (strtoint(Area))>='140' then begin
end
end
end
end;

提示我类型不匹配 if (strtoint(Area))

delphi类型问题 delphi变量类型的问题 关于DELPHI的问题：date与INT类型相加 delphi 枚举类型 delphi 类型转换 DELPHI问题 Delphi问题 delphi 问题 DELPHI问题? [delphi] 时间类型 的SQL查询