照片播放器 - 桌面版

bruce0829 · 发表于 2011-1-13 14:44:41

1.修正前版無法讀取以中文命名的 *.jpg 檔名問題 (感謝同事發現並反應給我)
2.修正前版在程式執行時, 無法隱藏底下 TASK BAR 上的 Application ICON 的問題 (跟 Delphi 的處理手法不大相同)
3.還沒找到如何在 WINDOWS 7 下開機後, 自動啟動本程式的方法 (XP 可以)

執行檔同目錄中若沒有其它 *.jpg 檔, 就播放內定鳥圖, 若執行檔同目錄中有其它 *.jpg 檔 (如你的家庭生活照), 本程式就播放你的照片 ; 執行檔可放在任一目錄中 , 例如你把這支程式跟你的照片 , 全部都放在 c:\my_photo\*.* 中 ; 在 XP 下執行過一次本程式後, 下次電腦重開機會自行啟動本程式 , 但在 WINDOWS 7 下無效 ...

http://digitraveler.homelinux.com/down_load/LazCamaraS95.zip

bruce0829 · 发表于 2011-1-13 17:22:06

人數計數器好像一直都有問題
每次看到人數 COUNTER 都沒動, 就覺得很灰心,
這表示寫的東西都沒人要看

haojielyb · 发表于 2011-1-13 22:25:35

怎么下载呢？

猫工 · 发表于 2011-1-14 09:03:12

楼主似乎忘记放下载地址了

haojielyb · 发表于 2011-1-15 15:08:54

看见这个估计是附件的问题

slmrj · 发表于 2011-1-17 13:42:00

看看看.一定要看的

sesamehch · 发表于 2011-3-3 12:34:11

学习一下,不知道在其他平台试过没?

sail2000 · 发表于 2011-3-11 14:39:30

一个修正，因为我在我的简体中文XP系统，debug到的中文文件名是“？？？”这种形式，所以，改为这个：
//Lazsub2010.pas
//procedure _GetFileList
...
if FindFirst(Utf8ToAnsi(sour_path+sour_file),faAnyfile,FileRec) = 0 then //2010/09/15 加入 utf8toansi()
repeat
   if ((FileRec.Attr and faDirectory) = 0) then
      begin
         //TmpList.Add(sour_path+FileRec.Name);
         TmpList.Add(sour_path+AnsiToUtf8(FileRec.Name)); //修正
      end;
until FindNext(FileRec)<>0;

		自动登录	找回密码
密码			立即注册（注册审核可向QQ群索取）

照片播放器 - 桌面版

本帖子中包含更多资源

评分

回 3楼(猫工) 的帖子