Ciao a tutti!
Ho un applicazione che memorizza del testo salvandolo in un file *.txt che poi viene caricato, sempre automaticamente, al riavvio dell'applicazione.
Quello che vorrei fare è salvare questo testo in un file *.ini (cosi anche per capire il funzionamento dei file ini).
Ho provato a farlo ma al momento di caricare il testo, il tmemo legge dal file .ini solo la prima lines e non tutte le altre. Inoltre, se apro il file .ini vedo tutto quello che ho scritto nel tmemo anche se cancellato.
Allego il codice cosi si vede dove sbaglio..
Dove sbaglio??
procedure TForm1.FormCreate(Sender: TObject);
var
ini: TIniFile;
res: string;
begin
try
ini := TIniFile.Create('c:\C_Memoini.ini');
res := ini.ReadString('Section_Name', 'Key_Name', memo1.text);
memo1.Text:=res;
finally
ini.Free;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
var
ini: TIniFile;
begin
timer1.Enabled:=false;
ini := TIniFile.Create('c:\C_Memoini.ini');
try
ini.WriteString('Section_Name', 'Key_Name', memo1.Text);
finally
ini.Free;
end;
end;
Questo è il file ini dopo aver fatto alcune prove
[Section_Name]
Key_Name=ahaha
=dd
=d5
=dd
=ciaoahahah
=152
=cao
=ciaoahahah
=ciaoahahah
=ciaoahahah
=ciao
=ciao
=1234
=ciso
=ciao
=ciao
=1234
=ciao
=ciao
=ciao
=ciao
=e poi
=e poi ....
=123
=e poi
=e poi ....
=e poi
=e poi
=sksk
Grazie mille e sincerissimi auguri di buon Natale!!!
Carmelo