各位大大，請問為什麼下面獲得系統圖標列表資源在9x下運行正常，但在2000/XP下什麼也無法獲取，   是不是在2000/XP下需要使用其他函數。請指教，謝謝！      

  with Listview1 do
  begin
    SmallImages:=TImageList.CreateSize(16,16);
    SmallImages.ShareImages:=True;
    SmallImages.Handle:=ShGetFileInfoA('*.*',0,SHFileInfo,
    SizeOf(SHFileInfo),
    SHGFI_SMALLICON or
    SHGFI_ICON or
    SHGFI_SYSICONINDEX);
  end;
  

這個在2000/XP下運行後，SmallImages.count是0,什麼圖標也未加入。。。汗 如果不是用上面的函數，那取文件圖標索引的程序要怎麼改？程序如下：

  function GetFileIconIndex(FileName:string):integer;
  var
    Ext:String;
  begin
    Ext:=FileName;
    Result:=ShGetFileInfoA(Pchar(Ext),0,SHFileInfo,SizeOf(SHFileInfo),SHGFI_SMALLICON or SHGFI_SYSICONINDEX or SHGFI_TYPENAME);
    Result:=SHFileInfo.iIcon;
    { 返回獲取的圖標序號 }
  end;
  

======================= 無情劍客多情劍

Hi，jackalan，您好！ 不妨看看deity大大的這篇解答，或許會有幫助(我自己沒有實做過): >人生在勤，不索何獲 <>業精於勤荒於嬉，行成於思毀於隨 <>臨淵羡魚不如退而結網

------
人生在勤，不索何获？

谢谢bigdogchina兄这么快就回答了，我去看过了，他遇到的问题和我一样的，呵呵，但他最后也没解决。。。汗。。。 估计98下用的函数或者结构体和2000/XP下不同，我正在找，如果哪位兄弟做过请指点一下，谢谢！ ======================= 无情剑客多情剑

參考這篇試試: http://www.experts-exchange.com/Programming/Programming_Languages/Delphi/Q_20835351.html    -- 歡迎光臨 KTop 研究苑!

hagar大大,上面的网址我看了半天也不知道看什么???(晕)... ======================= 无情剑客多情剑

以下是 hatchy 回答的部份(紅色部份):

unit Unit1;    interface    uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Registry, Shellapi, StdCtrls, ComCtrls, ExtCtrls;    type
  PHICON = ^HICON;      type
  TForm1 = class(TForm)
    Button1: TButton;
    Image1: TImage;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;    var
  Form1: TForm1;    implementation    {$R *.DFM}    function GetSystemDir: TFileName;
var
  SysDir: array [0..MAX_PATH-1] of char;
begin
  SetString(Result, SysDir, GetSystemDirectory(SysDir, MAX_PATH));
  if Result = '' then
    raise Exception.Create(SysErrorMessage(GetLastError));
end;    procedure GetAssociatedIcon(FileName: TFilename; PLargeIcon, PSmallIcon: PHICON);
// Gets the icons of a given file
var
  IconIndex: word;  // Position of the icon in the file
  FileExt, FileType: string;
  Reg: TRegistry;
  p: integer;
  p1, p2: pchar;
label
  noassoc;
begin
  IconIndex := 0;
  // Get the extension of the file
  FileExt := UpperCase(ExtractFileExt(FileName));
  if ((FileExt <> '.EXE') and (FileExt <> '.ICO')) or
      not FileExists(FileName) then begin
    // If the file is an EXE or ICO and it exists, then
    // we will extract the icon from this file. Otherwise
    // here we will try to find the associated icon in the
    // Windows Registry...
    Reg := nil;
    try
      Reg := TRegistry.Create(KEY_QUERY_VALUE);
      Reg.RootKey := HKEY_CLASSES_ROOT;
      if FileExt = '.EXE' then FileExt := '.COM';
      if Reg.OpenKeyReadOnly(FileExt) then
        try
          FileType := Reg.ReadString('');
        finally
          Reg.CloseKey;
        end;
      if (FileType <> '') and Reg.OpenKeyReadOnly(
          FileType   '\DefaultIcon') then
        try
          FileName := Reg.ReadString('');
        finally
          Reg.CloseKey;
        end;
    finally
      Reg.Free;
    end;        // If we couldn't find the association, we will
    // try to get the default icons
    if FileName = '' then goto noassoc;        // Get the filename and icon index from the
    // association (of form '"filaname",index')
    p1 := PChar(FileName);
    p2 := StrRScan(p1, ',');
    if p2 <> nil then begin
      p := p2 - p1   1; // Position of the comma
      IconIndex := StrToInt(Copy(FileName, p   1,
        Length(FileName) - p));
      SetLength(FileName, p - 1);
    end;
  end;
  // Attempt to get the icon
  if ExtractIconEx(pchar(FileName), IconIndex,
      PLargeIcon^, PSmallIcon^, 1) <> 1 then
  begin
noassoc:
    // The operation failed or the file had no associated
    // icon. Try to get the default icons from SHELL32.DLL        try // to get the location of SHELL32.DLL
      FileName := IncludeTrailingBackslash(GetSystemDir)
          'SHELL32.DLL';
    except
      FileName := 'C:\WINDOWS\SYSTEM\SHELL32.DLL';
    end;
    // Determine the default icon for the file extension
    if      (FileExt = '.DOC') then IconIndex := 1
    else if (FileExt = '.EXE')
         or (FileExt = '.COM') then IconIndex := 2
    else if (FileExt = '.HLP') then IconIndex := 23
    else if (FileExt = '.INI')
         or (FileExt = '.INF') then IconIndex := 63
    else if (FileExt = '.TXT') then IconIndex := 64
    else if (FileExt = '.BAT') then IconIndex := 65
    else if (FileExt = '.DLL')
         or (FileExt = '.SYS')
         or (FileExt = '.VBX')
         or (FileExt = '.OCX')
         or (FileExt = '.VXD') then IconIndex := 66
    else if (FileExt = '.FON') then IconIndex := 67
    else if (FileExt = '.TTF') then IconIndex := 68
    else if (FileExt = '.FOT') then IconIndex := 69
    else IconIndex := 0;
    // Attempt to get the icon.
    if ExtractIconEx(pchar(FileName), IconIndex,
        PLargeIcon^, PSmallIcon^, 1) <> 1 then
    begin
      // Failed to get the icon. Just "return" zeroes.
      if PLargeIcon <> nil then PLargeIcon^ := 0;
      if PSmallIcon <> nil then PSmallIcon^ := 0;
    end;
  end;
end;    procedure TForm1.Button1Click(Sender: TObject);
var
  SmallIcon: HICON;
begin
  GetAssociatedIcon('c:\1.bmp', nil, @SmallIcon);
  if SmallIcon <> 0 then
    Image1.Picture.Icon.Handle := SmallIcon;
end;    end.

-- 歡迎光臨 KTop 研究院!

hagar兄,您误会我的意思了. 上面的方法不是我要的那种,我需要得到系统图标资源,在根据文件在系统中注册的索引号显示图标.其实就是做资源管理器需要的,上面的方法要不断向IMAGELIST里ADD,重复的也加如会撑死IMAGELIST. ======================= 无情剑客多情剑

改成如下試試:

  with Listview1 do
  begin
    SmallImages:=TImageList.CreateSize(16,16);
    SmallImages.ShareImages := True;
    SmallImages.Handle := ShGetFileInfoA('c:\', 0, SHFileInfo,
      SizeOf(SHFileInfo),
      SHGFI_SMALLICON or SHGFI_ICON or SHGFI_SYSICONINDEX);
  end;

-- 歡迎光臨 KTop 研究院!

hagar大大，我把上面的代码复制到单元中，编译不能通过，错误信息是“"("excepted but "," found”，请问是哪里出了问题？ 兵临城下，快活如故。

------
兵临城下，快活如故。

delphi不是有內建範例去doms 看看把

废话！ 我就是不懂才来这里请教。你全看DEMO，还跑来这里做什么？ 兵临城下，快活如故。

------
兵临城下，快活如故。

废话！ 我就是碰到问题才来这里请教。你全看DEMO，还跑来这里做什么？ 兵临城下，快活如故。

------
兵临城下，快活如故。

favinc 兄 好兇阿 我怕怕 怪怪 我只說 內建有範例 並無指名你 請問一下 這是討論區 還是你的一問一解區阿 難到如一般的網友 不可知有內建範例之說嗎? 你知道的不代表別人知道 就像我以前也不知道阿 這樣也會被favinc 兄 回應這種口吻 只求解答不知討論與分享日後有需之人的問者 真是 遇到兵 有理說不清 遇到火鳥功 算了 下次庵帶滅火器 順便告知大家別看DEMO喔 favinc 兄 好凶阿 我怕怕 怪怪 我只说 内建有范例 并无指名你 请问一下 这是讨论区 还是你的一问一解区阿 难到如一般的网友 不可知有内建范例之说吗? 你知道的不代表别人知道 就像我以前也不知道阿 这样也会被favinc 兄 响应这种口吻 只求解答不知讨论与分享日后有需之人的问者 真是 遇到兵 有理说不清 遇到火鸟功 算了 下次庵带灭火器 顺便告知大家别看DEMO喔

???怎么我的帖子里好像在吵架？？？@#%$#%^$&^$&^&*&^*&^ 不要吵啦～～～天上掉钱啦。。。去拣钱啊。。。。。。 ======================= 无情剑客多情剑

jackalan 兄 你好  

引言: ???怎么我的帖子里好像在吵架？？？@#%$#%^$&^$&^&*&^*&^

首先在你問的討論中發生此是 我亦非常無奈 雖有抱歉之意 但我仍不得如此 1 所謂妳的帖子 不代表不能有其他討論或玄外之音 KTOP不是你的亦不是我的 但所謂的風範是必須維持的 這KTOP該不會是 解題時很多情 看不慣時很無情 哈哈 2 劣者的輕描淡寫的回應 確換回favinc 兄的誤解 你的不公 3 當下次 jackalan 兄當一位回應人時 最好了解自己的可容性是否如比別人清高

引言: 不要吵啦～～～天上掉钱啦。。。去拣钱啊。。。。。。

這樣的回應 不管是對 favinc 兄 或劣者 都是一種侮辱 4 不希望看到口水 但不能因為怕口水就不自清 這就是我的寫照 問者的自私心態 與 挑釁者的自卑感做祟 和 自清者的熱情,衝動,反駁 在此表露無遺 哈哈 哈哈哈 不能因為怕事 所以就不做事把 更不能因為怕壞人 就不處理做壞事之人 孟子滕文公篇第三說：『居天下之廣居、立天下之正位、行天下之大道，得志，與民由之 ；不得志，獨行其道。富貴不能淫、貧賤不能移、威武不能屈，此之謂大丈夫。』 KTOP 站務看來又快要被上鎖此文啦 哈哈 哈哈哈

jackalan  兄 你也好棒阿 好火爆 亦在別人帖子火爆喔 哈哈 哈哈哈 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=48753 舊文回顧一下 記憶尤新耶  對於上文中的 qoo 版主 你所謂的

引言:qoo1234先生，不要动不动就拿版规来，相信在KTOP里的人这点觉悟还是有的，如果一有反面意见就拿版规来，我觉得应该学习的是您。按照您的意思是不是什么反面意见都不能提，只要有人发表文章就要双手赞成？否则就要版规处置，对于我刚说了不到两句就拿出版规来，我感到非常失望

請問一下 那版規何用 何須版規 劣者再此順便幫qoo 贊聲 你的自我心態比劣者尤之 不削之也 哈哈不要 只許官兵點火 不許百姓點燈 conundrum 人如其名 不好攪也 哈哈 哈哈哈 艾艾艾 沒辦法 劣者的劣根性 怎麼又跑出來了冽 [h1] 哈哈 哈哈哈 我就喜歡 哈哈 哈哈哈 /h1] 哈哈 哈哈哈 以前祝興用之 在此用 變成 動詞 你是不是也很冤枉阿 那劣者不是嗎? 有沒有被侮辱的感覺 有沒有被誤解的感覺 [> 嗆聲之前 先秤斤兩 圍事之前 先論公平 / >了 哈哈 站務組

網海波濤難免，見仁見智，不是在選舉，不用再流口水...    網海無涯，唯學是岸！

conundrum，我只不过看到有个新简讯，一点就看到我发问的帖子来了，我也没有责怪任何人，只是多嘴劝和而已，你怎么那么多废话！我和别人有什么问题、好不好还轮不到你在这说３道４的，先把你自己管好。    我说了什么？你反而针对我？。。。不想和你多说了，请版主锁了这个文章，免得某些人没事找事。就算火气大怎么也不能出到我头上啊，真搞不懂，感觉你是不是老找麻烦的，我好像平时和你没有任何接触吧，网路上和社会是一样的，你最好只管你自己，少管闲事，你自己也不见得怎么样。 ======================= 无情剑客多情剑 發表人 -

喔 原來這是勸和是阿 怪怪 你的說法和要3歲小孩要相信你一樣耶 ???怎么我的帖子里好像在吵架？？？@#%$#%^$&^$&^&*&^*&^ 不要吵啦～～～天上掉钱啦。。。去拣钱啊。。。。。。 ======================= 无情剑客多情剑 那庵的不等於是勸世之文了 我針對你 攪清楚狀況在勸和 我只是勸世類 你都覺的委屈了 怪怪 你是聖人喔 找你麻煩 你怎不說你是非不清阿 問我管好自己 我就是看到你自己也沒管好 所以順便把你的舊文一並po上 自我檢討阿 哈哈 哈哈哈 網路和社會一樣的 喔 那怎不見你的管好自己理論 我好想看看你管自己如何耶 怪怪 說也很奇怪 那來KTOP的人不也如你說的 多管閒事之人 更怪的是還求 多管閒事之人教他解惑耶 別有求於人時 貴的如聖人 遇到鐵板時 靠么如吠犬 沒有 理 字 別說你是來勸和了 裝囂ㄟ

我看你是心理变态，说我吠？我看你妈妈没教好你，到处咬人。 ======================= 无情剑客多情剑

喔喔喔 jackalan 兄的水準越來越低了 哈哈 哈哈哈 低到連媽字級的 都喊出話來 ㄟㄟㄟ 像個男人好嗎 哈哈 哈哈哈

conundrum，少兄兄的，谁是你兄，你配吗？猪

http://delphi.ktop.com.tw/topic.php?TOPIC_ID=53666    是是是 下次請不要與豬討論喔 哈哈 哈哈哈  

 bigdogchina、conundrum、qoo1234三位大大，实在是太感谢了，我已经开始有头绪了，如果能够搞定一定将代码贴上KTOP的，最感谢的是bigdogchina大大，提供了很多有用的资料，谢谢您。

豬阿豬 你還真出名 可被罵亦可成大大 豬阿豬 小心大大為前 腳後為豬 哈哈 能與豬對談的 應該也是豬把 豬阿豬 還真好耶

我們登錄別人的站臺，應該懷著一顆打攪別人的謙和之心，試著熟悉別人的語言，風土，人文習慣。難道我們忘了CSDN上的同黨伐異，大富翁上的人身攻擊。KTop上的良好氛圍是無數先進們營造出來的，前人栽樹，後人乘涼。favinc，jackalan，你們的話語讓我不齒。人貴有自知之明，請自重。    http://www.zanmei.net/bbs/announcement.php?id=28&sid=3qGjn1#28 << zt: 虛擬社區的十個基本禮節 >>     禮節一：記住別人的存在      互聯網給予來自五湖四海人們一個共同的地方聚集，這是高科技的優點但往往也使得我們面對著電腦銀屏忘了我們是在跟其他人打交道，我們的行爲也因此容易變得更粗劣和無禮。因此《網路禮節》第一條就是“記住人的存在”。如果你當著面不會說的話在網上也不要說。         禮節二：網上網下行爲一致     在現實生活中大多數人都是遵法守紀，同樣地在網上也同樣如此。網上的道德和法律與現實生活是相同的，不要以爲在網上與電腦交易就可以降低道德標準。         禮節三：入鄉隨俗     同樣是網站，不同的論壇有不同的規則。在一個論壇可以做的事情在另一個論壇可能不宜做。最好的建議：先爬一會兒牆頭再發言，這樣你可以知道罎子的氣氛和可以接受的行爲。         禮節四：尊重別人的時間和帶寬      在提問題以前，先自己花些時間去搜索和研究。很有可能同樣問題以前已經問過多次，現成的答案隨手可及。不要以自我爲中心，別人爲你尋找答案需要消耗時間和資源。         禮節五：給自己網上留個好印象     因爲網路的匿名性質，別人無法從你的外觀來判斷，因此你一言一語成爲別人對你印象的唯一判斷。如果你對某個方面不是很熟悉，找幾本書看看再開口，無的放矢只能落個灌水王帽子。同樣地，發帖以前仔細檢查語法和用詞。不要故意挑釁和使用髒話。         禮節六：分享你的知識     除了回答問題以外，這還包括當你提了一個有意思的問題而得到很多回答，特別是通過電子郵件得到的以後你應該寫份總結與大家分享。         禮節七：平心靜氣地爭論      爭論與大戰是正常的現象。要以理服人，不要人身攻擊。         禮節八：尊重他人的隱私      別人與你用電子郵件或私聊(ICQ/QQ)的記錄應該是隱私一部分。如果你認識某個人用筆名上網，在論壇未經同意將他的真名公開也不是一個好的行爲。如果不小心看到別人打開電腦上的電子郵件或秘密，你不應該到處廣播。         禮節九：不要濫用權利     管理員版主比其他用戶有更多權利，應該珍惜使用這些權利。        禮節十：寬容     我們都曾經是新手，都會有犯錯誤的時候。當看到別人寫錯字，用錯詞，問一個低級問題或者寫篇沒必要的長篇大論時，你不要在意。如果你真的想給他建議，最好用電子郵件私下提議。    ================================= 人生在勤，不索何獲 業精於勤荒於嬉，行成於思毀於隨 臨淵羡魚不如退而結網

------
人生在勤，不索何获？

你有没看清楚啊，谁先攻击谁啊？ 我发了个： “???怎么我的帖子里好像在吵架？？？@#%$#%^$&^$&^&*&^*&^ 不要吵啦～～～天上掉钱啦。。。去拣钱啊。。。。。。” 他就发回来： “別有求於人時 貴的如聖人 遇到鐵板時 靠么如吠犬” 吠犬？是他先骂人的，反而怪我？ “哈哈不要 只許官兵點火 不許百姓點燈” 我看你没一句像人话的。 “我們登錄別人的站臺”，你搞没搞错，谁登陆谁的站台啊，不要台湾的就帮着台湾说话，不讲理啊！ ......蛇鼠一窝。

你有沒看清楚啊，誰先攻擊誰啊？ 我發了個： “???怎?我的帖子裏好像在吵架？？？@#%$#%^$&^$&^&*&^*&^ 不要吵啦～～～天上掉錢啦。。。去揀錢啊。。。。。。” 他就發回來： “別有求於人時 貴的如聖人 遇到鐵板時 靠?如吠犬” 吠犬？是他先罵人的，反而怪我？ “哈哈不要 只許官兵點火 不許百姓點燈” 我看你沒一句像人話的。 “我們登錄別人的站臺”，你搞沒搞錯，誰登陸誰的站臺啊，不要臺灣的就幫著臺灣說話，不講理啊！ ......蛇鼠一窩。 事實勝於雄辨 劣者在此篇只回應 delphi不是有內建範例去doms 看看把 ---a這樣有錯嗎 朝來favinc 的自卑感攻擊 讓我莫名無奈所以就無理性的回應 但是後來的 jackalan 問者卻po “???怎?我的帖子裏好像在吵架？？？@#%$#%^$&^$&^&*&^*&^ 不要吵啦～～～天上掉錢啦。。。去揀錢啊。。。。。。” 在下面惡罵中說 他是在勸和的 劣者認為 跟本是鬼話連篇 當然在火氣大時 雙方都惡言相向 不過另我感到 jackalan 不但比 favinc 可惡更是自圓其說的人物 整件事原本於jackalan 無關 但他的勸和之說 如果認同的話 還真是沒天理喔 jackalan 說台灣人幫台灣人說話 那我還不知道 當時他的勸和是幫 China jackalan 不但事後改了國籍並大呼說台灣人幫台灣人說話 怪怪 整件事 劣者是有不當的地方 但是被莫名其妙的惡言不能自清 而所謂的勸和之人的說法 那到不如 惡言以對 因為要勸架 最少的公平做不到 那叫護短 網路上這樣的人 多如過江之鮼 在看笑話之餘 也讓KTOP部份的違君子 問答真相表露無遺 事實上劣者的舉證 有關jackalan 如何表理不一 是一種手段亦也是看清 所謂 不攻自破的方法 雖然說這樣的手法過於低俗 但也是jackalan 無法對自己言論反駁的方式 雙方叫囂本來就是 狗咬狗的狀態 不過 jackalan 的水平也太高級 連媽字級的都出籠 你還能說啥 有些話 jackalan 自己都無法交代 只能出其非自己的罵人方式 如 媽 兄 等 阿 還能如何 如果網路像社會 那社會應該也有和人吵架把 吵歸吵 連媽字都出來 可見 所謂的 高科技水準之人 程式設計工程師 差阿 最後的蛇鼠一ㄛ 和豬差不多 這也就是我說 連罵人的藝術也不懂 在吵也只是 動物奇談 跟本不知 原因為何 為何而爭 bigdogchina 兄 劣者在此 向你致歉 劣者的醜態 雖玷污此篇 但真所求不多 清者自清 濁者自濁 bigdogchina 兄不愧為 大丈夫 無懼無賴之惡 劣者 可向 jackalan 致歉 不過前題是 先解釋 1 delphi不是有內建範例去doms 看看把 這樣有錯嗎 2 “???怎?我的帖子裏好像在吵架？？？@#%$#%^$&^$&^&*&^*&^ 不要吵啦～～～天上掉錢啦。。。去揀錢啊。。。。。。” 這樣是勸和 和之那來也 /////////////////////////////////////// 你有?看清楚啊，?先攻??啊？ 我?了?： “???怎么我的帖子里好象在吵架？？？@#%$#%^$&^$&^&*&^*&^ 不要吵啦～～～天上掉?啦。。。去??啊。。。。。。” 他就?回?： “?有求于人? ?的如圣人 遇到?板? 靠么如吠犬” 吠犬？是他先?人的，反而怪我？ “哈哈不要 只?官兵?火 不?百姓??” 我看你?一句像人?的。 “我?登??人的站台”，你搞?搞?，?登??的站台啊，不要台?的就??台???，不?理啊！ ......蛇鼠一?。 事?胜于雄辨 劣者在此篇只?? delphi不是有?建范例去doms 看看把 ---a??有?? 朝?favinc 的自卑感攻? ?我莫名?奈所以就?理性的?? 但是后?的 jackalan ?者?po “???怎么我的帖子里好象在吵架？？？@#%$#%^$&^$&^&*&^*&^ 不要吵啦～～～天上掉?啦。。。去??啊。。。。。。” 在下面??中? 他是在?和的 劣者?? 跟本是鬼??篇 ?然在火气大? ?方都?言相向 不?另我感到 jackalan 不但比 favinc 可?更是自?其?的人物 整件事原本于jackalan ?? 但他的?和之? 如果?同的? ?真是?天理喔 jackalan ?台?人?台?人?? 那我?不知道 ??他的?和是? China jackalan 不但事后改了?籍并大呼?台?人?台?人?? 怪怪 整件事 劣者是有不?的地方 但是被莫名其妙的?言不能自清 而所?的?和之人的?法 那到不如 ?言以? 因?要?架 最少的公平做不到 那叫?短 网?上??的人 多如?江之鮼 在看笑?之余 也?KTOP部份的?君子 ?答真相表露?? 事?上劣者的?? 有?jackalan 如何表理不一 是一种手段亦也是看清 所? 不攻自破的方法 ?然???的手法?于低俗 但也是jackalan ?法?自己言?反?的方式 ?方叫?本?就是 狗咬狗的?? 不? jackalan 的水平也太高? ??字?的都出? 你?能?啥 有些? jackalan 自己都?法交代 只能出其非自己的?人方式 如 ? 兄 等 阿 ?能如何 如果网?像社? 那社???也有和人吵架把 吵?吵 ??字都出? 可? 所?的 高科技水准之人 程序??工程? 差阿 最后的蛇鼠一ㄛ 和?差不多 ?也就是我? ??人的??也不懂 在吵也只是 ?物奇? 跟本不知 原因?何 ?何而? bigdogchina 兄 劣者在此 向你致歉 劣者的丑? ?玷污此篇 但真所求不多 清者自清 ?者自? bigdogchina 兄不愧? 大丈夫 ????之? 劣者 可向 jackalan 致歉 不?前?是 先解? 1 delphi不是有?建范例去doms 看看把 ??有?? 2 “???怎么我的帖子里好象在吵架？？？@#%$#%^$&^$&^&*&^*&^ 不要吵啦～～～天上掉?啦。。。去??啊。。。。。。” ??是?和 和之那?也

請站長鎖住本主題！ 網海無涯，唯學是岸！

conundrum，你罗嗦够了没，好任你狠，你强，我们都是伪君子，你是真君子，整天之乎者也，以为自己水平多高，我是带了妈，但怎么也比你骂人不带脏字的烂人强。我想骂就骂，像你这种不知廉耻的东西就该骂。 跑到别人的贴子了犬吠，KTOP是有很多伪君子，但你连这个都不配，你只是个人渣、垃圾，少拽了！有种你别拖bigdogchina、conundrum、qoo1234他们啊，集体攻击啊，现在就是看你不顺眼，别人一句都不能说。看看你的资料里写的，favinc就是说了一句话，竟而在资料里写这个是“一言堂，不然就找K”，这不是你写的吗？ 整天装的好像多清高，其实最狗屎就是你这种人渣，发那么多字干吗？你省省吧，KTOP有很多伪君子不要紧，但有这么多所谓5星级会员、版主才累。 精英，你是KTOP里的精英，我们都是小人，你最伟大，惹不起躲的起，不来KTOP就是，让你这种烂货嚣张就是，反正错对都是帮你的。那些不分青红皂白的人，你们看全帖子没，谁斗事？人渣

本討論區為技術論壇 非口水論戰討論區 請各位會員自制 本篇上鎖 ～～～Delphi K.Top討論區站長～～～

------
～～～Delphi K.Top討論區站長～～～

在此向各位網友致歉 整個事件 我是事主之一 本一求自清之說到此也該告一段落 今天的致歉理由 1 此討論區是以程式討論為主 2 jackalan 雖惡言相向 我不再討論他的勸說之內容 年齡素養仍為借鏡於他人 3 討論之中如上雖以程式為主 但做人之道乃無時不刻學之 4 漫罵之屈雖為辱 但將心比之 對jackalan 我是有過火之處 在此先向jackalan 先禮行之 不過仍是強調一點 理與禮 公與平 5 人非聖賢 量力而為之 道歉亦也 輕而易舉 6 一言堂之說 對一般人看來確是不妥 但卻也只是個人資料非po此篇中 其作用動機亦不需再論 我會修改不雅之處 但不會刪除此聯結 KTOP 是天使凝聚的分享的資產 亦是眾好聚之也 事實勝於雄辨 世態炎涼,冷暖自知 無奈 無可行 無不可行之 個人雖知 天使 縱有不悅之處 但吾方向無誤 EQ有錯矣 只是一時難耐好心換惡語 衝動過火 抱歉了

诸君来者，或为进一步巩固技术之余助他人排忧解难者，或为遇疑惑寻求解答者。且不论技术水平的高下，如能凭已之所学解求教者一时之顿惑，也未尝不是人生修为的提升和专业操守的良好体现。 所谓程序人生，大概是说想能有什么样的人品，就能写出什么样的程序罢！ 经过一轮言语的礼尙往来之后，更是见仁见智，见德见行也！ 在此谨向热心卓识之士致以敬意！ 热情助人，低调做人吧！ 兵临城下，快活如故。

------
兵临城下，快活如故。