【搞定】FieldByName问题**

afatdog

TempPersion:=Business.Model.Org.OrgSys.OrgSystem.FindPerson(lFlowTask.Executors.PersonID);
        if (TempPersion<>nil) then
        begin
                Query_Mail.CommandText:='SELECT EE_MAIL FROM TPERSON WHERE FID='''+TempPersion.ID+'''';
            Query_Mail.Open();
            if (Query_Mail.RecordCount=1) then
            begin
                    DataField:=Query_Mail.FieldByName('EE_MAIL');
                TempEmail:=DataField.ToString();  // <- 出错
            end;
end;

afatdog

此时DataField的值：

afatdog

知道哪里的问题了：应该是AsString，写别的语言习惯了：（

结了吧，谢谢