![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
cargar un archivo (la info) en tu aplicacion
hola a tod@s soy nuevo en el foro ![]() ![]() ![]() gracias de antemano ![]() encontre esto: uses Registry; procedure TForm1.FileFormatAssociations; var reg: TRegistry; FileExt : String; begin reg := TRegistry.Create; reg.RootKey := HKEY_CLASSES_ROOT; reg.LazyWrite := false; FileExt := '.nad'; // nuevo archivo de datos; //Borrar la Clave - Esto es importante !!! reg.OpenKey(FileExt, true); reg.WriteString('', FileExt); reg.CloseKey; //Invocamos al programa pasando el nombre del fichero como primer parámetro reg.OpenKey(FileExt + '\shell\open\command', true); reg.WriteString('', Application.ExeName + ' "%1"'); reg.CloseKey; //El icono mostrado será el primer icono del ejecutable del programa // supuestamente ![]() reg.OpenKey(FileExt + '\DefaultIcon', true); reg.WriteString('', Application.ExeName + ',0'); reg.CloseKey; reg.free; end; hasta aqui todo bien pero... ![]() el problema es que no carga la info del archivo en mi aplicacion... probé con un memo pero supone la ruta del archivo y asi no me sirve la idea es que le d doble Click al archivo (.nad) ![]() ![]() ![]() porfa espero respuestas; ![]() gracias de antemano |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
cargar archivo este si | gulder | API de Windows | 12 | 04-05-2005 06:26:21 |
Como cargar un archivo en aplicacion con D5 | jmedina | Varios | 2 | 22-11-2004 15:23:30 |
cargar un archivo sys en builder | israelgs | C++ Builder | 0 | 08-10-2004 21:25:32 |
Cargar Archivo | srangel | JAVA | 0 | 03-09-2004 21:19:15 |
Cargar archivo chm | esocrates | Varios | 1 | 27-07-2003 09:58:02 |
![]() |
|