consulta com hora atual e campo date time

preciso fazer uma consulta que me retorne quanto tempo falta para o compromisso, para isso eu preciso fazer a hora atual - o campo hora (datetime) como faço isso????
Eu consegui só separar as horas e os minutos mas aí eu num sei juntar alguem pode ajudar
Compromisso.Open;
Compromisso.First;
hora := timetostr(now);
campo := pos(´:´, CompromissoHoras.value);
comp := copy(CompromissoHoras.value, 1, campo - 1);
mincomp := copy(CompromissoHoras.value, 4, campo + 2);
campoatual := pos(´:´, (hora));
comp1 := copy(hora, 1, campoatual - 1);
mincomp1 := copy(hora, 4, 5);
segcomp := copy(hora, 6, campoatual + 2);