[romanzi]

Появилась проблема с ini:
Всё вроде хорошо - всё работает, ini записывает информацию правильно, но дело в том, что он её не читает!

То-есть вместо нужно мне информации, которая записалась в ini, появилось моё "1.", "2." и т. п.

Вот код:

Код:

function TForm1.MyFunction: Boolean;
var
IniFile: TIniFile;
begin
result:=false;
if (label1.Caption <> '' ) and (label2.Caption <> '') and (label3.Caption <> '') then
begin
IniFile := TIniFile.Create(ExtractFilePath(paramstr(0)) + 'nsa.ini');

IniFile.WriteString('form1','label1',opendialog1.FileName);
IniFile.WriteString('form1','label2',opendialog1.FileName);
IniFile.WriteString('form1','label3',opendialog1.FileName);
IniFile.Free;

label1.Caption:='1.' ;
label2.Caption:='2.' ;
label3.Caption:='3.'  ;


result:=true;

end;
end;

Просто нужно вместо

Код:

label1.Caption:='1.' ;
label2.Caption:='2.' ;
label3.Caption:='3.'  ;

Поставить значение по умолчанию - то, что записалось в ini....