COMO PEGAR O VALOR DO TDBCOMBOBOX CONFORME O MOUSE PASSA EM CIMA DA LISTA DELPHI
Eu preciso pegar o valor conforme passo ou mouse pelos itens, eu já consigo fazer isso alterando o style do combobox para csOwnerDrawFixed e utilizando o seguinte código.
combo := (Control as TDBComboBox);
combo.Canvas.TextOut(Rect.Left, Rect.Top, combo.Items[Index]);
if FileExists(caminho...+ combo.Items[Index]+'.jpg') then
Image3.Picture.LoadFromFile (caminho...+ combo.Items[Index]+'.jpg' )
else
Image3.Picture:=nil;
Porem se eu utilizo a seta do teclado pra navegar pelas opções os itens somem.
combo := (Control as TDBComboBox);
combo.Canvas.TextOut(Rect.Left, Rect.Top, combo.Items[Index]);
if FileExists(caminho...+ combo.Items[Index]+'.jpg') then
Image3.Picture.LoadFromFile (caminho...+ combo.Items[Index]+'.jpg' )
else
Image3.Picture:=nil;
Porem se eu utilizo a seta do teclado pra navegar pelas opções os itens somem.
Carlos Eduardo
Curtidas 0
Respostas
Paulo
23/09/2021
Eu preciso pegar o valor conforme passo ou mouse pelos itens, eu já consigo fazer isso alterando o style do combobox para csOwnerDrawFixed e utilizando o seguinte código.
combo := (Control as TDBComboBox);
combo.Canvas.TextOut(Rect.Left, Rect.Top, combo.Items[Index]);
if FileExists(caminho...+ combo.Items[Index]+'.jpg') then
Image3.Picture.LoadFromFile (caminho...+ combo.Items[Index]+'.jpg' )
else
Image3.Picture:=nil;
Porem se eu utilizo a seta do teclado pra navegar pelas opções os itens somem.
combo := (Control as TDBComboBox);
combo.Canvas.TextOut(Rect.Left, Rect.Top, combo.Items[Index]);
if FileExists(caminho...+ combo.Items[Index]+'.jpg') then
Image3.Picture.LoadFromFile (caminho...+ combo.Items[Index]+'.jpg' )
else
Image3.Picture:=nil;
Porem se eu utilizo a seta do teclado pra navegar pelas opções os itens somem.
Vamos lá... Você precisa pegar o valor conforme passa o mouse pelos itens.
Qual valor? Valor de onde?
Qual item?
GOSTEI 0
Carlos Eduardo
23/09/2021
Eu preciso pegar o valor conforme passo ou mouse pelos itens, eu já consigo fazer isso alterando o style do combobox para csOwnerDrawFixed e utilizando o seguinte código.
combo := (Control as TDBComboBox);
combo.Canvas.TextOut(Rect.Left, Rect.Top, combo.Items[Index]);
if FileExists(caminho...+ combo.Items[Index]+'.jpg') then
Image3.Picture.LoadFromFile (caminho...+ combo.Items[Index]+'.jpg' )
else
Image3.Picture:=nil;
Porem se eu utilizo a seta do teclado pra navegar pelas opções os itens somem.
combo := (Control as TDBComboBox);
combo.Canvas.TextOut(Rect.Left, Rect.Top, combo.Items[Index]);
if FileExists(caminho...+ combo.Items[Index]+'.jpg') then
Image3.Picture.LoadFromFile (caminho...+ combo.Items[Index]+'.jpg' )
else
Image3.Picture:=nil;
Porem se eu utilizo a seta do teclado pra navegar pelas opções os itens somem.
Vamos lá... Você precisa pegar o valor conforme passa o mouse pelos itens.
Qual valor? Valor de onde?
Qual item?
GOSTEI 0