Na überlege doch mal, was du machst:
Delphi-Quellcode:
if Image10.Visible
then begin
Image10.Visible:=false;
Image1.Visible:=true; // hier setzt du Image1 auf Visible = true ...
end;
// ... dann ist es auch hier true und ...
if Image1.Visible
then begin
Image1.Visible:=false;
Image2.Visible:=true; /// ... du setzt Image1 auf Visible = true ...
end;
// ... hier ist es dann natürlich ebenfalls true
if Image2.Visible
then begin
Image2.Visible:=false;
Image3.Visible:=true;
end;
// usw.
Nimm mal if-else-verzweigungen. Vielleicht klappt's dann schon:
Delphi-Quellcode:
if Image10.Visible then
begin
Image10.Visible := false;
Image1.Visible := true;
end
else if Image1.Visible then
begin
Image1.Visible := false;
Image2.Visible := true;
end
else if Image2.Visible then
begin
Image2.Visible := false;
Image3.Visible := true;
end;
// ...