Question

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行提示的错误

Answer 1

提示得很明确呀，行太长，把连续的四个空格替换成回车就行了。