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 |
|
#1
|
|||
|
|||
TIniFile no me funciona y no tiene sentido
//Tengo el siguiente codigo
//Regi := TIniFile.Create('Genpres.ini'); //ia00.Value := Regi.ReadFloat(Seccio,'IA00',16); //Regi.Free; //Siendo Regi del Tipo TInifile. //Pues bueno, fisicamente no me crea el archivo Genpres.ini, no lo entiendo. //Utilizo delphi 6 con windows xp home. //Muchas gracias. antes que nada tenes que agregar el inifiles dentro del uses: Uses inifiles; luego proba con este codigo, yo lo probe en delphi 7 sin problemas: procedure TForm1.Button1Click(Sender: TObject); var regi : TINIFile; ia00:real; begin ia00:= 3.1415; regi := TINIFile.Create(ExtractFilePath(Application.EXEName) + 'Genpres.ini'); regi.Writefloat('General', 'floatdata', ia00 ); regi.Free; end; el problema creo que esta en que no pusiste: (ExtractFilePath(Application.EXEName) + 'Genpres.ini'); despues del regi := TINIFile.Create recorda que esto genera el archivo .ini dentro de la carpeta en la que estas guardando el proyecto, espero que te sirva saludos |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|