Convertir segundos a formato hora, minutos y segundos

[jafera]

Buenas de nuevo, vuelvo a ver si alguien me puede echar un cable con este problema:

Necesito pasar el valor de la variable K la cual esta en segundos al formato HH:MM:SS.

 
procedure TF_Calculadora.JvXPButton2Click(Sender: TObject);
var
H,I: Ttime;
Hora, Minuto, Segundo, Msec: Word;
J,K,L: Double;
begin
        H:=StrToTime(MaskEdit2.Text);
        DecodeTime (H, Hora, Minuto, Segundo, Msec);
        J:=(Hora*3600)+(Minuto*60)+Segundo;
        K:=J*StrToFloat(JvValidateEdit2.text)/100;
 
        MaskEdit3.Text:=TimeToStr(I);
        MaskEdit4.Text:=MaskEdit2.Text+MaskEdit3.Text;
end;

Como siempre muchas gracias a todos los que nos ayudais

Josep