>* Método antigo >Select * From Clientes Where Codigo = "0001" Into Cursor cClientes >With ThisForm > .Codigo.Value = cClientes.Codigo > .Nome.Value = cClientes.Nome > .Telefone.Value = cClientes.Telefone >EndWith > >* Novo método (Em cada objeto está o controlsource definido >Select * From Clientes Where Codigo = "0001" Into Cursor cClientes >ThisForm.Refresh >>A performance caiu visivelmente. Alguém já havia notado isso?