Uso del ShellListView

[esocrates]

Me parece muy bueno delphi.com.ar. Es la solución que buscaba.
Un saludo y muchas gracias.

[lucasarts_18]

Hola:

Con PathName traes el nombre de la ruta..
Como se pueden cargar los nombres de archivos que se encuentran en las carpetas de un ShellTreeView .

Saludos.

[roman]

Empezado por lucasarts_18

¿Por qué te enojas?

PathName es la ruta y el nombre del archivo. Para quedarte sólo con el nombre usa la función ExtractFileName:

Código Delphi [-]
ExtractFileName(ShellListView1.SelectedFolder.PathName)

// Saludos

[lucasarts_18]

Hola Roman:

En ningún caso me he enojado, solo puse esa carita por frustración al ver que el ejemplo no hacía como proponía Delphi.com.ar.

Tengo algunas dudas:

1. En éste mensaje porqué se hace referencia a ShellListView sí sé está preguntando por ShellTreeView? .
2. Lo otro sería algo así (ShellTreeView.ShellListView) como podrás ver en el código de más abajo.

Código Delphi [-]
 
 
if (ShellTreeView.ShellListView.SelectedFolder <> nil) and
(not ShellTreeView.ShellListView.SelectedFolder.IsFolder) then
//FrmArchivos.LstBoxFile.Items.Add (ShellTreeView.ShellListView.SelectedFolder.PathName);
Memo1.Lines.LoadFromFile(ShellTreeView.ShellListView.SelectedFolder.PathName);

Cómo puedes ver, hay una línea que se encuentra comentada porque esa es mi idea, pasar todos los nombres de archivos a un ListBox.
Pero como no me resulta con el listbox, hicé el intento de ejecutarlo como lo proponen en éste hilo.

Al momento de ejecutarlo como dice Delphi.Com.Ar me lanza una excepción de violación de acceso a dirección......

Bueno...Ese es mi drama...No estoy enojado A ésta hora me baja el sueño..

Saludos.

[delphi.com.ar]

Empezado por lucasarts_18

1. En éste mensaje porqué se hace referencia a ShellListView sí sé está preguntando por ShellTreeView.

Empezado por esocrates

Les pido me ayuden con el código necesario para que al hacer doble clic sobre el nombre de un archivo txt que se muestra en el ShellListView se muestre en el Memo.

Por otro lado, tu código no tendría que producir un error si es que tienes asignada la propiedad ShellListView de tu ShellTreeView. ¿Porqué accedes a través de esta propiedad pudiendo acceder directamente al ShellListView como en mi ejemplo?

Código Delphi [-]
if Assigned(ShellTreeView.ShellListView) and
(ShellTreeView.ShellListView.SelectedFolder <> nil) and
(not ShellTreeView.ShellListView.SelectedFolder.IsFolder) then
...

Saludos!

[roman]

Empezado por lucasarts_18

al ver que el ejemplo no hacía como proponía Delphi.com.ar.

El ejemplo hace correctamente lo que Federico indica. Lo sé porque a mi me pasó lo mismo que a ti .

Originalmente se pedía:

Empezado por esocrates

que al hacer doble clic sobre el nombre de un archivo txt que se muestra en el ShellListView se muestre en el Memo

lo cual tiene dos interpretaciones:

- que se muestre el nombre del archivo en el memo
- que se muestre el contenido del archivo en el memo

pero más adelante aclaró que era lo segundo:

Empezado por esocrates

No sé de qué modo puedo cargar en un Memo el contenido de un txt al hacer doble clic

y a esto es a lo que contestó Federico.

Según entiendo tú quieres la otra opción.

Empezado por lucasarts_18

En éste mensaje porqué se hace referencia a ShellListView sí sé está preguntando por ShellTreeView

No, pues ni idea de algo que aconteció hace dos años

Lo que tú necesitas creo que es

Código Delphi [-]
Memo1.Lines.Add(ExtractFileName(ShellListView.SelectedFolder.PathName));

Quité la referencia a ShellTreeView pues me gusta más acceder directamente que através de otra componente.

// Saludos

[roman]

Se me adelantó Federico unos segundos pero veo que básicamente pensamos igual en este aspecto.

// Saludos

[lucasarts_18]

Empezado por roman

Quité la referencia a ShellTreeView pues me gusta más acceder directamente que a través de otra componente.

Hice esto:

Código Delphi [-]
 
var
ShellListView : TShellListView;
begin
   if (ShellListView.SelectedFolder <> nil) and
     (not ShellListView.SelectedFolder.IsFolder) then
      Memo1.Lines.Add(ExtractFileName(ShellListView.SelectedFolder.PathName));
end;

Al momento de sacar el ShellTreeView me dice que el identificador no está declarado,por eso me ví obligado a declararlo, pero sigo con el problema de violación en la dirección de memoria.... Estoy totalmente confundido

[roman]

¿Y por qué piensas que una variable local que no ha sido construida te va a funcionar?

Debes tener una componente TShellListView en tu formulario o sino no sé de qué estamos hablando. Si la componente se llama de otra manera entonces ese nombre es el que tienes que usar.

// Saludos