波多在线播放_激情深爱五月_久久欧美精品_成人超碰_国产久_www.pixiv.moe

以文本方式查看主題

-  曙海教育集團(tuán)論壇  (http://www.022-oo.cn/bbs/index.asp)
--  WinCE應(yīng)用開發(fā)  (http://www.022-oo.cn/bbs/list.asp?boardid=35)
----  我的 ARM-WinCE 編程探索之旅（二）  (http://www.022-oo.cn/bbs/dispbbs.asp?boardid=35&id=1807)
--  作者：wangxinxin
--  發(fā)布時間：2010-11-26 10:04:49
--  我的 ARM-WinCE 編程探索之旅（二）
前幾天，我的HP 1715終于修好了，重新?lián)Q了塊屏，解決了觸屏失靈及自己拆機(jī)把背光弄沒的問題（在 pdafans 上詢問多日，毫無結(jié)果）。我的編程探索又可以繼續(xù)了。
經(jīng)過多次測試，找到了使用 FPC（Free Pascal Compiler）加 SDL（SImple DirectMedia Layer）進(jìn)行 ARM-WinCE 圖象編程的途徑（最終，建立過程中還是不得不借助于M$的開發(fā)工具eVC）。

1、從 http://www.libsdl.org/download-1.2.php 下載最新的 SDL 1.2.13 源碼，解壓其中 src 和 include 到 c:\\，解壓其中 visualce.zip 到 c:\\VisualCE。

2、下載并安裝eMbedded Visual C++ 4.0（同時附帶安裝了Platform SDK），運行，打開WorkSpace文件 c:\\VisualCE\\*.vcw，修改工程配置為 arm4,release，然后 Build SDL.DLL，生成 ARM-WinCE 下用的 SDL.DLL，約220K大小，將 SDL.DLL 拷入 PPC。

3、從 http://www.hu.freepascal.org/lazarus/ 下載并安裝最新的 Lazarus + fpc 2.2.5 win32 -> arm wince。修改 \\lazarus\\fpc\\2.2.5\\source\\packages\\sdl\\src\\sdl.pas 的源碼，注釋掉連續(xù)的多個 *getenv 和 *putenv 二函數(shù)，再用 ppcrossarm.exe 編譯 sdl.pas，得到libimpsdl.a、sdl.o、sdl.ppu三個文件，覆蓋原 \\lazarus\\fpc\\2.2.5\\units\\arm-wince\\sdl\\ 下的文件。

至此，F(xiàn)PC+SDL的WinCE圖形編程環(huán)境構(gòu)建完成。

接下來，將前些日子根據(jù) PGCC 示例用 FPC 改寫的一個簡單的桌面版 SDL 測試程序，重新用 ppcrossarm.exe 編譯，生成的EXE文件大小為82K，只導(dǎo)入了額外的 SDL.DLL（前面已經(jīng)放入PPC），在PPC上運行通過。運行時會先出現(xiàn) SDL 初始化的控制臺窗口，顯示一些視頻信息（桌面版的SDL也是如此，類似于dosbox的運行），其運行結(jié)果是每秒20次在全屏幕上顯示隨機(jī)大小、隨機(jī)顏色的方塊，按任意鍵或觸筆點擊退出。

下面是昨天晚上最后的程序源碼（在事件查詢循環(huán)上好像有點邏輯問題，有時候退不出程序，待修正）：
  1. program Test;
  2. uses windows, sysutils, sdl;

  4. var
  5.         screen: PSDL_Surface;
  6.         event: TSDL_Event;
  7.         draw_count:int64=0;
  8.         done:boolean;
  9.         l,t:integer;

  11. procedure Draw_Box(screen:PSDL_Surface; x,y,w,h:dword; r,g,b:dword);
  12. var
  13.         p:PByte;
  14.         p2:PWord;
  15.         i,j:dword;
  16.         c:dword;
  17. begin
  18.         if SDL_MUSTLOCK(screen) then begin
  19.                 if SDL_LockSurface(screen) < 0 then exit;
  20.         end;

  22.         c := SDL_MapRGB(screen^.format, R, G, B);
  23.         assert (screen^.format^.BytesPerPixel=2);
  24.         p := screen^.pixels + y*screen^.pitch + x*screen^.format^.BytesPerPixel;
  25.         for j:=1 to h do begin
  26.                 p2:=PWord(p);
  27.                 for i:=1 to w do begin
  28.                         p2^:=c;
  29.                         inc(p2);
  30.                 end;
  31.                 inc(p,screen^.pitch);
  32.         end;

  34.         if SDL_MUSTLOCK(screen) then SDL_UnlockSurface(screen);
  35.         SDL_UpdateRect(screen, x, y, w, h);
  36. end;

  38. procedure HandleKey(key: TSDL_KeyboardEvent);
  39. begin
  40.         done:=true;
  41. end;

  43. //main at here
  44. begin
  45.         SDL_Init(SDL_INIT_VIDEO or SDL_INIT_AUDIO);
  46.         screen := SDL_SetVideoMode(320, 240, 16, SDL_HWSurface);
  47.         SDL_WM_SetCaption(\'My SDL\',nil);

  49.         while not done do begin
  50.                 //Set_Pixel(screen,random(320),random(240),random(255),random(255),random(255));
  51.                 l:=random(320-40);
  52.                 t:=random(240-30);

  54.                 Draw_Box(Screen,l,t,random(320-40-l)+41,random(240-30-t)+31,random(255),random(255),random(255));
  55.                 inc(draw_count);
  56.                 while SDL_PollEvent(@event)<>0 do begin
  57.                               case event.type_ of
  58.                               SDL_MouseButtonDown,
  59.                                 SDL_QUITEV, SDL_KEYDOWN,SDL_KEYUP: done := true;
  60.                                       //handleKey(event.key);
  61.                         end;
  62.                 end;
  63.                 SDL_Delay(50);
  64.         end;

  66.         SDL_Quit();
  67. end.
復(fù)制代碼
接下來打算搞點有實際用處的程序，比如說一個文本閱讀器，使用24點陣字體；還要嘗試是否能將一些 sdl 輔助庫（比如：SDL_Mixer）編譯成 ARM-WinCE 可用的 DLL。
主站蜘蛛池模板： 自偷自拍三级全三级视频 | 日本黄页免费 | 轻轻啪在线视频播放 | 日日舔夜夜摸 | 亚洲成人黄色在线 | 欧美黄色网 | 素人视频在线观看免费 | 97青青青国产在线播放 | 毛片av网 | 日本中文字幕一区二区有码在线 | 久久精品国产99国产精品澳门 | 国产精品久久久久无码人妻 | jizz.日本 | 久久久久99| 欧美第一色 | 黄色a视频 | 久久99精品久久 | 韩国精品免费视频 | 欧美视频观看 | 日韩中文字幕一区二区三区 | 亚洲天堂欧美在线 | 凹凸日日摸日日碰夜夜爽孕妇 | 欧美电影在线观看网站 | 成人免费激情视频 | 中国一级特黄真人毛片 | 亚洲欧美一区二区三区国产精品 | 国产片翁熄系列乱在线视频 | 亚洲综合久久1区2区3区 | 亚洲视频一区在线 | 亚洲伊人成综合网 | 免费观看黄色a一级视频播放 | 99人中文字幕亚洲区 | 国产一区欧美 | 欧美三级不卡 | 2020国产精品视频免费 | 国产精品第三页在线看 | 精品成人A片久久久久久船舶 | 精品国产一区二区 | 婷婷综合激情五月中文字幕 | 在线观看亚洲一区 | 玖草在线播放 |