求一个delphi语句

当我用窗体A 里的按钮a 打开一个窗体b的时候，我要计算窗体A中dbgrid中一个oderID字段的最大值，把这个值放到窗体b中
如下是窗体b中oncreate事件去最大值的代码
mstrSQL:='select max(OderID) OderID from OderLook' ;
with AQ do
begin
Close ;
SQL.Clear ;
SQL.Add(mstrSQL) ;
Open ;
mstrOderID :=trim(FieldByName('OderID').asinteger+1);
end;oderID为整型，我想把取出的值放到mstrOderID中，但是 mstrOderID :=trim(FieldByName('OderID').asinteger+1); 这句话有问题
请问该怎么写