
delphi编译问题:line too long(more than 1023 characters)
if showbox(QMessTitle,'确定要删除信息吗?如果删除,信息将不能恢复!',2,Question)<>mrOkthen...
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行提示的错误
展开
1个回答
展开全部
提示得很明确呀,行太长,把连续的四个空格替换成回车就行了。

2024-04-12 广告
**ODU重载连接器**ODU重载连接器是一种高性能、高密度的连接解决方案,广泛应用于各种工业自动化和通信设备中。它采用先进的设计理念和制造技术,具有优异的电气性能和机械强度,能够满足复杂环境下对数据传输和信号稳定的高要求。同时,ODU重载...
点击进入详情页
本回答由上海莘默提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询