28/06/09 9:28
Daf
Ciao, prova a inserire questi codici:
program EsempioIni
uses
SysUtils,
IniFiles;
{APPTYPE CONSOLE}
var
Ini: TIniFile;
D, S: string;
begin
Ini := TIniFile.Create(ChangeFileExt(ParamStr(0), '.ini');
//Creo INI nel file "nomeprog".ini
Write('BANCA DATI:', #13#10, 'Inserisci il campo: ');
ReadLn(S);
if(Ini.SectionExsist(S))then
//Controllo l'esistenza del settore
WriteLn(Ini.ReadString(S, 'DATA', ''));
//Scrivo il testo del campo DATA (se vuoto scrivo '')
Write('INSERISCI NUOVI DATI: ');
ReadLn(D);
Ini.WriteString(S, 'DATA', D);
//Scrivo dati nel campo DATA
end;
ha anke altre funz ke sono utili come ReadSectors(S: TStrings); o ReadSections(S: string, TS: TStrings);
Ultima modifica effettuata da Daf 28/06/09 9:31
aaa
28/06/09 9:33
Daf
Lovoro ultimamente ad un oggetto ke sia in grado di fare lui le operazioni e perfino salvare imp sulle form se ti interessa quando lo avrò finito posterò il sorgente
aaa
12/07/09 7:49
carmelo
Grazie a tt e due per la risposta...il programmino lo scaricherò volentieri!!
Ciao e grazie
carmelo
aaa