Follow along with the video below to see how to install our site as a web app on your home screen.
Anmerkung: This feature currently requires accessing the site using the built-in Safari browser.
while (Bedingung) do
begin
end;
...
while Index < 3 do
begin
LasseVerschwinden(Index);
Inc(Index);
end;
CreateMessageDialog('Verloren', mtInformation, [mbOk]);
...
procedure LasseVerschwinden(BildIndex: Integer);
begin
// An dieser Stelle das Bild ausblenden, das durch BildIndex indentifiziert ist
end;
procedure TMaexchen.SpielerLebenWeg;
begin
while Index < 3; do
begin
SpielerLebenWeg(Index);
Inc(Index);
end;
ImSLeben1.Visible := false;
ImSLeben2.Visible := false;
ImSLeben3.Visible := false;
ShowMessage('Verloren!');
end;