2012-04-16 81 views
2

我很難過! D5ent。 我有一個表格上有一打設計時間的SpeedButtons。 我有一個數據集的標題,提示和所有十二個按鈕的字形。 當我運行數據庫時,我可以分配標題,提示,爲字形選擇並存儲位圖。DBImage不以編程方式刷新

當我使用DBNavigator逐步瀏覽時,它正確顯示每個按鈕的每個位圖的單獨DBImage。但是在運行時,並非如此。

我有這段代碼,雖然數據集的步驟,當我ShowModal的形式所有的按鈕都有正確的單獨的標題和提示,但他們都有第一個按鈕相同的字形。

procedure LoadButtons; 
    procedure SetButton(var aBtn : TSpeedButton); 
    begin 
    aBtn.Hint:=tblButtons.FieldByName('Hint').AsString; 
    aBtn.Caption:=tblButtons.FieldByName('Caption').AsString; 
    aBtn.Glyph.Assign(dbimgButton.Picture.Bitmap); 
    end; 
begin 
    tblButtons.First; 
    BtnCtr:=1; 
    repeat 
    case BtnCtr of 
     1 : SetButton(btn1); 
     2 : SetButton(btn2); 
     3 : SetButton(btn3); 
     // ... to twelve 
    end; 
    tblButtons.Next; 
    Inc(BtnCtr); 
    until tblButtons.EOF; 
end; 

end;

我哪裏錯了?我已如果您使用,同時通過數據集循環不更新DisableControls則db感知控件搞砸與更新,自主展示,等的LoadPicture ...

感謝

+0

我不明白。我還沒有收到任何答案。 – user983145 2012-04-16 00:27:13

+3

刪除DisableControls,我不知道'dbimgProgram'是什麼,但是如果它是一個db-aware控件,那麼它不會因爲DisableControls而更新。 – 2012-04-16 00:28:09

+0

AAAArrrggghhhhhh謝謝Sertac。今晚沒有啤酒給我! – user983145 2012-04-16 00:31:29

回答

4

。如果您正在從這樣的控件中分配字形,那麼這就是爲什麼所有按鈕都具有第一條記錄的字形的原因。

+3

+1爲pyschic調試技能。很好的結果,而且OP在你上面的評論中已經說過了。 :) – 2012-04-16 00:39:55

相關問題