主頁 > 後端開發 > 關于ImageList在DFM里面生成的Bitmap的16進制碼怎么轉成圖片?

關于ImageList在DFM里面生成的Bitmap的16進制碼怎么轉成圖片?

2020-09-16 05:09:43 後端開發

關于ImageList在DFM里面生成的16進制碼怎么轉成圖片?

在設計模式下給ImageList添加圖片以后,在DFM里面就會生成如下的16進制碼。
請問,不依賴Delphi的IDE環境,怎樣將Bitmap的16進制碼轉成圖片?
java,C#實作都可以,請大神幫助!!
100分相送!!

  object ImgLst_AppIcon: TImageList
    Left = 288
    Top = 56
    Bitmap = {
      494C010102000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      000000000000360000002800000040000000100000000100180000000000000C
      000000000000000000000000000000000000FF0000FF0000FF0000FF0000FF00
      00FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF
      FFFFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C080C0A0406040006020006040408060
      C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2FFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC2C2C2FF
      0000C0C0C0C0C0C0C0C0C0C0C0C0006040006040006040006040008040006040
      006040006020C0C0C0C0C0C0C0C0C0C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2F2F2F2FF0000FF00
      00FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000F2F2F2FFFFFFFF
      0000C0C0C0C0C0C080C0A0006040006040006040006040006040006040006040
      006040006040008040C0C0C0C0C0C0C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2F2F2F2F2F2F2F2F2
      F2F2F2F2F2F2F2FF0000F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2FFFFFFFF
      0000A4A0A0C0C0C0006040006040006040006040006040006040006040006040
      FFFFFF006020006020006040C0C0C0C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2FF0000FF0000F2F2
      F2FF0000FF0000FF0000FF0000FF0000F2F2F2FF0000FF0000F2F2F2FFFFFFFF
      0000C0C0C0006040006040006040006040006040006040006040FFFFFF006040
      006040006020006040006040006040C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2F2F2F2F2F2F2FF00
      00F2F2F2F2F2F2FF0000F2F2F2F2F2F2FF0000FF0000FF0000F2F2F2FFFFFFFF
      0000C0C0C0006020006040006040006040006040006040006040006040006040
      006040FFFFFFFFFFFF006040006040C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2F2F2F2F2F2F2F2F2
      F2FF0000F2F2F2F2F2F2F2F2F2FF0000FF0000F2F2F2F2F2F2F2F2F2FFFFFFFF
      0000006040006040006040006040006040006020006040006040006040006040
      FFFFFFFFFFFF00604000604000604080C0A00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2FF0000FF0000FF00
      00FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000F2F2F2FFFFFFFF
      0000006040006020006040006040FFFFFF006040006040006040FFFFFFFFFFFF
      FFFFFFFFFFFF00604000604000602040A0800000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2F2F2F2F2F2F2F2F2
      F2FF0000FF0000FF0000FF0000FF0000F2F2F2F2F2F2F2F2F2F2F2F2FFFFFFFF
      0000006040006040006040006040FFFFFF006040006040006040FFFFFFFFFFFF
      0060400060400060200060200060200060400000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2F2F2F2F2F2F2F2F2
      F2FF0000F2F2F2F2F2F2F2F2F2FF0000F2F2F2F2F2F2F2F2F2F2F2F2FFFFFFFF
      0000006040006040006040006040FFFFFF006040006040006040FFFFFF006040
      006020006020006020006040006040C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2F2F2F2F2F2F2F2F2
      F2FF0000FF0000FF0000FF0000FF0000F2F2F2F2F2F2F2F2F2F2F2F2FFFFFFFF
      0000C0DCC0006040006040006040FFFFFF006040006040006040006040FFFFFF
      FFFFFF006040006040006040006040C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2F2F2F2FF0000FF00
      00FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000F2F2F2FFFFFFFF
      0000C0C0C0006020006040006040FFFFFF006040006040006040006040006040
      006040006040006040006040006020C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F0FAFDF2F2F2F2F2F2F2F2
      F2FF0000F2F2F2F2F2F2F2F2F2FF0000F2F2F2F2F2F2F2F2F2F2F2F2FFFFFFFF
      0000C0C0C0A4A0A0006040006040FFFFFF006040006040006040006040006040
      006040006040006020006020C0C0C0C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2F0FAFDF2F2F2F2F2
      F2FF0000F2F2F2F2F2F2F2F2F2FF0000F2F2F2F2F2F2F2F2F2F2F2F2FFFFFFFF
      0000C0C0C0C0C0C0408060006020006040006040006040006040006040006040
      006040408060006040C0C0C0C0C0C0C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000C2C2C2F2F2F2F2F2F2F2F2F2F2F2
      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2FFFFFFFF
      0000C0C0C0C0C0C0C0C0C0A4A0A0006020006040006020006040006040006040
      006040006040C0C0C0C0C0C0C0C0C0C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000FF0000C2C2C2C2C2C2C2C2C2C2C2
      C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2FF
      0000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C080A0A0006040006020006040008040
      C0DCC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000424D3E000000000000003E000000
      2800000040000000100000000100010000000000800000000000000000000000
      000000000000000000000000FFFFFF0000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000}
  end

uj5u.com熱心網友回復:

自己SF!!
請lyhoo163大神幫忙!!

uj5u.com熱心網友回復:

追加一個,下面這段 Glyph.Data = {。。。}又是怎么轉成圖片的。。
請高手指點!!謝謝!!
分不夠再開貼補分!!拜托了!

   object BitBtn4: TBitBtn
      Left = 792
      Top = 37
      Width = 33
      Height = 33
      TabOrder = 32
      OnClick = BitBtn4Click
      Glyph.Data = {
        3E070000424D3E07000000000000360000002800000018000000190000000100
        1800000000000807000000000000000000000000000000000000CED6D6CED6D6
        CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6
        D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CE
        D6D6CED6D6CDD5D5CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6
        CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CDD5D5CED6
        D6CED6D6CED6D6CED6D6CDD5D5CED6D6CDD5D5CED6D6CED6D6CDD5D5CED6D6D1
        DADAD1DADAD0D8D8CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6
        CED6D6C6CECECDD5D5CED6D6CED6D6CED6D6CDD5D5D7DFDFCDD5D5CDD5D5CED6
        D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CDD5D5CDD5D5CDD5D5CD
        D5D5CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CDD5D5D6DEDE
        CDD5D5CED7D7CED6D6CED6D6CED6D6000000101111101111CED6D6CDD5D5D0D7
        D7CED6D6CED6D6CED6D6D3DBDBD3DCDCD3DCDCD3DCDCD3DCDCD3DCDCCED6D6CE
        D6D6CDD5D5D6DEDECED6D6D2DBDBCED6D6000000101111000000101111101111
        CED6D6CBD3D3CED6D6E0E9E9E0E9E9E0E9E9E0E9E9E0E9E9E0E9E9E0E9E9E0E9
        E9E0E9E9E0E9E9E0E9E9CDD5D5D7DFDFD0D8D8CED6D600000000000003030310
        1111000000CED6D6CED6D6CBD3D3CED6D6E0E9E9000000000000000000000000
        000000111212191A1A060606000000000000CDD5D5DAE2E2CCD4D40000000000
        00000000000000CED6D6CED6D6CED6D6CED6D6CBD3D3CED6D6E0E9E900000000
        0000000000000000242626000000000000000000E0E9E9E0E9E9CED6D6D8E0E0
        000000000000030303000000CED6D6CED6D6CED6D6CED6D6CED6D6CBD3D3CED6
        D6E0E9E9000000000000000000000000000000000000000000E0E9E9CED6D6CE
        D6D6CFD7D7CED6D6000000000000141515CED6D6CED6D6CED6D6CED6D6CED6D6
        CED6D6CED6D6CED6D6E0E9E9000000000000000000000000000000010000E0E9
        E9CBD3D3CED6D6CED6D6DBE2E2000000000000010000CED6D6CED6D6CDD5D5CE
        D6D6CED6D6CED6D6CED6D6CED6D6CED6D6E0E9E9000000000000000000000000
        000000000000010000CED6D6CED6D6CED6D6EBF1F1000000000000010000CED6
        D6CFD7D7CDD5D5CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6E0E9E900000000
        0000000000000000000000000000000000CED6D6CBD3D3CBD3D3EBF1F1000000
        000000CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6
        D6E0E9E9000000000000000000E0E9E9D7DFDF000000000000CED6D6CBD3D3CE
        D6D6EBF1F1000000080808CED6D6CED6D6CED6D6CDD5D5CED6D6CED6D6CED6D6
        CED6D6CED6D6CED6D6E0E9E9000000000000E0E9E9CED6D6CED6D60000000000
        00000000CBD3D3CED6D6EBF1F1000000000000CED6D6CED6D6CED6D6CDD5D5CE
        D6D6CED6D6CED6D6CED6D6CED6D6CED6D6E0E9E9000000E0E9E9CED6D6CED6D6
        CED6D6CBD3D3000000000000CBD3D3CED6D6EBF1F1000000000000080808CED6
        D6D0D8D8CDD5D5D7DFDFCED6D6CED6D6CED6D6CED6D6CED6D6E0E9E9000000E0
        E9E9D2DADACDD5D5CED6D6CBD3D3121212101111CBD3D3CED6D6D9E0E0000000
        010101000000CED6D6CED6D6CDD5D5CED6D6CED6D6CED6D6CED6D6CED6D6CED6
        D6CDD5D5D1D9D9D4DCDCCFD7D7CDD5D5DBE3E3000000000000000000CBD3D3CE
        D6D6CFD7D7CED6D6000000000000161717CED6D6CED6D6CED6D6CED6D6CED6D6
        CED6D6CED6D6CED6D6CDD5D5D4DCDCD3DBDBCFD7D7CED6D6D7DFDF1617170000
        00000000CED6D6CED6D6CDD5D5CED6D6000000000000000000CED6D6CED6D6CE
        D6D6CED6D6CED6D6CED6D6CED6D6CDD5D5CFD7D7D0D8D8CFD7D7D6DEDED7DFDF
        D7DFDF000000000000CBD3D3CED6D6CDD5D5CDD5D5CED6D6CED6D60000000000
        000000002B2C2CCED6D6CED6D6D7E0E0CED6D6CED6D6CDD5D5CED6D6D7E0E0D7
        DFDFD7DFDF0100000B0C0C000000000000CED6D6CED6D6CDD5D5CDD5D5D7DFDF
        CED6D6CED6D6000000000000000000000000000000D7DFDFCED6D6CED6D6CED6
        D6CED6D6D7DFDF0100000100000E0F0F000000000000CED6D6CED6D6CED6D6CD
        D5D5CDD5D5D6DEDECED6D6CED6D6CED6D6000000000000000000000000040404
        0F10100D0E0E0D0E0E0F1010040404010000000000000000010000CED6D6CED6
        D6D7DFDFCED6D6CDD5D5CDD5D5D6DEDECDD5D5CED6D6CED6D6CED6D6CED6D600
        0000000000000000000000000000000000000000000000000000010000CED6D6
        CED6D6CED6D6CDD5D5D6DEDECED6D6CDD5D5CDD5D5D6DEDECDD5D5CDD5D5CDD5
        D5CED6D6D1D9D9CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CED6D6CE
        D6D6CED6D6CED6D6CFD7D7C6CECECCD4D4D6DEDECED6D6CDD5D5CDD5D5D6DEDE
        CDD5D5CED6D6CED6D6CDD5D5CDD5D5CED6D6CFD8D8CFD8D8CFD8D8CFD8D8CFD8
        D8CFD8D8CFD8D8CFD8D8CED6D6CED6D6CED6D6C6CECECCD4D4D6DEDECED6D6CD
        D5D5}
    end

uj5u.com熱心網友回復:

貼子僅在手機上顯示,電腦上沒有。

uj5u.com熱心網友回復:

看到了,檔案已發給你!

uj5u.com熱心網友回復:

大哥您太厲害了,能告訴我是怎么轉出來的嗎?請您指教!!

uj5u.com熱心網友回復:

參考 4 樓 lyhoo163 的回復:
看到了,檔案已發給你!


大神,您是怎么轉成圖片的?
不用Delphi的IDE,用代碼實作是怎么做到的呢?
等待您回復!

uj5u.com熱心網友回復:


這個很簡單的,你在dehpi中新建一個form,然加添加一個TBitBtn
用view as text顯示你的from
將你的
Glyph.Data = {
到 } 貼到你的TBitBtn1的end前面
然后直接view as from 就可以看到你的圖形了

uj5u.com熱心網友回復:

參考 6 樓 Paradise_heida 的回復:
Quote: 參考 4 樓 lyhoo163 的回復:

看到了,檔案已發給你!


大神,您是怎么轉成圖片的?
不用Delphi的IDE,用代碼實作是怎么做到的呢?
等待您回復!

IDE中可以匯出,然后用2進制編輯器比較一下內容就明白如何處理了

uj5u.com熱心網友回復:

參考 7 樓 keiy 的回復:

這個很簡單的,你在dehpi中新建一個form,然加添加一個TBitBtn
用view as text顯示你的from
將你的
Glyph.Data = {
到 } 貼到你的TBitBtn1的end前面
然后直接view as from 就可以看到你的圖形了


謝謝。
這個方法沒有問題,用IDE匯出的方法很簡單。
我想要做的是,把Glyph.Data = {到 }之間的內容用C#代碼轉成圖片,而不是依賴Delphi的IDE開發環境。

uj5u.com熱心網友回復:

參考 9 樓 Paradise_heida 的回復:
Quote: 參考 7 樓 keiy 的回復:


這個很簡單的,你在dehpi中新建一個form,然加添加一個TBitBtn
用view as text顯示你的from
將你的
Glyph.Data = {
到 } 貼到你的TBitBtn1的end前面
然后直接view as from 就可以看到你的圖形了


謝謝。
這個方法沒有問題,用IDE匯出的方法很簡單。
我想要做的是,把Glyph.Data = {到 }之間的內容用C#代碼轉成圖片,而不是依賴Delphi的IDE開發環境。

你就沒有我說的,你在delphi IDE中匯出bmp圖片檔案,然后用類似Hex Editor這樣的軟體打開圖片,和dfm中的內容比較一下,就可以發現內容有多大差別了(不會很大的),然后根據差別的規律編程處理

uj5u.com熱心網友回復:

http://baike.baidu.com/link?url=OUdMeK4xvxesJcBrf-hhK05BI6nAreqVpQIUGKc3yASw3_cUM8su2WKMgLI0ARLssd1HOLQC_ZhhheKS5Xr3dt3zjQRGGRUkDYY3wHQECP0OKEv8j7cPvKKiO1waEXl4z0ejN--nGh5ucYMD1d0r_HeFXVjJ8hgEPlqL4TbkB87

再結合BMP格式就行了

uj5u.com熱心網友回復:

直接讀.DFM文本把位圖資料轉換為二進制再保存為檔案,這個最簡單,而且不依賴使用的語言,用C、C#、Java等等都可以,但是早期Delphi保存的DFM檔案是二進制的,不是文本格式,直接讀可能有些問題。
另外的方法要用Delphi、CB寫小工具,建立兩個TStream,實際型別可以用TFileStream、TMemoryStream,然后用ObjectBinaryToText獲得文本格式的DFM,之后可以自己直接轉換,或者用TStream.ReadComponent方法獲得一個組件實體,從它的Components[]中查找TImageList型別的組件,TImageList.GetBitmap可以獲得里面的圖片,TBitmap.SaveToFile保存。

uj5u.com熱心網友回復:

參考 12 樓 DelphiGuy 的回復:
直接讀.DFM文本把位圖資料轉換為二進制再保存為檔案,這個最簡單,而且不依賴使用的語言,用C、C#、Java等等都可以,但是早期Delphi保存的DFM檔案是二進制的,不是文本格式,直接讀可能有些問題。
另外的方法要用Delphi、CB寫小工具,建立兩個TStream,實際型別可以用TFileStream、TMemoryStream,然后用ObjectBinaryToText獲得文本格式的DFM,之后可以自己直接轉換,或者用TStream.ReadComponent方法獲得一個組件實體,從它的Components[]中查找TImageList型別的組件,TImageList.GetBitmap可以獲得里面的圖片,TBitmap.SaveToFile保存。


Delphi6以后,DFM可以保存成文本格式,所以我才能拿到那些16進制的碼。
現在問題是,我用盡了各種C#中的方法,也不能把那些碼轉成BMP圖片。

問題的關鍵就在這里,用C#或者JAVA,把那些16進制碼轉成BMP圖片。

uj5u.com熱心網友回復:

樓主按我8樓說的對比過沒有?對比過就會發現大多數都是一樣的,你要做的就是:
1、構造BMP檔案頭部;
2、把DFM中相應部分復制過去

也就是說:作一個檔案操作就行了

uj5u.com熱心網友回復:

參考 14 樓 liups 的回復:
樓主按我8樓說的對比過沒有?對比過就會發現大多數都是一樣的,你要做的就是:
1、構造BMP檔案頭部;
2、把DFM中相應部分復制過去

也就是說:作一個檔案操作就行了


給個例子,我不知從何下手。

uj5u.com熱心網友回復:

參考 15 樓 Paradise_heida 的回復:
Quote: 參考 14 樓 liups 的回復:

樓主按我8樓說的對比過沒有?對比過就會發現大多數都是一樣的,你要做的就是:
1、構造BMP檔案頭部;
2、把DFM中相應部分復制過去

也就是說:作一個檔案操作就行了


給個例子,我不知從何下手。

例子我沒有。
你得自己進行對比,找出規律,比如你給的資料,實際上是一個imagelist中兩個bmp(所以你得考慮是生成一個還是多個BMP,delphi中匯出可以是一個),你就得搞清楚DFM中哪些是屬于檔案頭(或者自定義的檔案頭),哪些是BMP真實的資料(位圖資料),而這些位圖資料其實只要簡單的轉換成16進制資料追加進BMP檔案就行了

同時,必須研究清楚BMP檔案格式,11樓給了你

uj5u.com熱心網友回復:

頂起!

uj5u.com熱心網友回復:

,這是Delphi默認自動序列化處理的,如果要用代碼轉的話,參考TFiler物件,和Delphi基類中的DefineProperties方法中對序列化的處理的寫入和讀取函式。

uj5u.com熱心網友回復:

參考 18樓不得閑 的回復:
,這是Delphi默認自動序列化處理的,如果要用代碼轉的話,參考TFiler物件,和Delphi基類中的DefineProperties方法中對序列化的處理的寫入和讀取函式。
你的分析很靠譜,根本不是簡單的bmp檔案格式分析就能解決的問題。謝謝。

uj5u.com熱心網友回復:

一年前的帖子了,
 最近分析這個,也看過這個帖子,沒找到答案。
最后自己去比較,發現并不是大神說的那么復雜,
用二進制編輯器,就會發現,delphi只是在圖片的十六進制序列前加了一段自己的識別編碼,通常為20~30位,不同格式的圖片所加長度不同,jpg,bmp,png都測驗過。ico沒做測驗。  

uj5u.com熱心網友回復:

再說一下,我只在image控制元件上測驗,沒在其他控制元件上測驗,不知道是否一樣

uj5u.com熱心網友回復:

看了是我搞錯了,這個imagelist還真不一樣。。。和image不同編碼

uj5u.com熱心網友回復:


procedure TForm1.Button1Click(Sender: TObject);
var
  sTxt:string;
  sList:TStringList;
  iSize:integer;
  buf:PChar;
  ms:TMemoryStream;
begin
  sList:=TStringList.Create;
  try
    sList.LoadFromFile('c:\2.txt');//2.txt里面的內容就是Glyph.Data = {。。。}
    sTxt:=sList.Text;
  finally
    sList.Free;
  end;

  sTxt:=StringReplace(sTxt,#13#10,'',[rfReplaceAll]);
  sTxt:=StringReplace(sTxt,' ','',[rfReplaceAll]);
  iSize:=Pos('424D',sTxt);
  sTxt:=copy(sTxt,iSize,length(sTxt));
  iSize:=length(sTxt) div 2;
  GetMem(buf,iSize);
  try
    HexToBin(PChar(sTxt),buf,iSize);

    ms:=TMemoryStream.Create;
    try
      ms.WriteBuffer(buf^,iSize);
      ms.Position:=0;
      ms.SaveToFile('c:\111.bmp');
    finally
      ms.Free;
    end;
  finally
    FreeMem(buf);
  end;
end;

轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/53692.html

標籤:語言基礎/算法/系統設計

上一篇:CxGrid屬性面板optionsview沒有Navigator屬性

下一篇:delphi開發的屏保,如何設定中文名稱

標籤雲
其他(157675) Python(38076) JavaScript(25376) Java(17977) C(15215) 區塊鏈(8255) C#(7972) AI(7469) 爪哇(7425) MySQL(7132) html(6777) 基礎類(6313) sql(6102) 熊猫(6058) PHP(5869) 数组(5741) R(5409) Linux(5327) 反应(5209) 腳本語言(PerlPython)(5129) 非技術區(4971) Android(4554) 数据框(4311) css(4259) 节点.js(4032) C語言(3288) json(3245) 列表(3129) 扑(3119) C++語言(3117) 安卓(2998) 打字稿(2995) VBA(2789) Java相關(2746) 疑難問題(2699) 细绳(2522) 單片機工控(2479) iOS(2429) ASP.NET(2402) MongoDB(2323) 麻木的(2285) 正则表达式(2254) 字典(2211) 循环(2198) 迅速(2185) 擅长(2169) 镖(2155) 功能(1967) .NET技术(1958) Web開發(1951) python-3.x(1918) HtmlCss(1915) 弹簧靴(1913) C++(1909) xml(1889) PostgreSQL(1872) .NETCore(1853) 谷歌表格(1846) Unity3D(1843) for循环(1842)

熱門瀏覽
  • 【C++】Microsoft C++、C 和匯編程式檔案

    ......

    uj5u.com 2020-09-10 00:57:23 more
  • 例外宣告

    相比于斷言適用于排除邏輯上不可能存在的狀態,例外通常是用于邏輯上可能發生的錯誤。 例外宣告 Item 1:當函式不可能拋出例外或不能接受拋出例外時,使用noexcept 理由 如果不打算拋出例外的話,程式就會認為無法處理這種錯誤,并且應當盡早終止,如此可以有效地阻止例外的傳播與擴散。 示例 //不可 ......

    uj5u.com 2020-09-10 00:57:27 more
  • Codeforces 1400E Clear the Multiset(貪心 + 分治)

    鏈接:https://codeforces.com/problemset/problem/1400/E 來源:Codeforces 思路:給你一個陣列,現在你可以進行兩種操作,操作1:將一段沒有 0 的區間進行減一的操作,操作2:將 i 位置上的元素歸零。最終問:將這個陣列的全部元素歸零后操作的最少 ......

    uj5u.com 2020-09-10 00:57:30 more
  • UVA11610 【Reverse Prime】

    本人看到此題沒有翻譯,就附帶了一個自己的翻譯版本 思考 這一題,它的第一個要求是找出所有 $7$ 位反向質數及其質因數的個數。 我們應該需要質數篩篩選1~$10^{7}$的所有數,這里就不慢慢介紹了。但是,重讀題,我們突然發現反向質數都是 $7$ 位,而將它反過來后的數字卻是 $6$ 位數,這就說明 ......

    uj5u.com 2020-09-10 00:57:36 more
  • 統計區間素數數量

    1 #pragma GCC optimize(2) 2 #include <bits/stdc++.h> 3 using namespace std; 4 bool isprime[1000000010]; 5 vector<int> prime; 6 inline int getlist(int ......

    uj5u.com 2020-09-10 00:57:47 more
  • C/C++編程筆記:C++中的 const 變數詳解,教你正確認識const用法

    1、C中的const 1、區域const變數存放在堆疊區中,會分配記憶體(也就是說可以通過地址間接修改變數的值)。測驗代碼如下: 運行結果: 2、全域const變數存放在只讀資料段(不能通過地址修改,會發生寫入錯誤), 默認為外部聯編,可以給其他源檔案使用(需要用extern關鍵字修飾) 運行結果: ......

    uj5u.com 2020-09-10 00:58:04 more
  • 【C++犯錯記錄】VS2019 MFC添加資源不懂如何修改資源宏ID

    1. 首先在資源視圖中,添加資源 2. 點擊新添加的資源,復制自動生成的ID 3. 在解決方案資源管理器中找到Resource.h檔案,編輯,使用整個專案搜索和替換的方式快速替換 宏宣告 4. Ctrl+Shift+F 全域搜索,點擊查找全部,然后逐個替換 5. 為什么使用搜索替換而不使用屬性視窗直 ......

    uj5u.com 2020-09-10 00:59:11 more
  • 【C++犯錯記錄】VS2019 MFC不懂的批量添加資源

    1. 打開資源頭檔案Resource.h,在其中預先定義好宏 ID(不清楚其實ID值應該設定多少,可以先新建一個相同的資源項,再在這個資源的ID值的基礎上遞增即可) 2. 在資源視圖中選中專案資源,按F7編輯資源檔案,按 ID 型別 相對路徑的形式添加 資源。(別忘了先把檔案拷貝到專案中的res檔案 ......

    uj5u.com 2020-09-10 01:00:19 more
  • C/C++編程筆記:關于C++的參考型別,專供新手入門使用

    今天要講的是C++中我最喜歡的一個用法——參考,也叫別名。 參考就是給一個變數名取一個變數名,方便我們間接地使用這個變數。我們可以給一個變數創建N個參考,這N + 1個變數共享了同一塊記憶體區域。(參考型別的變數會占用記憶體空間,占用的記憶體空間的大小和指標型別的大小是相同的。雖然參考是一個物件的別名,但 ......

    uj5u.com 2020-09-10 01:00:22 more
  • 【C/C++編程筆記】從頭開始學習C ++:初學者完整指南

    眾所周知,C ++的學習曲線陡峭,但是花時間學習這種語言將為您的職業帶來奇跡,并使您與其他開發人員區分開。您會更輕松地學習新語言,形成真正的解決問題的技能,并在編程的基礎上打下堅實的基礎。 C ++將幫助您養成良好的編程習慣(即清晰一致的編碼風格,在撰寫代碼時注釋代碼,并限制類內部的可見性),并且由 ......

    uj5u.com 2020-09-10 01:00:41 more
最新发布
  • Rust中的智能指標:Box<T> Rc<T> Arc<T> Cell<T> RefCell<T> Weak

    Rust中的智能指標是什么 智能指標(smart pointers)是一類資料結構,是擁有資料所有權和額外功能的指標。是指標的進一步發展 指標(pointer)是一個包含記憶體地址的變數的通用概念。這個地址參考,或 ” 指向”(points at)一些其 他資料 。參考以 & 符號為標志并借用了他們所 ......

    uj5u.com 2023-04-20 07:24:10 more
  • Java的值傳遞和參考傳遞

    值傳遞不會改變本身,參考傳遞(如果傳遞的值需要實體化到堆里)如果發生修改了會改變本身。 1.基本資料型別都是值傳遞 package com.example.basic; public class Test { public static void main(String[] args) { int ......

    uj5u.com 2023-04-20 07:24:04 more
  • [2]SpinalHDL教程——Scala簡單入門

    第一個 Scala 程式 shell里面輸入 $ scala scala> 1 + 1 res0: Int = 2 scala> println("Hello World!") Hello World! 檔案形式 object HelloWorld { /* 這是我的第一個 Scala 程式 * 以 ......

    uj5u.com 2023-04-20 07:23:58 more
  • 理解函式指標和回呼函式

    理解 函式指標 指向函式的指標。比如: 理解函式指標的偽代碼 void (*p)(int type, char *data); // 定義一個函式指標p void func(int type, char *data); // 宣告一個函式func p = func; // 將指標p指向函式func ......

    uj5u.com 2023-04-20 07:23:52 more
  • Django筆記二十五之資料庫函式之日期函式

    本文首發于公眾號:Hunter后端 原文鏈接:Django筆記二十五之資料庫函式之日期函式 日期函式主要介紹兩個大類,Extract() 和 Trunc() Extract() 函式作用是提取日期,比如我們可以提取一個日期欄位的年份,月份,日等資料 Trunc() 的作用則是截取,比如 2022-0 ......

    uj5u.com 2023-04-20 07:23:45 more
  • 一天吃透JVM面試八股文

    什么是JVM? JVM,全稱Java Virtual Machine(Java虛擬機),是通過在實際的計算機上仿真模擬各種計算機功能來實作的。由一套位元組碼指令集、一組暫存器、一個堆疊、一個垃圾回收堆和一個存盤方法域等組成。JVM屏蔽了與作業系統平臺相關的資訊,使得Java程式只需要生成在Java虛擬機 ......

    uj5u.com 2023-04-20 07:23:31 more
  • 使用Java接入小程式訂閱訊息!

    更新完微信服務號的模板訊息之后,我又趕緊把微信小程式的訂閱訊息給實作了!之前我一直以為微信小程式也是要企業才能申請,沒想到小程式個人就能申請。 訊息推送平臺🔥推送下發【郵件】【短信】【微信服務號】【微信小程式】【企業微信】【釘釘】等訊息型別。 https://gitee.com/zhongfuch ......

    uj5u.com 2023-04-20 07:22:59 more
  • java -- 緩沖流、轉換流、序列化流

    緩沖流 緩沖流, 也叫高效流, 按照資料型別分類: 位元組緩沖流:BufferedInputStream,BufferedOutputStream 字符緩沖流:BufferedReader,BufferedWriter 緩沖流的基本原理,是在創建流物件時,會創建一個內置的默認大小的緩沖區陣列,通過緩沖 ......

    uj5u.com 2023-04-20 07:22:49 more
  • Java-SpringBoot-Range請求頭設定實作視頻分段傳輸

    老實說,人太懶了,現在基本都不喜歡寫筆記了,但是網上有關Range請求頭的文章都太水了 下面是抄的一段StackOverflow的代碼...自己大修改過的,寫的注釋挺全的,應該直接看得懂,就不解釋了 寫的不好...只是希望能給視頻網站開發的新手一點點幫助吧. 業務場景:視頻分段傳輸、視頻多段傳輸(理 ......

    uj5u.com 2023-04-20 07:22:42 more
  • Windows 10開發教程_編程入門自學教程_菜鳥教程-免費教程分享

    教程簡介 Windows 10開發入門教程 - 從簡單的步驟了解Windows 10開發,從基本到高級概念,包括簡介,UWP,第一個應用程式,商店,XAML控制元件,資料系結,XAML性能,自適應設計,自適應UI,自適應代碼,檔案管理,SQLite資料庫,應用程式到應用程式通信,應用程式本地化,應用程式 ......

    uj5u.com 2023-04-20 07:22:35 more