Colorir registros específicos de um sub formulário

Boa tarde meus amigos. Preciso humildemente da ajuda de vocês.

Tenho um sub formulário de uma agenda, que diariamente lista várias linhas de registros, de acordo com os horários marcados para os clientes. Eu queria fazer um código, seja no evento "current" , ou no evento "no cronometro", que a medida que o horário agendado fosse menor que a data atual, os campos daquele registro ficassem vermelhos.

Fiz no evento no cronometro,

if me.campohora < time() then
campo1.forecolor=255
campo2.forecolor=255
....etc
else
campo1.forecolor=0
campo2.forecolor=0
end if

Ocorre que todas as linhas do sub ficam coloridas, e não só a do registro condicionado. Algém tem um exemplo bacana pra me ajudar?

oi avelino. obrigado , deu certo, mas no caso colore só o campo da formatação condicional, no meu caso o campo hora.

Por exemplo:

tentei com os demais campos do registro, por meio da condição: "a expressão é:

selmed([me.hora] < time() )

e não deu certo.

pode me ajudar?