分钟如何换成小时？？？在线等

Question

分钟如何换成小时，例如：
45  ：---》00：45：00
115：----》01：55：00
给个函数，谢谢！！！

Answer 1

自己算一下好了， n div 60 = h，小时数， n mod 60 = m，分钟数　结果：h: m: 00

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
begin
   label1.Caption:= IntToStr( trunc((StrToFloat(Edit1.Text)+0.0 )/60) )+ ':'+
                    FloatToStr( frac(  ( StrToFloat(Edit1.Text)+0.0 )/60 )*60 );
end;
要換成你要的格式你可稍加變通一下就可以了
45  ：---》00：45：00

Answer 3

formatdatetime('hh:mm:ss',strtoint(edit1.Text)/(24*60))就可以了