procedure EditWinIni;
var FileName: string; //storage for file name
begin FileName := 'c:\Program Files\MyProgram\MyFile.ini' //set the file name
with Form1.Memo1.Lines do begin
LoadFromFile(FileName); //load from file
SaveToFile(ChangeFileExt(FileName, '.bak')); //save into backup file
end;end;
27 Mart 2010 Cumartesi
Kaydol:
Kayıt Yorumları (Atom)
Hiç yorum yok:
Yorum Gönder