FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
¿GetFileVersionInfo modifica su primer parámetro? (FileName, la ruta de archivo dada)
Hola, voy a trabajar con la función GetFileVersionInfo de la API de Windows, la cual sirve para obtener datos de un archivo ejecutable, como su versión, fabricante, etcétera.
En la unidad SysUtils de Delphi viene una rutina que hace uso de ella (también he visto varias clases de terceros que la implementan):
Lo que me llama la atención es esa afirmación de "GetFileVersionInfo modifies the filename parameter". Entiendo y encuentro lógico que debido a ello Borland usara una cadena alterna "UniqueString(FileName)". Pero al hacer pruebas no encontré que GetFileVersionInfo realmente modificara el valor del primer argumento. Así que mi duda es por qué se tiene esa precaución y, asumiendo que la afirmación del comentario es cierta, ¿en qué circunstancias ocurre tal modificación? Esta vez no tuve suerte en Google, ¿alguna pista? Gracias de antemano. |
#2
|
||||
|
||||
Hola,
A ver. Voy a tirar al aire con lo primero (y más simple, porque, de mi cerebro no pueden salir sino cosas simples) que se me ocurre. Digo que acaso el prototipo de dicha función se definió en su día con un argumento "constante". Tiempo después, por el motivo que fuese, se vió que era menester modificar dicho argumento, de manera que no valía que se dejase como constante. Si estoy en lo cierto, tal vez se tomó la solución "chapuza", esto es, utilizar una variable local para hacer las modificaciones correspondientes, manteniendo el prototipo de la función, ¡digo yo!, por razones de compatibilidad... P.D. En efecto, esta explicación mía no puede tener sentido,... ¿verdad que no tiene sentido? Y por diversas razones además, casi estoy por borrar este mensaje... |
#3
|
||||
|
||||
Quizá algún "bug" en alguna versión antigua de Windows y el "parche se quedó hasta nuestros dias. En todo caso la ocumentación de la API no dice nada al respecto.
// Saludos |
#4
|
||||
|
||||
Yo uso esa función desde hace muchos años en todos los proyectos y nunca he tenido problemas de ese tipo, (sólo la he usado en winXP con D7 y D2007)
|
#5
|
||||
|
||||
Pero, ¿usas directamente la API de Windows o la función de la unidad SysUtils?
// Saludos |
#6
|
||||
|
||||
O sea, que, mi respuesta mi mirarla siquiera.
|
#7
|
||||
|
||||
Cita:
// Saludos |
#8
|
||||
|
||||
Cita:
Es la que está implementada en 'windows'; y es este código horroroso:
|
#9
|
||||
|
||||
P.D. Perdona Al,... algún moderador serio puede borrar los mensajes que considere oportuno. No presentaré queja. |
#10
|
||||
|
||||
Pues ahí está. Usas la API directamente. Si no te ha dado problemas nunca es de suponerse que el programador original en SysUtils estaba pensando en alguna otra cosa
// Saludos |
#11
|
||||
|
||||
En estos momentos no contamos con ese tipo de moderadores
// Saludos |
#12
|
||||
|
||||
Por cierto, no sé a quién iban dirigidas las fanfarrias, pero en un sano ejercicio de autoestima ya las he escuchado varias veces
// Saludos |
#13
|
||||
|
||||
Hola,
Las fanfarrías de la Diana iban, sin lugar a duda alguna, dirigidas a un humilde servidor de ustedes. |
#14
|
||||
|
||||
Todo esto es muy extraño, incluyendo exquisita música del video.
Tu teoría es cuando menos interesante, David, puede que por ahí vayan los tiros. A ver, paso siguiente: ¿podrían ayudarme a averiguar en qué versión de Delphi apareció la función GetFileVersion y desde cuándo tiene ese comentario de "GetFileVersionInfo modifies the filename..."? Vamos, aquellos que tengan Delphis anteriores al 7, ¿podrían por favor abrir la unidad SysUtils.pas para verificar esto? Creo que esa unidad no existía en las primeras versiones, pero en esos casos y hasta para más seguridad está la alternativa de buscar GetFileVersion con Find in Files sobre los fuentes de la RTL / VCL (C:\Archivos de programa\Borland\DelphiX\Source, marcando la opción "Include subdirectories"). Muchas gracias. |
#15
|
||||
|
||||
Hola,
Mi teoría parecía buena, pero, según la escribía me sonaba raro, porque, en efecto, existen en Delphi diferentes mecanismos para mantener la compatilidad hacia atrás sin necesidad de hacer algo como lo dicho. De todas formas... quién sabe... igual he acertado a la primera, ¡que ya sería una novedad! Por otro lado, supongo que no te servirá de mucho, pero, acabo de comprobar que tanto en Delphi 2007 como en Delphi XE2 aparece dicha función implementa y comentada tal como has señalado. Lamento no disponer de versiones de Delphi anteriores para mirar a ver. |
#16
|
||||
|
||||
Delphi 5, en comctrls.pas
|
#17
|
||||
|
||||
Gracias, Casi.
Y en XE2 tampoco varían las cosas, tiene el mismo comentario en el código. Pienso que el origen de esto pudo ser un defecto de alguna de las versiones de Windows contemporáneas de la primera versión de Delphi que tuvo esa particularidad. ¿Alguien que pueda probar sobre Windows 95, 98, Me, 2000? Hay algo que puede significar una pista: La modificación a la que alude el comentario podría tener que ver con la aparición de los "nombres largos" en las rutas de archivos. Ya saben, antes un nombre de archivo o directorio no podía tener más de 8 caracteres ni llevar espacios, ahora sí. No obstante, luego, en algunas ventanas de comandos, algunos de esos nombres largos aparecían con un nombre corto como "ARCHIVO~" porque Windows en realidad hacía una especie de chapuza guardando los nombres largos como nombres cortos (no sé si por el formato del disco, o algo así). Creo que quizá la función modificaba la ruta dada para convertir el nombre largo a su nombre corto "real", y así extraer del archivo el recurso que guarda los datos de versión. O bien, y relacionado con esto, para convertir el nombre por completo a mayúsculas. El hecho es que la modificación no podría (no debería) ser para crear una cadena más larga, sino una cadena o más corta o de la misma longitud, pues esa memoria le pertenece a la aplicación que llama a la función. De todas formas espero el mismo favor que ha hecho Casimiro (gracias por la molestia, Casi), de quienes tengan versiones de Delphi anteriores a la 5. |
#18
|
||||
|
||||
Hola,
Al ¿No tendrá que ver algo que acabo de leer en el MSDN?: Cita:
Saludos, |
#19
|
||||
|
||||
Cita:
Cita:
// Saludos |
#20
|
||||
|
||||
Cita:
Cita:
Román: Disculpa, había leído esa parte de tu cita, pero con las distracciones del día lo olvidé casi por completo. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Pasar como parametro la ruta de una imagen | richy08 | Impresión | 6 | 19-08-2008 22:56:00 |
llamar un archivo asi '192.168.1.1:\ruta\archivo.frf' | IVAND | Varios | 5 | 12-04-2008 16:18:54 |
Ruta absoluta de un archivo | Alexis De la Cr | PHP | 3 | 17-06-2006 23:41:22 |
ruta de un archivo | ddd_ddd | Varios | 1 | 07-06-2006 23:08:34 |
Ruta y nombre de archivo INI | jfranco | Varios | 2 | 27-02-2004 16:44:23 |
|