Newsgroup: it.comp.lang.delphi
Titolo: [D7] IniFile Mistero Con ReadSectionValues

Ciao a tutti,
non riesco a capire se è un bug della classe TiniFile oppure mi sono
bevuto il cervello ( cosa probabile ).
Il punto è questo, leggo il seguente file ini :
[DB]
Server_Name=Server_Name
User_DB=User_Name
Password_DB=Password
[REPORT_DISPONIBILI]
; 1° Parametro = Descrizione del report a video
; 2° Parametro = Parametro da passare alla SP di estrazione
; 3° Parametro = Nome file del report
; 4° Parametro = Regole da attivare/disattivare separate da virgola
R1            = 1 # R1           # 20,21,22,23
R2            = 2 # R2           # 24,25,31
R3            = 3 # R3           # 26
R4            = 4 # R4           # 30
R5            = 5 # R5           # 28
R6            = 6 # R6           # 29
R7            = 7 # R7           # 27
R8            = 8 # R8           # 11,13,14,15
R9            = 9 # R9           # 16,17,18
R10           =10 # R10          # 2,3,4,5,19
R11           =11 # R11          # 9,10,40
R12           =12 # R12          # 8,12,33,42,43
R13           =13 # R13          # 34,35,36,39
R14           =14 # R14          # 38,41
R15           =15 # R15          # 44
[FTP_HOST]
Host=Host
User_Host=User_Host
Password_Host=Password_Host
Cartella_File_Host=/cartella/uno
[FTP_USER]
Host_User=User
User_User=User_User
Password_User=Password_User
Cartella_File_User=/cartella/uno
Cartella_File_Storici_User=/cartella/uno/storici
[DIRCTORY_TEMP]
WorkDir = c:\temp
[SCHEDULAZIONE]
; LUN-MAR-MER-GIO-VEN-SAB-DOM
WeekDay = GIO
TimeWeekDay = 12:00
[RIEPILOGO_SCARTI]
FileRiepilogo = Situazione_Scarti_AL_
[LOG]
; Il nome del file deve essere indicato senza estensione
FileLog = Report_Scarti
[MAIL]
pippo...@paperino.it
topolin...@paperino.it
;
ciccio.p...@ppaperino.it
con il seguente codice :
  Memo1.Lines.Clear;
  oIniFile := TIniFile.Create('C:\temp\App.Ini');
  Memo1.Lines.Add(oIniFile.ReadString('DB_ARCO', 'Server_Name', ''));
  Memo1.Lines.Add(oIniFile.ReadString('DB_ARCO', 'User_DB', ''));
  Memo1.Lines.Add(oIniFile.ReadString('DB_ARCO', 'Password_DB',''));
  //
  oIniFile.ReadSectionValues('REPORT_DISPONIBILI', ListBox1.Items);
  //
  Memo1.Lines.Add(oIniFile.ReadString('FTP_HOST', 'Host', ''));
  Memo1.Lines.Add(oIniFile.ReadString('FTP_HOST', 'User_Host', ''));
  Memo1.Lines.Add(oIniFile.ReadString('FTP_HOST', 'Password_Host', ''));
  Memo1.Lines.Add(oIniFile.ReadString('FTP_HOST', 'Cartella_File_Host', ''));
  //
  Memo1.Lines.Add(oIniFile.ReadString('FTP_USER', 'Host_User', ''));
  Memo1.Lines.Add(oIniFile.ReadString('FTP_USER', 'User_User', ''));
  Memo1.Lines.Add(oIniFile.ReadString('FTP_USER', 'Password_User', ''));
  Memo1.Lines.Add(oIniFile.ReadString('FTP_USER', 'Cartella_File_User', ''));
  Memo1.Lines.Add(oIniFile.ReadString('FTP_USER',
'Cartella_File_Storici_User', ''));
  //
  Memo1.Lines.Add(oIniFile.ReadString('DIRCTORY_TEMP', 'WorkDir', ''));
  //
  Memo1.Lines.Add(oIniFile.ReadString('SCHEDULAZIONE', 'WeekDay', ''));
  Memo1.Lines.Add(oIniFile.ReadString('SCHEDULAZIONE', 'TimeWeekDay', ''));
  //
  Memo1.Lines.Add(oIniFile.ReadString('RIEPILOGO_SCARTI', 'FileRiepilogo',
''));
  //
  Memo1.Lines.Add(oIniFile.ReadString('LOG', 'FileLog', ''));
  //
  oIniFile.ReadSectionValues('MAIL', ListBox2.Items);
  //
  oIniFile.Free;
Il problema è che ( mistero ) non mi visualizza nulla nella sezione
"MAIL", le ho provate di tutte ma niente da fare.
Qualcuno può gentilemente dirmi se sbaglio qualcosa oppure no ?
Ciao e grazie a tutti.
Giudici Enrico c/o Icograf
--- posted by geoForum on 
http://www.delphiedintorni.it

 ;
ciccio.p...@ppaperino.it
Questa "scrittura" non è standard; devono essere formattati come 
Chiave=Valore
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Ciao,
sono qui che mi sto ancora flagellando da solo, sono proprio un "piccione"
con tutto il rispetto per i piccioni. Dovevo accorgermi che il formato era
diverso dalla sezione [REPORT_DISPONIBILI] la quale funzionava.
Ciao e un grazie sentito da Enrico Giudici c/o Icograf
