MEMO的问题，高分求解？各位高手请看!

EmailQuery.RecordCount 在这出错，RecordCount=-1,为啥？
Str为SQL语句，有两个字段为:varchar2(1024)(ORACLE数据库)，但如果改为varchar2(200)就没有问题，在DELPHI中BDE联接数据的，超过200的都成TMEMOFIELD了，在query  OPEN时出现问题可能就在这，有什么方法可解决吗？ try
    EmailQuery.DatabaseName :='DB';
    empmail.Clear;
    empbz.Clear;
    with EmailQuery do
      begin
        Close;
        Sql.Clear;
        Sql.Add(Str);
        Prepare;
        Open;
      end;
    if EmailQuery.RecordCount >0 then
      begin
        EmailQuery.First;
        while not EmailQuery.Eof do
            begin
              empmail.Add(EmailQuery.FieldByName('rf_user').AsVariant);
              empbz.Add(EmailQuery.FieldByName('mailaddress_copy').AsVariant);
              EmailQuery.Next;
            end;
        Result:=1;
      end
    else