我想肯定要用StrtoDateTime( )吧???

解决方案 »

  1.   

    var
      str1,str2: TDateTime;
      temp:single;
      
       str1:=StrToDateTime('7:50');
       str2:=StrToDateTime('7:30');
       temp:= str1 - str2;
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      date1,date2: TDateTime;
      str3:string;
    begin
       date1:=StrToDateTime('7:50');
       date2:=StrToDateTime('7:32');
       str3:=datetimetostr(date1-date2);
       showmessage(str3);end;
      

  3.   

    lin513(东方求救) 的應該是  0;10     應該是錯誤吧  genphone_ru(票票)  temp:= (str1 - str2)*24;謝謝你們