Problem mit case of

[APP]

Hallo rockycat,

kann es sein, dass Du in Deiner While -Schleife mit Edit1.Text noch was "anstellst"?

Delphi-Quellcode:

  WHILE zaehler1 <= max DO
    BEGIN
      CASE song[zaehler1] OF
        1:
          BEGIN
            sndPlaySound('1.wav', SND_ASYNC);
            Edit1.Text := 'Hallo!';
          END;


       // nämlich vielleicht genau hier?
       Edit1.Text :=''; // oder so was in der Art?
    END;