VFP ·R¥ÎªÌªÀ°Ï ­º­¶ VFP ·R¥ÎªÌªÀ°Ï
¥»°Q½×°Ï¬° Visual Foxpro ·R¥ÎªÌ¸gÅç¥æ¬yªº¦a¤è, ½Ð¦h¦h§Q¥Î"·j´M"ªº¥\¯à, ¥ý¬d¬Ý¬Ý¦³µL«e¨Ò¥i´`, ¦pªGÁÙ¦³¤£À´ªº¦Aµo°Ý. ³¡¥÷¥DÃD¦³ªþ¥[ÀÉ®×, ¶·¥ýµù¥U¦¨¬°ªÀ°Ï©~¥Á¤~¥i¥H¤U¸ü.
 
 ±`¨£°ÝÃD±`¨£°ÝÃD   ·j´M·j´M   ·|­û¦Cªí·|­û¦Cªí   ·|­û¸s²Õ·|­û¸s²Õ   ·|­ûµù¥U·|­ûµù¥U 
 ­Ó¤H¸ê®Æ­Ó¤H¸ê®Æ   µn¤JÀˬd±zªº¨p¤H°T®§µn¤JÀˬd±zªº¨p¤H°T®§   µn¤Jµn¤J

ª¬ºAÄæ±±¨î¶µªº¨Ï¥Î»¡©ú

 
µoªí·s¥DÃD   ¦^ÂÐ¥DÃD    VFP ·R¥ÎªÌªÀ°Ï ­º­¶ -> VFP °Q½×°Ï
¤W¤@½g¥DÃD :: ¤U¤@½g¥DÃD  
µoªí¤H ¤º®e
Ruey



µù¥U®É¶¡: 2003-03-12
¤å³¹: 1698
¨Ó¦Û: tunglo

²Ä 1 ¼Ó

µoªíµoªí©ó: ¬P´Á¤T ¤K¤ë 13, 2003 11:13 am    ¤å³¹¥DÃD: ª¬ºAÄæ±±¨î¶µªº¨Ï¥Î»¡©ú ¤Þ¨¥¦^ÂÐ

ª¬ºAÄæ±±¨î¶µªº¨Ï¥Î»¡©ú
( §@ªÌ: ¬õªê )

¡@¡@¦bVFPªºµ{¦¡³]­p¤¤¡A¨ä¥Dµøµ¡_screen¦³¤@­Ó¨t²Îªºª¬ºAÄæ¡AÁöµM¥i¥H«Ü¤è«Kªº¨Ï¥Î©R¥Oset message to ¦r¤¸¡C¡C¡C¦ý¬O¦³®É«JÁÙ¬O·|¦³¬ü¤¤¤£¨¬¤§³B¡A¦p¨t²ÎªºÅã¥Ü¤@­Ó·í«e¥´¶}ªº·í«e¤u§@°Ïªºªíªº¨M©w¸ô®|¡A¥H¤Î¨ä©Ò¦bªº°O¿ý¦ì¸m¡A©MÂê©w¤è¦¡¡A¥O¤H«Ü¬OÀY¯k¡C

¡@¡@·íµM¤£¶È¶È¦]爲¦¹¡A§Ú­Ì´N­n©ñ±ó¸Óª¬ºAÄæ°Ú¡A¦³®É§Ú­Ì»Ý­n¨Ï§Ú­Ìªºª¬ºAÄæÅã±o§ó±M·~ÂI¡A©ÎªÌ»Ý­nÅã¥Ü¯S©wªºª¬ºAÄæ¸ê°T¡A¬G¡A»Ý­n¨Ï¥Îª¬ºAÄæ±±¨î¶µ¨Ó¨Ï§Ú­Ìªºµ{¦¡§óº}«G¡I

¡@¡@ª¬ºAÄæ¦bÅã¥Ü®É¦³¨âºØ¼Ò¦¡¡A¤@¬O³æª©­±¡A¤G¬O¦hª©­±¡C³æª©­±´N¬O¦bª¬ºAÄæ¦a¤èÅã¥Ü¤@­Ó¸ê°T°Ï¡A¦Ó¥B¥u¥i¥H©ñ¸m²³æªº¤å¦r»¡©ú¡A¦Ó¦hª©­±¥i¥H©ñ¸m¤G­Ó©Î¥H¤Wªº¸ê°T°Ï¡A¨Ã¥i¥H¯S©wªº¨t²Î»¡©ú¡A¦pCAPS¡ANUM¡AINSµ¥ªºª¬ºA«ü¥Ü¡A¨Ã¥i¥H©ñ¸m¹Ï¤ù¡C¦Ó¥B¨âºØ¼Ò¦¡¦b¤Á´«®ÉÁÙ¤£¤¬¬Û¤zÂZ¡A¤¬¤£¼vÅT¡I

¤U­±»¡©ú¤@¤U¨ä¨Ï¥Î¤èªk
¡@¡@­º¥ý¸Ó±±¨î¶µ»Ý­n¤å¥ó mscomctl.ocx ªº¤ä´©¡A¦pªG¦b¦w¸Ë¤FVFP6ªºÀô¹Ò¤U¡A¨t²Î¥Ø¿ý¤U¤w¸g¦³¤F¸Ó¤å¥ó¡A¦pªG¦b­×§ï©Î¹B¦æ«e´£¥Ü­n¥´¶}¤@­ÓOCX¤å¥ó¡A¨º麽»Ý­n­º¥ý«þ¨©¸Ó¤å¥ó¨ì§Aªº¨t²Î¥Ø¿ý¡AµM«á¦A«ü©w¸Ó¤å¥ó¡A¦]爲²Ä¤@¦¸«ü©w®É¡A¨t²Î§Yµù¥U¸Ó¤å¥ó¡A¤Î¨ä¸ô®|¡A©Ò¥H¤£­nÀH«K¦b²Ä¤@¦¸¥h«ü©w¤@­ÓOCX¤å¥ó¡A§_«h³Â·Ð¤j¤F¡I

ª¬ºAÄ檺Äݩʤ§¤@STYLE¡A§Y¤W­±©ÒÁ¿ªº¨âºØÅã¥Ü¼Ò¦¡¡A0 - Mutliple panels ©M 1 - Single panel simple text ·í爲Single panel simple text ¼Ò¦¡®É¡A«Ü¤è«Kªº³B²z¡A¥u­n«ü©wª¬ºAªº¥t¤@­ÓÄÝ©Ê SimpleText§Y¥i¡A´N¶H¦b¾Þ§@VFP¥Dµøµ¡ªºª¬ºAÄæ®É¥Î set message to ¨º麽¤è«K¤F¡A¦b³oùØ´N¬Othisform.OleStatus.SimpleText="·sªº¦r¦ê"§Y¥i¡C

¦Ó·í¦b Mutliple panels ®É´N¤£¦P¤F¡A¨ä¹ê§Ú­Ì»Ý­n³o­Ó±±¨î¶µ¤]´N¬O爲¤F³o­Ó¥\¯à§a¡A¤£µM¥ÎVFP¥Dµøµ¡ªºª¬ºAÄ椣´N¦æ¤F¹À¡H¦b¦hª©­±®É¡A¨C¤@­Óª©­±§@爲¤@­Óª«¥ó¨Ó¾Þ§@¡A§YPanel¡A¹ï¤§§ÚºN¯Á¨ì¦p¤UªºÄÝ©Ê¡G
1¡BIndex ¬O«üPanelªº¯Á¤Þ¸¹¡A¸Ó¯Á¤Þ¸¹¬O¶¶§Ç±Æ¦C¥B°ß¤@«ü©w¨C¤@­ÓPanelªº¡C
2¡BText ¬O«ü¦bPanel¤WÅã¥Ü¤å¥»ªº¡A¥u¦³·í¨äStyle=0¡]¤å¦r¡^®É¤~¦³®Ä¡C
3¡BToolTipText ¬O·í·Æ¹«²¾¨ì¸ÓPanel¤W®ÉÅã¥Üªº´£¥Ü¸ê°T¡A­n·í±±¨î¶µªºShowTips=.T.®É¤~¦³®Ä¡C
4¡BKey ¬O¥Î¨Ó°ß¤@¼Ð»x¨C¤@­ÓPanelªº­È¡A¸Ó­È­n麽¤£«ü©w¡A§Y爲ªÅ¡A­n麽´N¬O­n°ß¤@«ü©w¡C¦b°µ¹ïPanelªº§R°£®É¡A»Ý­n«ü©wPanelªºKey­È¡C
5¡BWidth ¬O«üPanelªº¼e«×¡A¼e«×¤£¥i¥H¤p©ó0¡A§_«h¥X¿ù¡C
6¡BTag ¥Î¨Ó¦sÀxÃB¥~¸ê®Æªº¡A¤@¯ë¨S¤°麽¥Î¡C
7¡BVisible Àq»{爲.T.§Y¥i¨£¡A¥i¥H³q¹L­×§ï¸Ó­È¨ÓÁô§tPanel.
8¡BEnabled Àq»{爲¥i¥Î¡A¥i¥H³q¹L­×§ï¸Ó­È¨Óªí¥ÜPanelªº¥i¥Î¤£¥i¥Îª¬ºA¡C
9¡BAlignment ¹ï»ô¤è¦¡¡AÀq»{爲¥ª¹ï»ô¡C
10¡BStyle ªí¥ÜPanelªº¼Ë¦¡¡A¦p´¶³q¤å¦r¡ACAPS¡ANUM¡AINSªºÁ䪺ª¬ºA«ü¥Ü¡A¥Î¨Óªí¥Ü¤é´Á¡A®É¶¡µ¥¡C
11¡BBevel ªí¥ÜPanelªº¥~Æ[¡A¦³¥­­±¡A¬ð°_¡A¥W¶i¤TºØ¡C
12¡BPicture ¸Ó°Ñ¼ÆÁÙ¥¼ª¾¦p¦ó¥H½sµ{¤è¦¡¨Ó«ü©w¡A¥Lªº­È¬O§@爲¤@­Óª«¥ó¦sÀxªº¡C

¤èªk¡G
1¡B²K¥[
thisform.olestatus.panels.add(n,"key_"+allt(str(n)),"Ready",0 )
¥H¤W¥N½X°Ñ¼Æªí¥Ü¡G
N ¬O«ü¨äINDEX­È¡A¸Ó­È¥²¶·°ß¤@¡A¥B¬O¶¶§Ç«ü©w¡A
"key_"+allt(str(n)) ªí¥Ü¨äKEY­È¡A­n«ü©w¡A¥²¶·¨Ï¥L°ß¤@¡A§_«h¥X¿ù¡C
"Ready" ¬O¦bPANEL¤WÅã¥Üªº¤å¦r¡C
«á­±ªº0ªí¥Ü¨ä¼Ë¦¡爲´¶³q¤å¦r¡C

2¡B§R°£
thisform.olestatus.panels.remove(key)
«ü©w¬Y¤@­ÓPANELªºKEY­È®É¡A¥i¥H³q¹L¸Ó©R¥O¨Ó°µ§R°£¡C

3¡B§ó·s
¸Ô²Ó¨£¥Ü¨Ò¤¤

À³¥Î¡G
1¡BÅã¥Ü¶i«×±ø¡G
*-- PANEL ªº¼e«× = 12 * ¤è¶ô­Ó¼Æ + 2
with thisform.olestatus.panels.item(1)¡@&& ¦b²Ä¤@­ÓPANELùØÅã¥Ü¶i«×±ø

.text = ""
nTotalNum = (.width - 2)/12 && Á`¤è¶ô­Ó¼Æ
x = 0¡@¡@¡@&& ·í«e©Ò­pºâ¥Xªº²Ä´X­Ó¤è¶ô¼Æ
y = 0¡@¡@¡@&& ¸òX°Ñ¦Ò¤ñ¸û¼Æ
nTotalSum = 100000¡@¡@¡@&& Á`¼Æ
for n = 1 to nTotalSum¡@&& ªí¥Ü±q1¨ì100000¤§¶¡ªº³B²z¶i«×
¡@¡@x = int((n * nTotalNum)/nTotalSum)¡@¡@&& ¨D±o²{¦b¬O»Ý­nÅã¥Ü²Ä´X­Ó¤è¶ô¼Æ X
¡@¡@if y <> x¡@¡@&& ·í¨â­Ó¼Æ¤£¬Ûµ¥®É¡Aªí©ú¦³·sªº¼Æ産¥Í¡A«h¥[¤@­Ó¤è¶ô
¡@¡@¡@ .text = .text + '¡½'
¡@¡@¡@ y = x
¡@¡@endif
*-- ³B²z¬Y¨Æ°È
endfor
.text = "§¹²¦"
endwith

2¡BÅã¥Ü®ÉÄÁ
³o­Ó«Ü²³æ¡A¥u­n¦bªí³æ¤W©ñ¤@­Ó®ÉÄÁ±±¨î¶µ¡A³]ÀW²v爲1000·L§®¡ATIMER¨Æ¥óùؼg
thisform.olestatus.panels.item(1).text = ttoc(datetime())
ªí¥Ü¦b²Ä¤@­ÓPANELùØÅã¥Ü·í«eªº®É¶¡¡A¨Ã¨C¹j¤@¬í§ó·s¡A±q¦Ó¹F¨ì§Y®ÉÅã¥Ü®É¶¡¡A¦ý³o­Ó¤£¬O«Ü¦³¥²­n¡A²¦³º¥L´£¨Ñ¤F®ÉÄÁªº¥\¯à¡A¥u¬O¤£Åã¥Ü¬í¡H¡I

©Ò¦³¥H¤W»¡©ú¡A§¡¦b¥Ü¨Ò¤¤¥i¥H¬Ý¨ì¡A½ÐÂIÀ»¤U¸ü¥Ü¨Ò >>> Stabar.zip 7.4K

_________________
#############################
§Ö¼Ö¶ý«}¨t¦C©¯ºÖ¦v°t,³Ü¤Q¥þÂû´ö~­ì¨Ó©¯ºÖ¨º»ò²³æ!!

¾Ç·|VFP¨Ï¥ÎªÌªÀ°Ïªº·j´M,Code¤~·|§ó¦³½ì~
#############################
¦^³»ºÝ
À˵ø·|­û­Ó¤H¸ê®Æ µo°e¨p¤H°T®§
jllu0406



µù¥U®É¶¡: 2006-09-07
¤å³¹: 6


²Ä 2 ¼Ó

µoªíµoªí©ó: ¬P´Á¤­ ¤E¤ë 22, 2006 1:08 pm    ¤å³¹¥DÃD: ¤Þ¨¥¦^ÂÐ

½Ð°Ý±NSTATUSBAR©ñ©ó·sªí³æ§Ú·|±±¨î¡A¦ý¦p¦ó±Nstatusbar©ñ©ó_screen¨t²Î¥Dµe­±¤U©O?µ{¦¡À³¦p¦ó¼g? Thanks
¦^³»ºÝ
À˵ø·|­û­Ó¤H¸ê®Æ µo°e¨p¤H°T®§
±q¤§«eªº¤å³¹¶}©lÅã¥Ü:   
µoªí·s¥DÃD   ¦^ÂÐ¥DÃD    VFP ·R¥ÎªÌªÀ°Ï ­º­¶ -> VFP °Q½×°Ï ©Ò¦³ªº®É¶¡§¡¬° ¥x¥_®É¶¡ (GMT + 8 ¤p®É)
²Ä1­¶(¦@1­¶)

 
«e©¹:  
±z µLªk ¦b³o­Óª©­±µoªí¤å³¹
±z µLªk ¦b³o­Óª©­±¦^ÂФ峹
±z µLªk ¦b³o­Óª©­±½s¿è¤å³¹
±z µLªk ¦b³o­Óª©­±§R°£¤å³¹
±z µLªk ¦b³o­Óª©­±¶i¦æ§ë²¼
±z µLªk ¦b³o­Óª©­±ªþ¥[ÀÉ®×
±z µLªk ¦b³o­Óª©­±¤U¸üÀÉ®×


Powered by phpBB © 2001, 2005 phpBB Group
¥¿Å餤¤å»y¨t¥Ñ phpbb-tw ºûÅ@»s§@