WriteString('MySetting ',' Edit1_Text ',Edit1。正文);//同上結束;結束;程序TForm1。FormCreate(發件人:to object);//從tiny開始讀取設置。Create ('a.ini') do in a.ini文件//打開創建的a . inibegincheckbox 1 . checked:= read bool('我的設置',' checkbox 1 _ checked ',false);{和上面的寫法壹樣,這裏是讀ReadBool和WriteBool的寫法,這是兩個Bool值。}