[[duilioisola]]

Puedes poner un TTimer con un tiempo.
Al terminar el marcado incias el TTimer

Código Delphi [-]
procedure BotonFinalizarMarcadoClick
begin
   // Habilito el Timer que lanzará su envento en unos segundos
   TimerMarado.Enabled := True;
end;

En el evento OnTimer puedes poner el código que limpie el formulario

Código Delphi [-]
procedure OnTimer
begin
   // Deshabilito el timer. Se habilitará nuevamente en el próximo marcaje
   TimerMarado.Enabled := False;

   // Borro imagen
   Imagen.Picture := nil;

   // Inicializo campos
   CampoUsuario.Text := '';
   CampoClave.Text := '';
end;