como calculo diferença entre horas no Xmaker?

[senegalha]

Estou declarando dois campos alfanuméricos e um campo fracionário que recebe a difença porem não funciona, pode me ajudar com um passo a passo, conheço pouco o Xmaker - Preciso da calculo em horas decimais.
Segue como eu declarei no campo fracionário:
var
hora1: TDateTime;
hora2: TDateTime;
total: TDateTime;
begin
hora1 := StrToTime(Edit1.Text);
hora2 := StrToTime(Edit2.Text);
total := Hora2 - Hora1;
Result := StrToFloat(total);
end;