indhentning af tidsværdier til ttime variabel

Hej

Jeg har lidt problemer med tidskonvertering. Jeg har nogle tidspunkter liggende i en paradoxdatabase i felter af typen Time.
Disse skal omregnes til kommatal således at 02:30:00 feks. bliver til 2,50.
Jeg har fundet ud af hvordan jeg feks. omregner nuværende tidspunkt til decimaltal:

var
testtid: ttime;
timer,minutter,sekunder: string;
samlettid: real;
begin
testtid:=time;
timer:= Copy(timetostr(testtid),1,2);
minutter:= Copy(timetostr(testtid),4,2);
sekunder:= Copy(timetostr(testtid),7,2);
samlettid:=(strtoint(timer))+((strtoint(minutter))/60)+((strtoint(sekunder))/3600);
showmessage(floattostr(samlettid));


Men jeg kan ikke finde ud af at få hældt værdierne fra paradoxtabellen ind i variablen time???
Nogen ideer til hvordan jeg gør det?