Ver Mensaje Individual
  #4  
Antiguo 01-06-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por danielmj Ver Mensaje
...
Si hago clic en lo que vendría a ser el elemento padre, en el TEdit me muestra lo que sería toda la ruta hasta el primero de los sub elementos
Si era la idea... por que eso era precisamente lo que había interpretado que deseabas:
Cita:
Cita:
DIRECTORIO 1, DIRECTORIO 2, DIRECTORIO 3, DIRECTORIO 4

Donde cada item, forma parte del anterior, lo que necesito es que quede de esta manera en el TEdit: C:\DIRECTORIO1\DIRECTORIO2\DIRECTORIO3\DIRECTORIO4
Puedo acceder a cada nivel, pero en el TEdit sólo me muestra lo que sería el padre o el hijo o el nieto, pero nunca los tres al mismo tiempo y esto en el evento OnClick del TTreeView.

No tengo Delphi en este momento como para probarlo pero supongo que debería bastar con este cambio:
Código Delphi [-]
function GetBranchNodes(TV: TTreeView; ndSelect: TTreeNode): string;
var
  nd: TTreeNode;
begin
  nd := ndSelect;
  while nd.Level <> 0 do nd := nd.GetPrev;
  while nd <> ndSelect do  // <==
  begin
    Result := Result + nd.Text + '\';
    nd := nd.GetNext;
  end;
  Result := Result + nd.Text
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita