cm1234567sky的个人资料 - RAT

cm1234567sky cm1234567sky

关注数: 0 粉丝数: 12 发帖数: 32 关注贴吧数: 21

想开花甲店新手，在犹豫要不要加盟，合肥的，有人教吗

想在合肥开花甲店想开家花甲店，找了几天店面，店面不好找啊

Delphi 运行SqlSrch 报错list index out of bounds (0) 代码： with SqlSrch do begin close; sql.Clear; sql.Add(' select B.DEPT_NAME,G.GZB_ID,G.YEARMONTH_BMGZ,'); SQL.Add(' G.ITEM01 TOL_GZ '); SQL.Add(' FROM BMGZ G,BM B WHERE G.DEPTID=B.DEPTID'); end; Result := (tblAnswer.BatchMove(SqlSrch, bm) > 0)运行到这句报错

dephi7 too many fields in table create 如何解决请教各位大神

Delphi 报错 destination must be indexed table 怎么解决求大神指点Delphi 报错 destination must be indexed table 怎么解决

关于dephi面试求教最近在物色新的工作，没有系统的学习过dephi的知识，会的都是在公司项目中实践得来的，对于基础知识不熟，会运用，但很多原理不懂，这样去面试好像不行，是不是要把dephi基础全看一遍才行？

请大神帮忙看一下 Table1.First; while not Table1.Eof do begin wBMDM:=Table1BMDM.Value; with Query1 do begin close; sql.Clear; sql.Add(' select B.BMDM,B.DEPT_NAME,sum((1-abs(sign(M.YWLX-10)))*M.SL+(1-abs(sign(M.YWLX-11)))*M.SL) LJSL, '); sql.Add(' sum((1-abs(sign(M.YWLX-30)))*M.JE+(1-abs(sign(M.YWLX-33)))*M.JE) LJJE'); SQL.Add(' FROM SPJXCR_XM M,SPJXCR P,BM B '); SQL.Add(' where M.ID=P.ID AND P.DEPTID=B.DEPTID and M.YWLX in (10,11,29,30,31,32,33,34,35,36,37,38) '); SQL.Add(' and P.RQ<=''' + InputcodeDate.Value2 + ''' and B.BMDM='''+wBMDM+ '''') ; SQL.Add(' group by B.BMDM,B.DEPT_NAME'); end; IF Query1.FieldCount>0 then begin with Query2 do begin close; sql.Clear; sql.Add(' insert into ''' + Table1.tablename + '''(LJJE,LJSL)'); SQL.Add(' values(:LJJE,:LJSL)'); ParamByName('LJSL').AsInteger:=Query1.Fields[2].AsInteger; ParamByName('LJJE').AsInteger:=Query1.Fields[3].AsInteger; end; END; Table1.Next; end; 为啥我放在uery1里面的语句在数据库里执行有结果，但是在程序里执行过后 Query1.FieldCount为0

程序运行出现的问题missing operator or semicolon 麻烦看一下 Synchronize(IncProgressBar);这一句哪里出错了

大神帮忙看一下 tblMain:dataset not in edit or insert mode 这个怎么解决？

1 下一页