wechfunktion

[Morlon]

Zitat:

Zitat von Gentleman

jo die stimmen.

wenn ich es folgendermaßen löse läuft es auch, allerdings wird die wave-datei dann immer wieder gespielt.

Delphi-Quellcode:

if now> Wake then //wake ist die weckzeit
  begin
    MediaPlayer2.Play;
  end;

Mach doch einfach ne boolean, die auf true gesetz wird, wenn dein mplayer beginnt, in die if-anweisung dann noch ne abfrage ob die bool false ist... fertig ;)

also in der art:

Delphi-Quellcode:

var
  Form1: TForm1;
  bolWake: Boolean;

implementation

{$R *.dfm}

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if now > Wake then if not bolWake then
  begin
    MediaPlayer2.Play;
    bolWake := True;
  end
end;

end.

Grüße
Morlon