unit uformatdisplay;
inte***ce
uses
db,dbgrideh,sysutils,classes;
procedure setdisplayformat(adataset:tdataset);
procedure setmoneycol(agrid:tdbgrideh;afieldname:string);
implementation
procedure setmoneycol(agrid:tdbgrideh;afieldname:string);
vari:integer;
begin
agrid.chncurrencystyle.zeroempty:=false;
for i:=0 to agrid.columns.count-1 do
begin
with agrid do
begin
if columns[i].fieldname=afieldname then
begin
columns[i].displaychncurrency:=true;
columns[i].displayzero:=true;
end;
end;
end;
end;
procedure setdisplayformat(adataset:tdataset);
vari:integer;
begin
for i:=0 to adataset.fieldcount-1 do
begin
with adataset do
begin
if fields[i] is tbcdfield then
(fields[i] as tbcdfield).displayformat := '###,##0.00';
end;
end;
end;
end.
QT中設定QTreeWidget某一列可編輯
大家都知道，在qt中，qtreewidget都是qtreewidgetitem的形式來組織的，也就是說如果單獨設定屬性的話，可以使得某一行可以編輯或者不可編輯 qtreewidgetitem setflags qt itemisenabled qt itemisselectable qt itemi...
PB 資料視窗設定列自動折行 多行顯示
如何在datawindow中實現列的自動折行 我們在powerbuilder應用程式的開發過程中,使用datawindow時,經常會遇 到某列的資料太長,不能同時全部顯示的情況.若採用自動水平滾動,操作起 來又不夠簡便.下面介紹一種方法,實現列資料多行顯示,即實現列資料的自 動折行.具體步驟如下 1...
bootstraptable設定列的寬度width
給table標籤設定 table layout fixed word break break all 這兩個樣式，如下圖 然後，設定width，就可以了。重要實踐經驗！width建議取50的整倍數，最終每列的寬度並不是自己寫的值，而是按照倍數均分的寬度。效果如下 解釋 table layout fi...