mostrar conteo segundo a segundo

[douglas]

buen dia chicos del foro, aqui miren como siempre alimentando mi sed de concimiento, y molestandolos jajajaj, una gran molestia chicos, suponiendo que quiero mostrar un conteo segundo a segundo, como un reloj digital, pero cuando llegue a sesenta segundos, se pongan en cero los segundos y marque un uno en minutos, al igual con los minutos, que cuando llegue a sesenta minutos marque una hora, perdon chicos, intente hacerlo con un timer, pero la verdad no lo pude usar, disculpen todas las molestias ocasionadas, y agradezco de antemano toda ayuda.

[eduarcol]

Claro que te podemos ayudar, el asunto es controlar la variable en el ontimer

var
nhora, nMinuto, nSegundo: Integer;
begin
if nSegundo = 59 then
begin
nSegundo := 0
if nMinuto = 59 then
begin
if nHora = 23 then
nHora = 0
else
Inc(nHora);
end
else
Inc(nMinuto);
end
else
inc(nSegundo);
end;

Lo hice de memoria cualquier cosa comentalo