idenya bagus juga, jadi registry kita tetap aman hehehh.. tapi kalo pakenya seperti ini apa ga berat..? apalagi di datawindow nge-loop terus..
________________________________ Dari: Fajar Rahmadhani <[email protected]> Kepada: [email protected] Terkirim: Sel, 9 November, 2010 05:15:12 Judul: Re: Bls: [indopb] DecimalSeparator sedikit modif. tanpa harus mengubah registry string ls_titlefont RegistryGet( & "HKEY_CURRENT_USER\Control Panel\International", & "sDecimal", RegString!, ls_titlefont) long start_pos=1 string old_str, new_str, mystring mystring = string(320000.200,"#,##0.00") old_str = ls_titlefont new_str = "|" //GANTI koma ke | // Find the first occurrence of old_str. start_pos = Pos(mystring, old_str, start_pos) // Only enter the loop if you find old_str. DO WHILE start_pos > 0 // Replace old_str with new_str. mystring = Replace(mystring, start_pos, & Len(old_str), new_str) // Find the next occurrence of old_str. start_pos = Pos(mystring, old_str, & start_pos+Len(new_str)) LOOP messagebox("", mystring) ________________________________ Fajar Rahmadhani YM : fjr_mail Personal Email : [email protected]; [email protected] Office Email : [email protected] Office Website : fstudio.web.id (software murah berkualitas) Facebook : Fajar Rahmadhani ([email protected]) Phone : +6281346333226 --- Pada Sen, 8/11/10, bobby sutanto <[email protected]>menulis: >Dari: bobby sutanto <[email protected]> >Judul: Re: Bls: [indopb] DecimalSeparator >Kepada: [email protected] >Tanggal: Senin, 8 November, 2010, 8:32 AM > > > >Terima kasih atas jawabannya. > > > > ________________________________ From: hotdin gurning <[email protected]> >To: [email protected] >Sent: Friday, November 5, 2010 5:57:10 >Subject: Bls: [indopb] DecimalSeparator > > >harus pake registry, karna di pb saya liat ga ada fitur gituan(setau saya siy) >cuma ada trik sedikit untuk menghindari aplikasi windows >lainnya spt excel dan word ikut2an make format decimalnya. > >1. bikin fungsi external dulu : >FUNCTION long SendMessageA ( long hwnd, uint Msg, long wparam, string lparam) > >LIBRARY "USER32" >2. di event open application tempelin script ini: >//setting decimal jd '|' dan ribuan jadi ',' >string ls_regKey = "HKEY_CURRENT_USER\Control Panel\International" >long HWND_BROADCAST = 65535 >uint WM_SETTINGCHANGE = 26 >RegistrySet(ls_regkey, "sDecimal", RegString!, "|") >RegistrySet(ls_regkey, "sThousand", RegString!, ",") >SendMessageA( HWND_BROADCAST, WM_SETTINGCHANGE, 0, 'intl' ) >3. Nah, skrg di event open window pertama (mis : w_utama) tempelin lagi yg ini: >//settingan windows menjadi : decimal jd '.' dan ribuan jadi ',' >string ls_regKey = "HKEY_CURRENT_USER\Control Panel\International" >RegistrySet(ls_regkey, "sDecimal", RegString!, ".") >RegistrySet(ls_regkey, "sThousand", RegString!, ",") >//ga pake send message lagi, dgn bgtu jadi settingan aplikasi pb tetap. >//tetapi aplikasi windows spt excel ato word akan mengikuti format kedua ini > > > > > ________________________________ Dari: Bob <[email protected]> >Kepada: [email protected] >Terkirim: Sen, 1 November, 2010 12:06:21 >Judul: [indopb] DecimalSeparator > > >Teman2, ada yang tahu ngga cara ngubah decimal separator di powerbuilder. >seperti di delphi ada variabel decimalseparator, jika default nya decimal >separator ',' ( ex: 100,20 ) diubah menjadi decimal separator '|' akan menjadi >100|20 >Ada yang tahu gimana cara ngerubah decimalseparator nya (hanya di aplikasi pb >saja) ? > >*Note : tidak secara worldwide (ubah registry) > > > >
