PDA

Ver la Versión Completa : cambiar registro


JoseQ
16-07-2004, 17:11:10
Alguien sabe como cambiar el programa predeterminado para abrir un tipo de imagenes(JPEG) cambiando el registro de windows XP

delphi.com.ar
16-07-2004, 17:33:06
Te recomiendo ver este código: http://www.torry.net/vcl/system/shell/associat.zip
Yo tengo código para esto, pero no te lo puedo pasar, por otro lado te recomiendo buscar información sobre "File Association".

Saludos!

Novás
22-07-2004, 19:27:07
Hola, he conseguido el siguiente codigo para asignar una determinada extensión a mi programa... En este caso la extensión .tip


var
reg: TRegistry;
begin
reg := TRegistry.Create;
reg.RootKey := HKEY_CLASSES_ROOT;
reg.LazyWrite := False;
{ Add Program Support}
reg.OpenKey('.tip\shell\open\command', true);
{ Invoke the program passing the file name as the first parameter}
reg.WriteString('', 'D:\PROPIOS\Tony\Tony.exe % ');
{ Add Icon Display}
reg.CloseKey;
reg.OpenKey('.tip\DefaultIcon', true);
{ Use the first icon in the executable to display}
reg.WriteString('', 'D:\PROPIOS\Tony\Tony.exe,0');
reg.CloseKey;
reg.free;
end;


Mi pregunta es la siguiente:
Como puedo ahora cargar ese archivo en un TListView

delphi.com.ar
22-07-2004, 19:35:06
...Como puedo ahora cargar ese archivo en un TListView¿¿¿???.... es un poco amplia la pregunta, mas sabiendo que es un tipo de archivo propietario.

Novás
22-07-2004, 19:40:40
Perdona, me explicaré mejor...

Ese archivo es un tipo de archivo (de texto ) que genera mi aplicación y lo único que contiene es una lista de ips, es decir, cada línea del archivo contiene una dirección ip.

Mi programa tiene una opción en la cual puedo habrir ese archivo mediante un cuadro de diálogo y cargarlo en en TListView.

Lo que yo quiero conseguir ahora es que, al hacer doble click sobre el archivo con extensión .tip se abra mi programa con las direcciones ip cargadas en el control TListView.

Espero haberme explicado mejor.

delphi.com.ar
22-07-2004, 19:48:54
Ahhhhh...
Cuando defines el "shell\open\command" como "D:\PROPIOS\Tony\Tony.exe %1", significa que el sitio donde esta el %1 por el nombre del archivo que estas abriendo (open) al hacer Doble Click, si es que "open" es la acción por defecto de este tipo de archivo (este es tu caso).
Bueno, en tu aplicación recibirás como parámetro estos datos, y puedes consultarlos utilizando ParamStr()


PD: Te recomiendo poner el %1 entre comillas dobles.

Novás
22-07-2004, 20:00:00
Muchas gracias, ya me funciona a las mil maravillas