![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Creo que lo que necesitas va por el camino que te ha mostrado dec.
Si seleccionas solo el directorio con SelectDirectory o si seleccionas un archivo y a este le extraes el path es totalmente válido. El siguiente paso es buscar todos loas archivos de ese directorio que se ajusten a tu requerimiento. En About.com encontré un articulo de como leer los archivos de un directorio. Podrías echarle un vistazo.
__________________
Buena caza y buen remar... http://mivaler.blogspot.com |
#2
|
||||
|
||||
Muchas gracias [movorack] :
¿Cómo puedo extraer el path del directorio desde el OpenDialog y pasarselo a mi código? Salu2 |
#3
|
||||
|
||||
Hola radenf.
De este modo carga todos los archivos de la carpeta cuya extensión sea la misma que el archivo abierto mediante TOpenDialog:
Saludos. ![]()
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#4
|
||||
|
||||
Muchas gracias ecfisa :
El código que me has propuesto me genera los siguientes errores: Al compilar señala: [DCC Warning] VisorDicom.pas(932): W1002 Symbol 'faArchive' is specific to a platform [DCC Warning] VisorDicom.pas(930): H2164 Variable 'toFind' is declared but never used in 'GetFiles' Al ejecutarse envía el siguiente mensaje de error: Cannot open file "C:\Users\IV\Documents\Proyectos Delphi 2007\Proyecto Dicom Viewer\1.2.840.157.dcm". El sistema no puede encontrar el archivo especificado. Sin embargo el archivo al que se refiere si lo carga, pero no el resto de los archivos que poseen la misma extensión (.dcm) que se encuentran en el directorio seleccionado. La variable 'toFind' la eliminé y el resultado fue el mismo. Saludos |
#5
|
||||
|
||||
Hola radenf.
En realidad no son errores, son advertencias.
En cuanto al mensaje de error es extraño... No se produjo en ninguna de las pruebas que hice, lógicamente como no poseo el componente CnsDMTable1, probé con otros tipos de archivos. Hace la siguiente prueba para ver si los nombres de archivos de la carpeta "C:\Users\IV\Documents\Proyectos Delphi 2007\Proyecto Dicom Viewer" son cargados correctamente:
Saludos. ![]()
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... Última edición por ecfisa fecha: 20-11-2012 a las 19:25:23. Razón: corrección ortográfica |
#6
|
||||
|
||||
Hola radenf.
Hoy no estoy con el mejor de los días... ![]()
Saludos. ![]()
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#7
|
||||
|
||||
Muchas gracias ecfisa .
Funciona a la perfección. Era justo lo que necesitaba. ¿Es posible lograr lo mismo seleccionando la carpeta que contiene los archivos? Salu2 Última edición por radenf fecha: 20-11-2012 a las 20:26:16. |
#8
|
||||
|
||||
Cita:
Saludos. ![]()
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
![]() |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
¿Opendialog como Procesar archivos por lote? | JXJ | Varios | 2 | 02-02-2011 15:23:12 |
Abrir archivos con nombres de archivos de otra codificación. | matabyte | Windows | 2 | 01-05-2008 01:40:13 |
Darle Abrir a OpenDialog desde codigo. | JuanErasmo | C++ Builder | 4 | 16-01-2008 18:16:34 |
abrir archivos con OpenDialog y ShellExecute | thelibmx | Varios | 5 | 06-09-2007 21:19:44 |
Opendialog abrir aplicacion!!! | liz_hilton | OOP | 2 | 10-05-2005 17:41:32 |
![]() |
|