D�vida em ComboBox

Question

Se colocar o ComboBox em Enabled = False, como fa�o para a �setinha� n�o ficar preta, mas adotar um BtnFace, semelhante ao TDBLookupComboBox quando est� em Enabled = False?...

Emarcolongo · Answer

Por que vc n�o coloca o componente ? A parte branca do combo ficar� com o btnface, indicando que esta desabilitado.

combobox1.color := clbtnface;

e setando o Enabled := false a seta j� ficar� clara ou seja com btnface.

Paulo · Answer

N�o sei o que houve quando eu mandei esse post n�o estava ficando, mas depois ficou como eu queria. Acho que precipitei no post, sem fazer um teste mais apurado. Agora eu pergunto. Eu preciso que o ComboBox fique Enabled = false, mas � poss�vel � medida que eu for rolando o Grid(Scroll da Query), a Combo v� trazendo os itens de acordo com determinados registros da Query? Se ela est� em Enabled = True, funciona, mas n�o est� funcionando co false, ou seja, a propriedade ItemIndex n�o est� sendo chamada quando est� em False. Tem como? A procedure que faz isso est� abaixo:

procedure TfrmNotasServico.CarregaCombo;
var
  i: Integer;
begin
  if qryAbrangencia.Locate(�ABRANGENCIA�, qryNotasServico.FieldByName(�ABRANGENCIA�).AsString,[]) then
    for i := 0 to Pred(cbxAbrangencias.Items.Count) do
    begin
      if cbxAbrangencias.Items[i] = qryAbrangencia.FieldByName(�DESCRICAO�).AsString then
        cbxAbrangencias.ItemIndex := i;
    end;
end;

F�rum D�vida em ComboBox #371708