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;