![]() |
|
|
#16
|
|||
|
|||
|
Код:
var
Ini: TIniFile;
begin
Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'Save.ini');
Ini.WriteString('Cana','Pervoe',Edit1.Text);
Ini.free;
end;сохраняет с этим именем без имени программы и в папке приложения вобщем цель достигнута |