No le veo mucho problema, añadiendo en el uses Dateutil, puedes acceder a esta funcion (al menos en delphi 6):
Código:
H^.HoraInicio:= now;
H^.HoraFin:=incminute(H^.horainicio, Form4.TarifaHasta.AsInteger);
Para elegir la tarifa correcta, supongo que darás al usuario la opcion en pantalla, con un combo, un LookupCombo, no sé.....
Por cierto, me alegro que el código anterior te sirva para algo
Como te decia, antes de borrar un elemento del Listview, tienes que liberarlo con Dispose(TpTInfo(listview1.items[X].data)). Si hay elementos que no tienen el registro asociado, pues deberás hacer primero la comprobación de si ha sido creado o no.
Saludos