![]() |
![]() |
| 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 |
|
#4
|
|||
|
|||
|
Otra alternativa
Segun lo que pude entender si este archivo contiene informacion de configuracion de tu programa, tal como :
- Ruta de archivos de datos - directorios de trabajo - valores por defecto - Etc... Puedes utilizar un archivo .INI, delphi tiene muchas formas de acceder este de manera muy facil... Aqui te coloco un poco de codigo... Código:
Var
Vars:TStrings;
strRutaDataBase, strXlsTemplate, strDBase
Begin
Try
Vars:=TStringList.Create;
With TIniFile.Create( 'Miconfig.Ini' ) Do
Begin
ReadSectionValues('BaseDatos',Vars);
strRutaDatabase:=Vars.Values['RutaDataBase'];
//C:\Apps\Contabilidad\data
ReadSectionValues('Archivos',Vars);
strXlsTemplate=Vars.Values['XlsTemplate'];
//SAI.XLS']
strDBFiles=Vars.Values['DBFiles'];
//PARAMSIM.DBF
Free;
End;
Finally
Vars.Free;
End;
[BaseDatos] RutaDataBase=C:\Apps\Contabilidad\data [Archivos] XlsTemplate=SAI.XLS DBFiles=PARAMSIM.DBF Espero te sirva... Saludos de Christian Concepcion-Chile El Domingo 06 jugamos con Brasil...Vamos Chileeeeeeeeeeeeeeeeeeee!!!chi-le, chichichi, lelele, Viva Chileeeeeeeee!!! |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|