[romanzi]

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

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

Вот код:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23

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;

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

Код:

1 2 3

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

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

[M.A.D.M.A.N.]

А где тут чтение? Давай весь код.

[Assistant]

не понял, это повтор этого что ли? я уже точно в такой же теме отвечал

[Admin]

Дубль, тему закрываю.