![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#5
|
|||
|
|||
|
Ampliando un poco la respuesta de roman (que tiene toda la razon en lo que dice), puedes hacer una cosa asi
Código:
procedure TfDataModulo.fDataModuloCreate(Sender: TObject);
function IsBDEExist : boolean;
begin
Result := (dbiInit(nil) = 0);
end;
begin
if IsBDEExist then
// Existe
else
// No existe
end;
|
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|