| Вопрос: Бета-тстирование - UpDownControl | Добавлено: 24.07.07 20:13 |
Автор вопроса:  ZagZag | ICQ: 295002202 |
|
begin 664 VB UpDownControl.rar
M4F%R(1H'`$%P<PP`#0`````````R*'2`@"X`A0$``!H%```">0/7^+R*^#8= M-0X`(````%!R;V-5<$1O=VXN8F%SIQA!-/,%T?8;<X[]AKOQUJ*NKZ;1B19) M-Z0;"2FFW0"$S-#D]DE2QC?S./P_WX(Q,!5!6>URF'QN>)_VRP;'U#D:9K8/ M$D-+SB#^P^:=/501$,7"W3H>"12CC!E^"9&*R`#E_"44^*@'UQA&?P[0A\PT M2#`S(HL8!KZIL>("U72-JY7.I"Q4XT^3L!)#B(5#O0OK[/OCE<(R?+:S?S\F M/)5=2D_\J_N`!G;->A_<+!NL+R*GA5I-J1SU-L!.0WZ7A2A/46*%]ZNCJBK? M5'9@ET*+#2,PO'(V7?>95_3V5_J9R:JF+Y/+JKB<4"W"8]V"-PK7<#F!"9!$ M7RX!2Z\!.E)W"(SJ76I"P(.2<+(4&K/BCFJA1@O0<25#,SZSQ=)7BDL,Y[ZT MZOK)/-G;5(!]"!_G2GN;<0WZ>]+#_NSUP?8@R?2Q.L<IG#,?)UYY"@F9S_*( M2=W^G9$!_`%Z"$#IP[\-IW4C`N>?22&.-624+E1:.5M5AS*GIE`HE^0``+^( M9_:I_]1Z('20@#,`=@```.X````"5/S[8)6+^#8=-1,`(````%5P1&]W;D-O M;G1R;VQ40BYB;7"'HVE*NR9]`>J4NRS74P"('%1>$S]\3INTPZE#8.`=GHV0 M,Q(48,Z"`:(5Y9XAK>&\/E59@QCAU<$CD"^B>\DBK7NSLAB``]P7S0R6?(1< M7.HIR(D3O-1\7,C'HQJ>!DC3>PB[Z=SBC4!EULQH``"_B&?VJ?_4:K1TD(`Q M`-($``!1%0```LC0I<8=GO@V'341`"````!5<$1O=VY#;VYT<F]L+F-T;(?- M?ZP10,EFEV#QS+3P%PQYV[\FMS[2>@9I=^47(T\$T3ZO7.\`CL1_4TV.HR;4 M,I-2@9M-AQI=C'(/<E9L;7(7E"Q&$*6?ZMNH2-8#@I%9]8(&AN0IH,[ZF77/ MU74*]<L&;#[-A_W:'>,$,DD3N5'+OYB6]3<)^B%ON=EL2B67+)_JFWK[AI,4 MS$#LOP,5^QRQN`VU3OD$&[NGO/:*6]C';!!I?TF?J[QX7N&<S60;UE4X]?A& MY.VP2X'K90_FFMU=G#V,9,]1GE1YM\`$O.)T!?,[@C*@2>EB]!V:X^^-$KQG M[8_?9"FV$:3=9@N)?/;<NW;5H1J!:"D/U=FFEIK9]8\!E+61SS3H9[\E#6D` MJ4'6;B2M12D_DC-`5_CCU<U7N1L]V`J%C<!8.-FWQWVYE[2]<2]P,4&42VJE MXVW.PDNA^,/X8]QU-_5(,[-'HBHSU"8(-^3'0FC`O,ON9!-#Z5W6$L$F/Y`9 MTBE@&$O$3LK0V`D^LT_S-JH^F^%"9[@DKZ8D(`M8)^BV[R.O3UO2*D=+K1:/ MN$K_<A&TXL,?-HFP\L73ED\1PI2&K=>>;S!-SPS:I4;_%NI+:*7/%)?Q<!@P MNM*8UF(ME#>FKWPM1(\!;QG47@&.`^`'QKUOT(D[P%P&]B3-<FP).'S)72(, MXGBO=@&>E/IP$X*MS2<DE9BY61NWJ''`9-J0?07Y]M.8*T)60I5SZI!$@>/" M?-__C8/^4T6\+7_1&&/>7C-,4[J/^.ASDQB[P\2AT9-/S(O+5%>#TOCRH%CX MMM9VUP#SG9`"<E7\Y%2)X1_H#$GXPL,OMY>"?[5,)>5J9I6G](_,V]JVH9XM M:ARY]\IGY-?DV2Y!F>Y26A870:W4RR.Q/OIS1@3*V9;-D6?0%^)S_V=B@32[ M2=SB`XG9AB,XT5A,NA=3$4/P7J'!UO2B<]!^.[NG&W]*(Q!/X_E=%O3>D+4] MU+B#!'U7P[RK.?MA"N//8&O,_">-DETYLA(7=2ZS?J)/W=U@MY5O'WWG"*0) M<BN)5V7_/P5?S'977W[^[Y=URJORL`WV+P:!H2Y0<\Q;.T$ZZO@,V^4$$OA7 MC\;$ZNP6VAB)/7S*C(P/":(_D,"5=RJZ;#0LQZ8^F74S$J_)R^N\":*,Y[6# M\77N$;=!:4(XL7]=^_I_4I0RC)?[-()+_X&7K+O%Y`+@8,7>L,X\27%F`[_L M)[(O/VLI@1#N(`/PB%%PM>5^DK!!L.Z[\E"]N@V?CK^F`\6(XE;TJTBQ-^M7 MAT&Q1EKYB'\0F04]Z#M1K#:"LIYX5]H$!9T/J@OFD^D]]*&KLM9]']S+F=JR MO.#+G=U`3.-8^D%HM(%B(=>+]11:R:PL%[LM\4T#@D8,&$6[DF(XJ^JQ.I_Z M@*L."8$LIR7$,AIT6:AEN-)EDSAF@<%?P*YOATWFHI?LR#*UR\)0E!V&HME! M$A',_#$JGD_]Q#:PA#@X[7$P8K<AC1.JM2$;J?_]'1K@L;]*DB2KUW-@]4HL MTD>".1L"74\]TNW2Z%&T-ZJ11Y5OL)0V_>O9K@8M-]EV8MCI2I7Z%.&!:8UV M=#-^?TISI>E0N)3T3P$:F<2X#2,B9$0V\I-F'S"5@^ZK%W^.I-PQ((V-"=D[ MW:S3-O22\@```+^(9_:I_]1J/720@#$`'0```/H````"%,R\T!V>^#8=-1$` M(````%5P1&]W;D-O;G1R;VPN8W1XA__RMC%*[I/9L#'-6@```2<-SWX``+^( M9_:I_]2CU720@"D`T````(4%```"2PP*Q$B>^#8=-0D`(````$9O<FTQ+F9R M;8<3%<Y8A6UUER*+NHRS+36^Y<LE'!58/%`OOL">US.>208N[ZC^9&/3)NLV M'59(-E,7L^KW<]1.RVURUZ%C",7".<8QJBF98E`;B<SI&.?)X0P;#C8"]K&: M5P7K3ND9O[7_%%NDJ#%^QR),ZMPTGN0-QS5CX"C4AP(`DF"'58'Z+5VQITL; M1"[8T^$)X4]G3CZ"&OPV`:"^)9O'20P<F88B=HTACQ37@U9`7;!.JH:=Q5VD MLXF8-C*@*6=??DJI$0&5WK^?4*L``+^(9_:I_]3Y#W20@"H`*0```$4````" M'/;<W7B=^#8=-0H`(````$=R;W5P,2YV8F>'8R_TE&"@BR3[D17<2<E]:O*4 MMUA=S#8`TXWE/>VV\1@`OXAG]JG_U%LO=)"`+`!$`0``7`(```+S33>88I[X M-ATU#``@````4')O:F5C=#$N=F)PA_%'41DMR^3OM]^4$4N<IFZJHQV?L=\J M)4<E(D-9#,OJV_1">)913FT>T1B_M+H?+DRY&K**RRZO9P<<#2']UVHRM3@! M\^<?_TZ]=%$@^U7MC]+8`M&])./`-,WQ;E419G0O?G#%FW,7,&&LKU%6#2BP M\A4#.%R*%P&"M?Q+&@R/O+/%3?O%LTTYY/33J4WMQ;;.<X^DLL[@R-$>)*P- M=@[SO&#J94W]O]]A_8RQP)C@_]:_<+4I\?/\8G_(E.&0C'A76E+=))[)@8H2 MIOJR5Y&&/I`L_^>18*(Y]6+"#D>]/^QRFYN*/T3$)CFUW#3)7)%8+S-UW_X3 M4R5#@PM4%2"6%@M$$2NOJ,"B0JX[)I[MC<BHF.8)N1ZFYX\BF3P<[S2B/],G M'VJ,^2W431M2!8]IGBWF$:-<!H%T``"_B&?VJ?_4;U%TD(`Q`'(```"O`@`` M`A*$1`,DGO@V'341`"````!5<$1O=VY#;VYT<F]L+G9B<`F9#,ODU\5=%Q06 MZ(Z.C?!Y:S.(X*A??$*7.`VX5I`=G!SXF$)`_.."3QGO^A#B3@_\%^#_26OS MY9:))B"FW@OB'N>VG)'?/U"85>+M8&]`Y6N$-B1WDX5AJ*K\40^&*[T)$O2_ 4\3SWN?I)7>6QNBC1Z<0]>P!`!P`@ ` end Потестируйте. Проект опенсорс. Мне несколько раз приходилось UpDown с текстбоксом скрещивать. А этот контрол еще и мышиный скролл поддерживает. Очень удобно. Автор: Я |
| Ответы | Всего ответов: 10 |
|
Номер ответа: 1 Автор ответа:  Winand Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #1 | Добавлено: 24.07.07 23:49 |
|
элементарно...
Первое действие (почти) - вписываем букву и рушим к чертям IDE ))) |
||
|
Номер ответа: 2 Автор ответа: ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #2 | Добавлено: 25.07.07 00:05 |
|
Первое действие (почти) - вписываем букву и рушим к чертям IDE )))
fixed, thanx. patch: Private Sub txtNumber_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = 188 Then Exit Sub If Round(CDbl(Val(txtNumber.Text)), 2) >= dblMin And Round(CDbl(Val(txtNumber.Text)), 2) <= dblMax Then dblValue = Round(CDbl(Val(txtNumber.Text)), 2) txtNumber.Text = Round(dblValue, 2) Else txtNumber.Text = Round(dblValue, 2) End If End Sub |
||
|
Номер ответа: 3 Автор ответа: udpn Вопросов: 2 Ответов: 45 |
Профиль | | #3 | Добавлено: 25.07.07 01:05 |
| f tckb rehcjh pfwbrkbnm gj 'rhfye rfr d 3lvfrctб nt gthtvtoftv lj dth[f 'rhfyf b jy ntktgjhnbhetncz dybp | ||
|
Номер ответа: 4 Автор ответа: udpnВопросов: 2 Ответов: 45 |
Профиль | | #4 | Добавлено: 25.07.07 01:05 |
punto switcher сцуко жжот 
а если курсор зациклить по экрану как в 3дмаксе, те перемещаем до верха экрана и он телепортируется вниз |
||
|
Номер ответа: 5 Автор ответа: ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #5 | Добавлено: 25.07.07 02:23 |
|
В 3DMax вообще свои какие-то контролы
|
||
|
Номер ответа: 6 Автор ответа: VβÐUηìtВопросов: 246 Ответов: 3333 |
Web-сайт: Профиль | | #6 | Добавлено: 02.08.07 17:14 |
|
В 3DMax вообще свои какие-то контролы
ZagZag, друган, ты тоже юзаешь 3DMax?!?! |
||
|
Номер ответа: 7 Автор ответа: ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #7 | Добавлено: 03.08.07 15:25 |
|
VBD, по 3DMax у меня друган хорошо шарит. Вот его контакты: http://manj.nxt.ru, там же и примеры работ можно глянуть (не реклама )
|
||
|
Номер ответа: 8 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #8 | Добавлено: 03.08.07 18:23 |
|
Баг:
Если сразу давить на скролл у того текстбокса на котором нету фокуса, то значение изменяется не на том текстбоксе возле которого я скроллдавлю, а у того на котором фокус. Вообщем сабкласировать текстбокс, ловить момент когда по скролу давять и менять хенделы активного... |
||
|
Номер ответа: 9 Автор ответа: ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #9 | Добавлено: 04.08.07 14:08 |
|
HACKER, спасибо. Исправлю потом. Для этого там надо многое переделать...
|
||
|
Номер ответа: 10 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #10 | Добавлено: 05.08.07 01:52 |
| Кстати, насчёт самого сабклассинга, сохранять адреса процедур лучше через SetProp, а то как выяснилось, старое значение может нужно быть для чего-то. Возможно из-за этого твой контрол и вылетает иногда, хотя довольно редко, скажем так раза два на сто тестов... | ||
Страница: 1 |