可以請問一個問題嗎？ 我要如何做出向WIN的工作列網路連線那種圖示 他有連線會一閃一閃的 是用GIF檔用的嗎？ 我用如何使用內？謝謝

您好: 那是使用多張ICO圖,然後動態根據目前系統現狀去改變所要使用的ico圖示 請參考下面連結 http://delphi.ktop.com.tw/topic.php?topic_id=30275 http://delphi.ktop.com.tw/topic.php?topic_id=38681 或搜尋站內TrayIcon 發表人 - supman 於 2005/05/27 10:27:55

大大妳好～～ 妳給的網址我有去找過 他們都是把圖示加到WIN下得工具列 我是想加到StatusBar上面 可以請問一下！！有什麼方法可以把StatusBar 做的跟WIN的工具列一樣會一閃一閃的嗎？ 謝謝～

您好： 您上面不是就是寫說Win 工作列...?????    如果是TStatusBar的話，請看以下說明與範例： 1.拉一個TImageList放入兩張圖案 2.放一個TStatusBar 3.點兩下StatusBar增加StatusBar的Panel 4.將所增加Panel的Style設為psOwnerDraw 5.拉一個Timer讓他每秒換一次圖. 參考以下程式碼,用delphi寫的,請自行將他改成C++Bulder.

unit Unit1;    interface    uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ImgList, StdCtrls, ComCtrls, ExtCtrls;    type
  TForm1 = class(TForm)
    StatusBar1: TStatusBar;
    Timer1: TTimer;
    ImageList1: TImageList;
    procedure StatusBar1DrawPanel(StatusBar: TStatusBar;
      Panel: TStatusPanel; const Rect: TRect);
    procedure Timer1Timer(Sender: TObject);
    procedure FormActivate(Sender: TObject);
  private
    { Private declarations }
  public
   Index:integer;
  end;    var
  Form1: TForm1;    implementation    {$R *.dfm}    procedure TForm1.StatusBar1DrawPanel(StatusBar: TStatusBar;
  Panel: TStatusPanel; const Rect: TRect);
begin
ImageList1.Draw(StatusBar1.Canvas,Rect.Left 5,Rect.Top 1,Index);
end;    procedure TForm1.Timer1Timer(Sender: TObject);
begin
Inc(Index);
if (Index=2) then Index:=0;
StatusBar1.Repaint();
end;    procedure TForm1.FormActivate(Sender: TObject);
begin
Index:=0;
end;    end.

謝謝大大的講解～我做出來了～ 很抱歉我說的不夠清楚讓妳誤會了！！ 對不起！！ 不過還是很感謝你的幫忙