作业帮 > 综合 > 作业

delphi编译问题:line too long(more than 1023 characters)

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/19 04:45:37
delphi编译问题:line too long(more than 1023 characters)
 if  showbox(QMessTitle,'确定要删除信息吗?如果删除,信息将不能恢复!',2,Question) <> mrOk then    begin     get_exec('delete from t_member where memno  in(select memno from t_memcard where cardno  not in '      +'(select cardno from t_ryxs where oprtdate<=getdate()-365 group by cardno having max(oprtdate) >0))');      get_exec('delete from t_jfkczda where cardno  in(select cardno from t_memcard where cardno  not in '      +'(select cardno from t_ryxs where oprtdate<=getdate()-365 group by cardno having max(oprtdate) >0))');      get_exec('delete from t_ryxs where cardno  in(select cardno from t_memcard where cardno  not in '     +'(select cardno from t_ryxs where oprtdate<=getdate()-365 group by cardno having max(oprtdate) >0))');      get_exec('delete from t_jfxx where cardno  in(select cardno from t_memcard where cardno  not in '      +'select cardno from t_ryxs where oprtdate<=getdate()-365 group by cardno having max(oprtdate) >0))');      get_exec('delete from t_jfxf where kh  in(select cardno from t_memcard where cardno  not in '      +'(select cardno from t_ryxs where oprtdate<=getdate()-365 group by cardno having max(oprtdate) >0))');       get_exec('delete  from t_memcard where cardno   in(select cardno from t_ryxs where oprtdate<=getdate()-365 group by cardno having max(oprtdate) >0)');      get_exec('delete from t_ryxs where cardno in(select cardno,max(oprtdate) from t_ryxs where oprtdate<=getdate()-365 group by cardno)');   end;在begin行提示的错误
提示得很明确呀,行太长,把连续的四个空格替换成回车就行了.