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® -----Original Message----- From: Hermawan Dephe <[email protected]> Sender: [email protected] Date: Wed, 22 Jun 2011 13:16:49 To: <[email protected]> Reply-To: [email protected] 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
