Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Conexión con bases de datos

 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 05-07-2007
Deiv Deiv is offline
Miembro
 
Registrado: jul 2005
Ubicación: La Paz - Bolivia
Posts: 364
Poder: 22
Deiv Va por buen camino
Wink

Gracias Wonni,
Y de tanto consultar, me orientaron: ¿que les parece el siguiente código que comprueba la versión de MDAC y manda a instalar la nueva versión?
Código Delphi [-]
program TestMdac;
{$APPTYPE CONSOLE}
uses SysUtils, Windows, ShellAPI, Registry;
var
  Mdac_typ, MDACVersion: string;
begin
  with TRegistry.Create(KEY_READ) do
  try
    RootKey := HKEY_LOCAL_MACHINE;
    if OpenKey('SOFTWARE\Microsoft\DataAccess', false) then
      MDACVersion := Copy(ReadString('FullInstallVer'), 1, 3)
    else
      MDACVersion := '';
  finally
    Free;
  end;
  if MDACVersion >= '2.8' then
    exit;
  Mdac_typ := ExtractFilePath(ParamStr(0)) + 'Mdac_typ.exe';
  if FileExists(Mdac_typ) then
    ShellExecute(0, 'open', PChar(Mdac_typ), nil, nil, 0)
  else begin
    writeln(Mdac_typ + ' - MDAC 2.8  No encontrado');
    readln;
  end;
end.

No sé, al código habrá que adapatarlo en algún momento donde muestre una ventana y diga que existe una versión mucho mas actualizada (adjunta en mi Aplicación) para sugerirle la instalación (o hacerlo algo obligatorio y necesario, digamos), lo que no me agrada DE TODO ESTO en el caso de que el Usuario tuviera una versión menor, es que arrancará el programa de MDAC y nos preguntará si aceptamos los términos de licencia y el mensaje de que se va a instalar el Programa. Me pregunto dos situaciones:

1.- ¿No existirá alguna forma que, por ejemplo he podido observar que cuando instalo Delphi 7, en un momento me presenta un CheckBox donde me da a elegir si deseamos instalar componentes o DLL de Access (No recuerdo bien en este momento, disculpen si estoy equivocado), no habrá misma forma de poder INSTALAR INTERNAMENTE la actualización del MDAC? sin que muestre sus ventanas del MDAC propio?

2.- ¿Necesariamente el MDAC tendré que adecuarlo dentro del InstallShield (o InnoSetup) para que en un inicio salga esta opción de comprobación de versiones e instalar el MDAC verdad? ¿Cómo se realizaría este paso con el InstallShield?
Saludos
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Instalar Dbe... Rogersito Plus Tablas planas 5 06-09-2006 19:06:27
Problema con MDAC 2.7 DarkSide Conexión con bases de datos 3 23-11-2005 16:29:59
contraer por codigo, cxGrid (+) los nodos abiertos cerrarlos por codigo sakuragi OOP 6 27-07-2005 18:23:07
de codigo VB a codigo Delphi ingel Impresión 2 20-07-2004 14:15:44
No puedo instalar bien un componente de codigo de barrar? danytorres Varios 2 13-09-2003 19:58:55


La franja horaria es GMT +2. Ahora son las 03:13:40.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi