procedure tfrmmain.setskin(skinnam:string);
var
hinst:thandle;
rstream:tresourcestream;
begin
hinst:=loadlibrary('allsk.dll');
if hinst=0 then
exit
else
begin
rstream:=tresourcestream.create(hinst,skinnam,'mys kin');
dxskinsuserskinloadfromstream(rstream);
dxskincontroller1.nativestyle:=false;
dxskincontroller1.useskins:=true;
end;
end;
一. delphi的主選單: project -> modify skin options ,彈出project skin options
editor 對話方塊,從列表中,只選擇: userskin這一項,取消enable skin support的勾,
點ok退出. (注意:此步驟需dev40以上版本才有效)
二. 從dev express 項下選擇dxskincontroller控制項,新增到工程,設定dxskincontroller1的skinname屬性設為:userskin ;
三. **:(對res**有效,在程式資料夾裡需要先建乙個叫skin的資料夾)
DevExpress 面板使用方法
第一步讓所有窗體都從devexpress.xtraeditors.xtraform繼承。第二步 新增兩個引用 devexpress.bonusskins.v9.2 devexpress.officeskins.v9.2 第三步 在軟體的入口program類的main函式的第一行 前加上 devexp...
Devexpress 進度條面板設定
devexpress 控制項中,進度條控制項為 progressbarcontrol,在資料型控制項中進度條為 repositoryitemprogressbar.樣式或者 進度控制項 的預設顏色是無法直接更改的 因為顯示的優先是樣式和 只有設定不使用預設主題就可以進行改變了 progressbar...
DevExpress的XtraReport使用積累
1 form裡新增printingsystem和printbarmanager控制項。工程中另行建立xtrareport class,此專案為報表實體,其上可以insert band report header出現在第一頁開頭,report footer出現在最後一頁,detail頁內容,pager...