|
Hola de nuevo, sabriais alguno decirme como resaltar (cambiando el color o el fondo por ejemplo), de ciertos nodos que son el resultado de una busqueda?
procedure TFHSFabaMain.BuscayResaltaNodo(n:string);
var
Nodo: TTreeNode;
I: Integer;
begin
for I := 0 to tv.Items.Count - 1 do
begin
Nodo := tv.Items[i];
if Pos(n,Nodo.Text)>0 then
begin
Nodo.Selected := true;
Nodo.MakeVisible;
AQUI NECESITO COLOREAR O RESALTAR DE ALGUNA MANERA LOS NODOS COINCIDENTES
break;
end;
end;
end;
|