Zitat:
Delphi-Quellcode:
if dat = datdat then
if tim = timtim then
sndplaysound(PChar('Glockenspiel.wav'),snd_sync);
Du solltest die if-Blöcke mit einem begin und end umschließen, ich weiß nicht ob er das auch ohne so macht.
Delphi-Quellcode:
if dat = datdat then
begin
if tim = timtim then sndplaysound(PChar('Glockenspiel.wav'),snd_sync);
end;
Oder einfach in eine Anweisung stecken
if (dat = datdat) AND (tim = timtim) then sndplaysound(PChar('Glockenspiel.wav'),snd_sync);