Thema: Delphi Probleme bei Wecker

Einzelnen Beitrag anzeigen

Benutzerbild von TheMiller
TheMiller

Registriert seit: 19. Mai 2003
Ort: Gründau
2.480 Beiträge
 
Delphi XE7 Architect
 
#14
  Alt 22. Jun 2003, 22:29
Hey Chris,

ich weiss, ich spiele mit deinen Nerven, aber eine Frage noch. Wie kann ich die Zeit und ZeitDifferenz durch iniEinträge erstezen? Habe es so probiert und er dudelt die ganze Zeit die Musik ab. Puh, ich hasse Wecker...

Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var
  tiWecker : TTime;
  tiDiff : TTIme;
  tiNow : TTIme;
  ini : TInifile;
  time1 : TTime;
  time2 : TTIme;
  begin
ini:=Tinifile.Create('C:\Programme\SPM-APSS\settings.ini');
try
time1:=ini.Readtime('Wecker','time1',time);
time2:=ini.Readtime('Wecker','Time2',time);
  tiwecker := time1;
  tidiff := time2;
  tiNow := time;
  if (tiNow >= tiWecker) and (tiNow < (tiWecker+tiDiff)) then Mediaplayer1.Play;
finally
ini.free;
end;
end;
end.
HILFE!!!!! plz

[€dit=Daniel B]Delphi-Tags eingefügt. MfG Daniel B.[/edit]
  Mit Zitat antworten Zitat