丰满人妻一区二区三区无码AV|国产乱色国产精品免费视频|国产精品一区二区不卡的视频|2020精品国产福利在线观看香蕉

    1. <rp id="2o2at"><nav id="2o2at"></nav></rp>
      
      

      <rt id="2o2at"></rt>
      <ruby id="2o2at"><nav id="2o2at"></nav></ruby>

    2. <rp id="2o2at"><meter id="2o2at"></meter></rp>

        <tt id="2o2at"><form id="2o2at"></form></tt>

      1. <source id="2o2at"></source>

          首頁 > 編程 > Delphi > 正文

          delphi建立、讀取、存貯INI文件的方法《三》

          2020-01-31 20:52:44
          字體:
          來源:轉載
          供稿:網友
          從.INI文件中獲取字符串
            var
            strResult:pchar;
            begin
            GetPrivateProfileString(
            ´windows´, // []中標題的名字
            ´NullPort´, // =號前的名字
            ´NIL´, // 如果沒有找到字符串時,返回的默認值
            strResult, //存放取得字符
            100, //取得字符的允許最大長度
            ´c:/forwin95/win.ini´ // 調用的文件名
            );
            edit1.text:=strResult; //顯示取得字符串
            從.INI文件中獲取整數
            edit1.text:=inttostr(GetPrivateProfileInt(
            ´intl´, // []中標題的名字
            ´iCountry´, // =號前的名字
            0,// 如果沒有找到整數時,返回的默認值
            ´c:/forwin95/win.ini´ // 調用的文件名
            ));
            向.INI文件寫入字符串
            WritePrivateProfileString(
            ´windows´, // []中標題的名字
            ´load´, // 要寫入“=”號前的字符串
            ´accca´, //要寫入的數據
            ´c:/forwin95/win.ini´ // 調用的文件名
            );
            向.INI文件寫入整數
            WritePrivateProfileSection(
            ´windows´, // []中標題的名字
            ´read=100´, // 要寫入的數據
            ´c:/forwin95/win.ini´ // 調用的文件名
            );
            上面的方法是調用API函數,下面介紹另一種不用API從.INI文件中獲取字符的方法
            var MyIni: TIniFile;
            begin
            MyIni := TIniFile.Create(´WIN.INI´);//調用的文件名
            edit1.text:=MyIni.ReadString(´Desktop´, ´Wallpaper´, ´´);//取得字符
            end;
            向.INI文件中寫入字符的方法
            var MyIni: TIniFile;
            begin
            MyIni := TIniFile.Create(´WIN.INI´);//調用的文件名
            DelphiIni.WriteString(´Desktop´, ´Wallpaper´, ´c:/a.bmp´);
            end;
          發表評論 共有條評論
          用戶名: 密碼:
          驗證碼: 匿名發表

          圖片精選

          1. <rp id="2o2at"><nav id="2o2at"></nav></rp>
            
            

            <rt id="2o2at"></rt>
            <ruby id="2o2at"><nav id="2o2at"></nav></ruby>

          2. <rp id="2o2at"><meter id="2o2at"></meter></rp>

              <tt id="2o2at"><form id="2o2at"></form></tt>

            1. <source id="2o2at"></source>