Re: [indopb] Gmn Add ActiveSkin dg Script?

Wed, 22 Jun 2011 17:18:18 -0700



oh... itu karena MDI ga bakal bisa dipake lagi kalo ada object didalemnya..
coba aja bikin MDI trus taro button atau textbox atau label.. :D

solusinya kita set ulang mdi nya
bisa taro ini di  event window resize nya

--------------------------------
int nWidth, nHeight

nWidth  = this.WorkSpaceWidth  ( )
nHeight = this.WorkSpaceHeight ( )

mdi_1.move(0,110) // muevo el mdi a la posicion
mdi_1.Resize (nWidth, nHeight )  // Resize del mdi

--------------------------------


atau bisa jg dilihat di sini yg pernah saya email (yg pb_Skin_Mdi.zip)
http://xa.yimg.com/kq/groups/1666100/1640007456/name/pb_Skin_Mdi.zip
http://groups.yahoo.com/group/indopb/attachments/folder/2039148924/item/list





[email protected] wrote:
 

Thanks mas hermawan atas infonya,stlh saya oke, tp wkt sy add d MDI saya panggil Form child kok g muncul ya?

Powered by Telkomsel BlackBerry®

From: Hermawan Dephe <[email protected]>
Date: Wed, 22 Jun 2011 13:44:56 +0700
Subject: Re: [indopb] Gmn Add ActiveSkin dg Script?

 

pake regsvr32 mas
saat bikin instalasi (misal pake setupbuilder) kan biasanya ada option register component, tinggal centang aja

ato bisa bikin batchfile (file text dengan extensi .bat)
yg isinya regsvr32 "lokasi\actskin4.ocx" /s  --> silent (optional)



[email protected] wrote:

 

Thanks mas Hermawan,gmn caranya agar tanpa instal Active Skin (copy activeskin.OCX) kompi yg kita tempelin hasil deploynya bisa jalan?

Powered by Telkomsel BlackBerry®

From: Hermawan Dephe <[email protected]>
Date: Wed, 22 Jun 2011 13:16:49 +0700
Subject: Re: [indopb] Gmn Add ActiveSkin dg Script?

 

Caranya ditempelin dulu OLE nya mas ke window
Insert OLE - Insert Control - lalu pilih activeskin nya

trus tinggal copas ini script di event ole constructornya, mo taro di window open jg bisa tinggal ilangin "parent." nya

string gs_path
gs_path = getcurrentdirectory()
parent.ole_1.object.LoadSkin(gs_path + "\style\IcqPro.skn")
parent.ole_1.object.ApplySkin (Handle(parent))


dwivindy wrote:

 

para master2nya PB, saya coba membuat suatu aplikasi yg saya tambahkan active skin. gmn caranya menambahkan active skin menggunakan script. saya coba scrip spt di bawah ini :

Long hWnd
hWnd=Handle(This)

OLEObject SkinOb
SkinOb = CREATE OLEObject
SkinOb.ConnectToNewObject('D:\Install BPR\BPR\Res\actskin4.ocx')
SkinOb.Object.LoadSkin('D:\Install BPR\BPR\Res\Web.skn')
SkinOb.Object.ApplySkin(hWnd)

tp g bisa saat loadskin, ada yg bisa bantu g ya?
thanks b4






__._,_.___


-----------------------------------------------
IndoPB - Indonesia PB User Group
http://groups.yahoo.com/group/indopb



Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___

Kirim email ke