📄 00000019.htm

📁 水木清华关于C++Builder程序的代码
💻 HTM
字号:
<HTML><HEAD>  <TITLE>BBS水木清华站∶精华区</TITLE></HEAD><BODY><CENTER><H1>BBS水木清华站∶精华区</H1></CENTER>发信人:&nbsp;Zeemon&nbsp;(踏遍青山),&nbsp;信区:&nbsp;Visual&nbsp;<BR>标&nbsp;&nbsp;题:&nbsp;Spread&nbsp;Hot&nbsp;Tips&nbsp;<BR>发信站:&nbsp;BBS&nbsp;水木清华站&nbsp;(Wed&nbsp;Jun&nbsp;17&nbsp;13:08:50&nbsp;1998)&nbsp;<BR>&nbsp;<BR><A HREF="http://www.fpoint.com/hottips.htm">http://www.fpoint.com/hottips.htm</A>&nbsp;<BR>&nbsp;<BR>Making&nbsp;Spread&nbsp;Faster&nbsp;<BR>For&nbsp;faster&nbsp;Spread&nbsp;sheet&nbsp;updates&nbsp;wrap&nbsp;your&nbsp;code&nbsp;with&nbsp;&nbsp;<BR>vaSpread.Redraw=False&nbsp;<BR>....&nbsp;<BR>add/remove&nbsp;data&nbsp;from&nbsp;spread&nbsp;<BR>...&nbsp;<BR>vaSpread.Redraw=True&nbsp;<BR>&nbsp;<BR>Use&nbsp;the&nbsp;With&nbsp;command&nbsp;in&nbsp;VB4.0&nbsp;to&nbsp;make&nbsp;accessing&nbsp;the&nbsp;spread&nbsp;faster:&nbsp;<BR>With&nbsp;vaSpread&nbsp;<BR>Redraw=False&nbsp;<BR>....&nbsp;<BR>SomeProperty=&nbsp;Value&nbsp;&nbsp;<BR>SomeMethod&nbsp;MethodParams&nbsp;<BR>Redraw=True&nbsp;<BR>End&nbsp;With&nbsp;<BR>Thanks&nbsp;to:&nbsp;William&nbsp;Jordan&nbsp;<BR>&nbsp;<BR>Using&nbsp;the&nbsp;Farpoint&nbsp;Spread&nbsp;like&nbsp;a&nbsp;Listbox.&nbsp;&nbsp;<BR>Added&nbsp;feature&nbsp;is&nbsp;you&nbsp;can&nbsp;have&nbsp;a&nbsp;column&nbsp;for&nbsp;each&nbsp;property&nbsp;associated&nbsp;with&nbsp;the&nbsp;instance.&nbsp;This&nbsp;<BR>allows&nbsp;you&nbsp;to&nbsp;display&nbsp;anything&nbsp;in&nbsp;the&nbsp;show&nbsp;column&nbsp;and&nbsp;keep&nbsp;the&nbsp;data&nbsp;hidden&nbsp;in&nbsp;other&nbsp;columns.&nbsp;&nbsp;<BR>&nbsp;<BR>For&nbsp;Example:&nbsp;&nbsp;<BR>You&nbsp;want&nbsp;a&nbsp;listbox&nbsp;showing&nbsp;full&nbsp;name.&nbsp;&nbsp;<BR>You&nbsp;would&nbsp;create&nbsp;4&nbsp;columns&nbsp;<BR>Col1&nbsp;=&nbsp;Full_Name&nbsp;(First_Name&nbsp;&amp;&nbsp;&quot;&nbsp;&quot;&nbsp;&amp;&nbsp;Middle_Name&nbsp;&amp;&nbsp;&quot;&nbsp;&quot;&nbsp;&amp;&nbsp;Last_Name)&nbsp;&nbsp;<BR>Col2&nbsp;=&nbsp;First_Name&nbsp;&nbsp;<BR>Col3&nbsp;=&nbsp;Middle_Name&nbsp;&nbsp;<BR>Col4&nbsp;=&nbsp;Last_Name&nbsp;<BR>&nbsp;<BR>Show&nbsp;Only&nbsp;Col1&nbsp;&nbsp;<BR>You&nbsp;can&nbsp;still&nbsp;use&nbsp;the&nbsp;other&nbsp;columns&nbsp;in&nbsp;code&nbsp;without&nbsp;having&nbsp;to&nbsp;decipher&nbsp;the&nbsp;Full_Name&nbsp;String&nbsp;<BR>Set&nbsp;the&nbsp;Spread&nbsp;Properties&nbsp;as&nbsp;follows&nbsp;<BR>vaSpread1.ScrollBars&nbsp;=&nbsp;SS_SCROLLBAR_V_ONLY&nbsp;<BR>vaSpread1.GridShowVert&nbsp;=&nbsp;False&nbsp;<BR>vaSpread1.GridShowHoriz&nbsp;=&nbsp;False&nbsp;<BR>vaSpread1.DisplayColHeaders&nbsp;=&nbsp;False&nbsp;&nbsp;<BR>vaSpread1.DisplayRowHeaders&nbsp;=&nbsp;False&nbsp;&nbsp;<BR>vaSpread1.OperationMode&nbsp;=&nbsp;SS_OP_MODE_SINGLE_SELECT&nbsp;&nbsp;<BR>vaSpread1.UserResizeCol&nbsp;=&nbsp;SS_USER_RESIZE_OFF&nbsp;&nbsp;<BR>vaSpread1.UserResizeRow&nbsp;=&nbsp;SS_USER_RESIZE_OFF&nbsp;&nbsp;<BR>vaSpread1.CursorStyle&nbsp;=&nbsp;SS_CURSOR_STYLE_ARROW&nbsp;&nbsp;<BR>vaSpread1.MaxCols&nbsp;=&nbsp;4&nbsp;'Columns&nbsp;is&nbsp;Dependent&nbsp;on&nbsp;number&nbsp;variables&nbsp;&nbsp;<BR>vaSpread1.MaxRows&nbsp;=&nbsp;20&nbsp;<BR>Thanks&nbsp;to:&nbsp;Randy&nbsp;Sherman&nbsp;<BR>&nbsp;<BR>Q:Can&nbsp;I&nbsp;change&nbsp;the&nbsp;state&nbsp;of&nbsp;a&nbsp;check&nbsp;box&nbsp;in&nbsp;a&nbsp;select&nbsp;range&nbsp;or&nbsp;entire&nbsp;col&nbsp;range?&nbsp;<BR>A:&nbsp;Yes,&nbsp;you&nbsp;need&nbsp;to&nbsp;set&nbsp;the&nbsp;Col,&nbsp;Col2,&nbsp;Row,&nbsp;and&nbsp;Row2&nbsp;properties&nbsp;then&nbsp;set&nbsp;the&nbsp;BlockMode&nbsp;to&nbsp;true&nbsp;to&nbsp;<BR>select&nbsp;the&nbsp;range&nbsp;of&nbsp;cells.&nbsp;Then&nbsp;set&nbsp;the&nbsp;Value&nbsp;property&nbsp;to&nbsp;force&nbsp;the&nbsp;checkbox&nbsp;to&nbsp;be&nbsp;checked&nbsp;or&nbsp;<BR>unchecked.&nbsp;<BR>Thanks&nbsp;to&nbsp;Julio&nbsp;Varga&nbsp;<BR>&nbsp;<BR>Q:&nbsp;How&nbsp;can&nbsp;I&nbsp;tell&nbsp;that&nbsp;the&nbsp;user&nbsp;is&nbsp;scrolling&nbsp;the&nbsp;spreadsheet&nbsp;with&nbsp;Spread/VBX?&nbsp;<BR>A:&nbsp;A&nbsp;TopLeftChange&nbsp;event&nbsp;will&nbsp;fire.&nbsp;<BR>&nbsp;<BR>Q:&nbsp;In&nbsp;Spread/VBX,&nbsp;how&nbsp;do&nbsp;I&nbsp;change&nbsp;the&nbsp;state&nbsp;of&nbsp;a&nbsp;checkbox&nbsp;cell&nbsp;programatically?&nbsp;<BR>A:&nbsp;Set&nbsp;the&nbsp;Value&nbsp;property&nbsp;for&nbsp;that&nbsp;cell&nbsp;to&nbsp;1&nbsp;for&nbsp;checked,&nbsp;0&nbsp;for&nbsp;unchecked.&nbsp;<BR>&nbsp;<BR>Q:&nbsp;How&nbsp;can&nbsp;I&nbsp;get&nbsp;back&nbsp;a&nbsp;row&nbsp;or&nbsp;col&nbsp;that&nbsp;I&nbsp;hid&nbsp;in&nbsp;Interface&nbsp;Designer&nbsp;without&nbsp;having&nbsp;to&nbsp;affect&nbsp;<BR>other&nbsp;cells?&nbsp;<BR>A:&nbsp;In&nbsp;the&nbsp;designer,&nbsp;choose&nbsp;Cell,&nbsp;then&nbsp;Goto.&nbsp;Set&nbsp;the&nbsp;col&nbsp;or&nbsp;row&nbsp;boxes&nbsp;to&nbsp;put&nbsp;you&nbsp;on&nbsp;a&nbsp;cell&nbsp;in&nbsp;the&nbsp;<BR>hidden&nbsp;area.&nbsp;The&nbsp;active&nbsp;cell&nbsp;box&nbsp;should&nbsp;vanish,&nbsp;as&nbsp;it&nbsp;has&nbsp;been&nbsp;moved&nbsp;into&nbsp;the&nbsp;hidden&nbsp;area.&nbsp;Then&nbsp;<BR>choose&nbsp;Headers,&nbsp;Col/Row,&nbsp;Show!&nbsp;This&nbsp;will&nbsp;redisplay&nbsp;the&nbsp;row&nbsp;or&nbsp;column.&nbsp;<BR>&nbsp;<BR>Q:&nbsp;I&nbsp;need&nbsp;to&nbsp;validate&nbsp;the&nbsp;users&nbsp;input&nbsp;before&nbsp;letting&nbsp;them&nbsp;change&nbsp;tabs&nbsp;in&nbsp;Tab/VBX&nbsp;or&nbsp;/PRO.&nbsp;How&nbsp;<BR>can&nbsp;I&nbsp;do&nbsp;this?&nbsp;<BR>A:&nbsp;The&nbsp;TabActivate&nbsp;event&nbsp;fires&nbsp;whenever&nbsp;a&nbsp;user&nbsp;clicks&nbsp;on&nbsp;a&nbsp;new&nbsp;tab,&nbsp;before&nbsp;the&nbsp;actual&nbsp;change&nbsp;to&nbsp;<BR>the&nbsp;new&nbsp;tab&nbsp;occurs.&nbsp;In&nbsp;this&nbsp;event&nbsp;you&nbsp;can&nbsp;do&nbsp;your&nbsp;validation&nbsp;checks.&nbsp;If&nbsp;you&nbsp;need&nbsp;to&nbsp;prevent&nbsp;the&nbsp;<BR>change,&nbsp;set&nbsp;TabToActivate&nbsp;to&nbsp;-1,&nbsp;which&nbsp;will&nbsp;return&nbsp;them&nbsp;to&nbsp;the&nbsp;current&nbsp;tab.&nbsp;&nbsp;<BR>&nbsp;<BR>Q:&nbsp;I&nbsp;am&nbsp;using&nbsp;Tab/Pro&nbsp;with&nbsp;Visual&nbsp;Basic.&nbsp;I&nbsp;have&nbsp;several&nbsp;controls&nbsp;on&nbsp;one&nbsp;of&nbsp;the&nbsp;tabs&nbsp;whose&nbsp;<BR>Enabled&nbsp;property&nbsp;I&nbsp;am&nbsp;setting&nbsp;at&nbsp;runtime.&nbsp;However,&nbsp;when&nbsp;I&nbsp;change&nbsp;to&nbsp;another&nbsp;tab&nbsp;and&nbsp;then&nbsp;switch&nbsp;<BR>back,&nbsp;the&nbsp;controls&nbsp;have&nbsp;reverted&nbsp;to&nbsp;their&nbsp;design-time&nbsp;state.&nbsp;<BR>A:&nbsp;When&nbsp;Tab/Pro&nbsp;hides&nbsp;a&nbsp;child&nbsp;control,&nbsp;it&nbsp;sets&nbsp;that&nbsp;controls&nbsp;Enabled&nbsp;property&nbsp;to&nbsp;false&nbsp;to&nbsp;remove&nbsp;<BR>it&nbsp;from&nbsp;the&nbsp;tab&nbsp;order.&nbsp;If&nbsp;you&nbsp;need&nbsp;to&nbsp;change&nbsp;this&nbsp;property&nbsp;at&nbsp;runtime,&nbsp;use&nbsp;TabSetChildEnabled&nbsp;<BR>instead.&nbsp;This&nbsp;will&nbsp;set&nbsp;the&nbsp;Enabled&nbsp;state&nbsp;for&nbsp;the&nbsp;control,&nbsp;and&nbsp;update&nbsp;internal&nbsp;tables&nbsp;that&nbsp;Tab&nbsp;<BR>needs&nbsp;to&nbsp;re-set&nbsp;the&nbsp;control&nbsp;later.&nbsp;You&nbsp;can&nbsp;find&nbsp;the&nbsp;parameters&nbsp;for&nbsp;TabSetChildEnabled&nbsp;in&nbsp;the&nbsp;<BR>help&nbsp;file.&nbsp;<BR>&nbsp;<BR>Comments?&nbsp;Something&nbsp;you&nbsp;want&nbsp;to&nbsp;see&nbsp;here?&nbsp;Email&nbsp;us!&nbsp;<BR>&nbsp;<BR>&nbsp;<BR>&nbsp;<BR>&nbsp;<BR>&nbsp;<BR>--&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;最后青蛙问道:&quot;为什么?我告诉过你我是一位美丽的公主,&nbsp;会与你&nbsp;<BR>共度一个星期并让你为所欲为.&nbsp;你为什么还不愿吻我?&quot;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;男孩说道:&quot;我是一个程序员.&nbsp;我没时间交GF,&nbsp;但拥有一只会说话的&nbsp;<BR>青蛙简直太酷了.&quot;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<BR>&nbsp;<BR>※&nbsp;来源:·BBS&nbsp;水木清华站&nbsp;bbs.net.tsinghua.edu.cn·[FROM:&nbsp;159.226.41.99]&nbsp;<BR><CENTER><H1>BBS水木清华站∶精华区</H1></CENTER></BODY></HTML>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -