szukalem na forum i nieznalazlem :( chodzi o to zeby przeliczyc np 225s. na godziny : minuty : sekundy... poprosil bym o funkcje :-| aha niepowiem do czego mi to bo sie beda czepiac ze sie chwale :-/
var
sek, min, hours:integer;
BEGIN
sek:= //iles tam;
min:=sek div 60
hours:=sek div 3600
END;
Panie DETROX:
Co to jest projekt jakiś tam ??
Bez obrazy, bo mi się takie projekty podobają !!
[...]Co to jest projekt jakiś tam ??
Bez obrazy, bo mi się takie projekty podobają !!
NSP, to projekt nowego notatnika, tak dla programmer'ów jak chcesz brać w nim udział to musisz być naprawdę dobry programmer.
Aktualny sqad to:
Detox, Johnny_Bit, Ktos, Drajwer, Sebek i o ile się nie myle jeszcze Faszczu
(kolejność losowa)
Oto podział na sekundy, minuty i godziny, jeśli dane są sekundy:
var
h, m, s, suma:interger;
BEGIN
suma:= // tutaj suma sekund
h:=suma div 3600;
m:=(suma mod 3600) div 60;
s:=(suma mod 3600) mod 60;
END;
Z mojego programiku
// SekundyToMinuty, zwraca w formacie mm:ss z poprzedzającymi zerami
function SToM(Sekundy: Integer): String;
var
S,M: String;
begin
M:=IntToStr(Sekundy div 60);
if Length(M)=1 then M:='0'+M;
S:=IntToStr(Sekundy mod 60);
if Length(S)=1 then S:='0'+S;
Result:=M+':'+S;
end;
nooooooooooooo mysle ze zadziala ;p
PS. Dziękuje badzo [hurra]