error: line too long (more than 1024 charactors)(100分)

  • 主题发起人 主题发起人 randy_xhh
  • 开始时间 开始时间
R

randy_xhh

Unregistered / Unconfirmed
GUEST, unregistred user!
提示出错:
line too long (more than 1024 charactors)
但是就没找到哪行有这种错误啊?
是怎么回事啊
 
太多了,一行不能超过1024字符。。。
考虑换行。。
 
楼主可以把你最长的一行贴出来大家来参考一下。
那么长的一行,不知老兄是如何写的。
 
但是他提示出现问题的那行是
{$R *.dfm}
这一行
而且我看也没有其他哪行是太长的啊
 
begin

if status='1' then
begin
sta1:=true;
image1click(sender);
end;
if status='2'then
begin
sta2:=true;
image2click(sender);
end;

if status='3' then
begin
sta3:=true;
image3click(sender);
end;

if status='4' then
begin
sta4:=true;
image4click(sender);
end;

if status='5' then
begin
sta5:=true;
image5click(sender);
end;

if status='6' then
begin
sta6:=true;
image6click(sender);
end;

if status='7' then
begin
sta7:=true;
image7click(sender);
end;

if status='8' then
begin
sta8:=true;
image8click(sender);
end;

if status='9' then
begin
sta9:=true;
image9click(sender);
end;

if status='10' then
begin
sta10:=true;
image10click(sender);
end;
 
if status='11' then
begin
sta11:=true;
image11click(sender);
end;

if status='12' then
begin
sta12:=true;
image12click(sender);
end;

if status='13' then
begin
sta13:=true;
image13click(sender);
end;

if status='14' then
begin
sta14:=true;
image14click(sender);
end;

if status='15' then
begin
sta15:=true;
image15click(sender);
end;

if status='16' then
begin
sta16:=true;
image16click(sender);
end;

if status='17' then
begin
sta17:=true;
image17click(sender);
end;

if status='18' then
begin
sta18:=true;
image18click(sender);
end;

if status='19' then
begin
sta19:=true;
image19click(sender);
end;

if status='20' then
begin
sta20:=true;
image20click(sender);
end;
 
if status='21' then
begin
sta21:=true;
image21click(sender);
end

if status='22' then
begin
sta22:=true;
image22click(sender);
end;

if status='23' then
begin
sta23:=true;
image23click(sender);
end;

if status='24' then
begin
sta24:=true;
image24click(sender);
end;

if status='25' then
begin
sta25:=true;
image25click(sender);
end;

if status='26' then
begin
sta26:=true;
image26click(sender);
end;

if status='27' then
begin
sta27:=true;
image27click(sender);
end;

if status='28' then
begin
sta28:=true;
image28click(sender);
end;

if status='29' then
begin
sta29:=true;
image29click(sender);
end;

if status='30' then
begin
sta30:=true;
image30click(sender);
end;

if status='31' then
begin
sta31:=true;
image31click(sender);
end;

if status='32' then
begin
sta32:=true;
image32click(sender);
end;
end;
 
是不是有不可见的符号字符?
 
问题已经解决了
是参数的问题··
 
建议用
Case status of
end
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
I
回复
0
查看
759
import
I
后退
顶部