Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**negaH**

Delphi-Quellcode:

			var

  Zeit: Integer;

begin

  Zeit := Trunc(Frac(Now) * 1440);

  if (Zeit >= 8*60) and (Zeit < (8*60+50)) then ;

end;

Der Umweg über Strings ist unnötig.

Gruß Hagen

negaH Registriert seit: 25. Jun 2003 Ort: Thüringen 2.950 Beiträge	#7 Re: Zeitbereich prüfen 11. Sep 2007, 15:32 markieren Delphi-Quellcode: var Zeit: Integer; begin Zeit := Trunc(Frac(Now) * 1440); if (Zeit >= 860) and (Zeit < (860+50)) then ; end; Der Umweg über Strings ist unnötig. Gruß Hagen
	Zitat