Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 | 2 | 3 | 4 |

 

  Вопрос: Поиск нужного фрагмента рисунка на экране. Добавлено: 25.05.07 19:38  

Автор вопроса:  Andrey

Ответить

  Ответы Всего ответов: 59  

Номер ответа: 31
Автор ответа:
 Andrey



Вопросов: 1
Ответов: 11
 Профиль | | #31 Добавлено: 28.05.07 20:08
пока искал по форумам совсем запутался...

как правельнее загнать рисунок в массив? примеры на других сайтах почемуто не работают...

Ответить

Номер ответа: 32
Автор ответа:
 Andrey



Вопросов: 1
Ответов: 11
 Профиль | | #32 Добавлено: 28.05.07 22:18
какой командой очищается Picture2.Picture?

Ответить

Номер ответа: 33
Автор ответа:
 ZagZag



ICQ: 295002202 

Вопросов: 87
Ответов: 1684
 Профиль | | #33 Добавлено: 29.05.07 13:51
Ну типа мой выход =)
begin 644 VB SPEEDPICTURE.rar
M4F%R(1H'`,^0<P``#0````````#"1'2`@"L`TQ4``/T6```"QI['I/=CO38=
M-0L`(````&9R;4UA:6XN9G)X$@%1&0BAE\3AHT2)-(E)M$A1($!$C30%(D$A
M0TCT$1%/X,@,`J)%HD*2*0)H:3Z1Z2H"0:!H(&G\"0$BTA0>U7?V#OK"=KWO
M:[WWO[[WW_!>?#GE5YE9R^5EYEYR_/\QEWG+S,YS,YEU^<^-U5U=W\+^_`7`
M`#>[_S[/+[^OQ^N4`*E93[*F`'N7Q`_EY?GC`%``0CY!^X?(>4"']A$1DQ(1
M_[PI`@>:3%93SN=_.5E?/+C0OYY89%O]B8&Y@9&IJ;?NYY><'1P".C0$;`O^
M2`]RY1']]E!(2%`(L*RP%_'_ZV``K).5,[`^/'`#F%8\/_S?6T`&OYJ_E(>5
M3_=^]$`]^S\4<PDYO+C*!5]M'_Y/^8^(OT#S?XGW1S/T:0E9%SC?J$?/ZZXZ
M'";(T>6))"PY[$L6]5UH[$6H=N`BBXZ13N+EYBELLO8V>4@9<IL?_PA/X%_B$
M1#RX9[^1>4X'N6.1_]W\45_;.4_]<AYZX6'$L1-#I^(-CZXH`F_`?*O?YV`)
MP#?N"LJ*_OG_`"R$\)]5?4`[+!_;Q[99=%7?SF7]X'IWVY+27&;(!K!:U)'ST
M_=#/E5,D/.N:?-O'RC-?O&;.#CF''0_;FO4.R#<%T]G)A$5MOR<RBJ_3X,(2
MR(&SAI7E&4_F=WP%FIA3N_B[974RL[^.%/%>.7;C&3L6[A55<QAPK+-L@11R
MOSFW*ZXLMR7\=.)G-$;;`RT2:"]).Y68:=6)RK^'RIE[!BBLQD)=4S8[.\CM
ML,@S(IK@W;B@&7E_18F=R:-S7CH!Q:0:9=&I@#QF,7EBT^<I\#WX;BW,N!@E
M<F(]Z5CZ!;!MLTV$S18'U(P,YX7&6V9"9J^HKT?U'#KT=X1/M'KUG$6W>H;Q
M7-]A-\'8Z:+.15.A0<;ACFX*]$8768+\+K5.2>G-I1E-N/[:1=N^SM!=2MT<
M$5)1#AGYDCAU.=!056S.ZBHD"BG_MDA9BTM6S,8]52`,-M@8=M2`XOIKV,)]
M.<?83KK=92Q"F^L/X."7SYTX-5!%5>25<ZRR]9PTCII]*VYHA)E>R$LY4+_;
M>,.*R'Z0V6IX=94R<8K`<;)SW/[+^LQQU=`NN8G,J7+,C",4KF*$I>K9>RHYX
M8F:WI\6$TH=H+S=`)"UN*NJHO`%4"7%]-7>A)<HFFQDIJJ/57OO'RQL&44W8
MNR[C0:<"J-':T5/[^TGR#^A14L/AA7!5=.L96P]\_?K3'%03ZD_4NH9)`%7]
M'6\UTCW/PYSFF<?B/U["7R6#FVV9:WUM/9A$+O-@E%>'3CJ5&XZC9F)^Q4R>
M^BQ.:2.>QBYB=%#>Y,N#Q%34JYV]-::%8Y="&\4+"]L5-&5_D;E%YLZK08BI
M&OM?:VGJ28$OT?9$"*>.QH1J1!N!Y&=KQW*L&+E2TU?J\NE[9_;J#(B6_EV]
M*V,UP?:MW.AN2%4`M3CW#-SY(IJ+CUIT(<'%*;_UWR+4^Y)3^&AHW41SU<12
M$NE\./;+&W`IWNG=35+X]!$Z;Z(@EHT:J`C@,,I*E0@0%=9ZGH^:$FG;5&52
MEOTMT332Z->A+S\EP&:+]RL=1:(67?@\"S7U>;DUT2P9+.ES.SP[5)5W\4B#D
M>:;)E^;V]JVC6TRFD1GY/@QT?64L5P'R9JV+[TK_:5<HB:7+D.!F3NO\8*8.
M(QN&5EKZ?6Y)"[O1CHRU2)D8H:-IK1O6GYQ(:"<>2DYF&$2%*6)<9YSHX$;=
MEI0WE#^@6-C>8U-KP^;0(;J4W5H@:\G@7GF5ESD!)`KLE()Q.?J`:V65"MQ3
MW\<55Z(5/X:OJJ-SX8%3<QU'Q!:JJRO4QE!2N1-N$-'4;*&RY>[GT?GS[Q?V
M?/T/EB5UAJ'K9.3%FQ_8'RT`$?E.J"[7)9P)X",7>P.$DCS:F:KBO8(7MGEV
M%P\(*>OM#3Y.N],?6>;)H489)8,YPGHW((?C[]E3[@C#B,SAK*BN4%!<9&BG8
M^FYDJ5,^Z$F[G3VK9)IBH>;)P:)^EQCN\Y,<7I#)9VM;2BOI;>8=*0<9PZX:#
MH&QW+M+%V,GF,VW$2P&,0,B:GZG(<:<O9)1>C0CM6.\4G3F:`?N6G61IY<60
MQH@SP-LSDK@/$+HL5[(RYP?HG]YR_]@^MNT7B2A=RF:"=^V8#&U#F;0;4GP&
M)ME:.+#'89M/N#50"WWU7W:%=;9)J@8<.*H)OO=-)WNNF5/T`7'`@;57"M*0
MSJC_$(IS-HJ-WYL1Z>?CS.(/',23=Z(&8PKRNZON^>NO'GX?2.7*-AZ6J),C
M\&0=A+;4DQ)G`VSVNP9LELA%2'^%XK7J""^;DH7S_VW?`9R?MDZ7T*.^P-4=
M(+-A\V7O<;DS0P:;@X)0'UH3/(DEP!IW)%K6ZSS'/P$:\`#T,A>@5AX6M7"1N
M34>G`72OZ@'<7QEFCY[:[2DH5+>Q-,KK;K^/[(RI?R?10UP+"Z%]&+2";(`:2
M3`?U]C03RE;%Y5&1]!H[Y]ICHNRM?A=AY<4D.4;*L"$UYWFL5O4E]$W5HL0)
M6<NFG5HMCII*+;C&]+F6TXBR_I7>B*HP7["YB0/-V>:VL$N:3FY/W!*F%7L@
M+C]#IE2[L6*B80AFV;,>?^R.0Q:Q)+R_J2,?2FHH%J<S+Y$"0N`4.1\=B_:T
MU-C=./)#3V(V]>XF$&@8BDQGH;FM+.<S+OKMEYII!7[/:VAZV99/"&@Z;HWP
MBMI\2)N[9#'KV1QK*(5\W]2"2?W6]-7BF\=W_;Y_,&J4%RW&?N(//'3U(2R+
M<__%4E)YW*'E,#:$0,NDUBS6[+>&?GX\X)+W.GQ1/<C:[454<'9@5>I18![^
MV:Q<A[90O,$G^YV\T5+7-/*C*-Q6FOI:FS>%LP,9CA8Z4%"=O_YH8FS[56>A
ML3U"L==',9,H1*1W"%/OSIY%4?`(DEGZ%4[W,=O1OF&4^)NTKLMGVULK$7W3
M@>4OKAPJ=X[%U--$]4#Y3H%5>?C+[F,"$,RZU?K\E68TQ%1B8[G#E)49S#:U
MYK7&^/&2F%U0D+TW_"^B6T=:85[UCP&G%OD_6Z`;#'!%KIZ`L3JC3WVQU>;([
MF,^]W6<]TH5!H<'\1(_LI,-E.//F=DX\%)@89BF>`.;%LE/^T9N<R5,I([NP
MR)(]_RC\I(>EAMAZZH[Q+$;S5L2'4X']-O!C8:`-<Y=L?R&5^^)JA.,OSJ&8
M7C,C<CJ:(5]).VR$,@MQ)G(;M`97A]B:1J$J$"SC%^D\<"?3$Y7UK@_1-:E1
M@^:4]`:);ES,NS2A]!SZW,UG^*9<_\W";(?&UNJ8UTOJ*UW\WRYO_EGC5H_.W
M:?^?-.IXA7JR#8\TKBD#7SIMU2F>0Q`:]V27`-FU,J=U?N9QF"7W]6+$Z$+5
M1>+V%\SU6#^GH*_<RM-5GJ2N>;D'Q'G('ZV60)\C+4#T<@K\)<IM?*"R]4_'L
M?;(+US_6QV;&UT&X\)^;5RD0F^6S/T"C&H_"M:N/C$_BCZ-8[LW,34[[0\D*
M@B\PF6Q[><NI>#$!EV'+K%IZR_K2O_&]0-)8J.A^AMM@6@AXZ'-9<`94=JH1
MA==3+#/S`E7R-[':<K&.9CF]"F^^]_97VP*/#R=VBQ;GYHS@%3>/RP\/K]QN
M3[!^H7S3PXY[$-LEM3.\7FG$KFJZQA95?2V.`?EYBZ)UE]JU<=:97L%QV5MJ
MBXW0[/5S)X&-Z9TOQ#F=3J#TE;860F<FEA]!0BW_E:RW"7<2YUNONE&[XVAI
M]3H.HXT"-ZD&\LT>%-!.Q_D>A)BM<793J!?.0E:C80UTD22XW;J-G2=9N3WO
M(0^5>O1S$AIX/09KROO[D.-1,7OU`)A._`;M(+@1/#.K/C/L#V7.P%BJ86<X
MTI<B<V\1)L+&YT;U$4[6YH(6>W_IF/^@=?2+=7N!A%_0*R]<WC%)D]755N<B
ME>WELF#5.#*^U]Q;X,YBH]VYU2V-/CWX\F7*#5E[<5/>27!RH;.U8\->=<:@
M6\!81>J#HW72@[$=!;(#1@*3UO6FE[(D!)QO:$-2XVPXB$@H+_NNZ_;=>;)HP
MU;J1,OM,RQI,HC$Q>I7:/N[7T"L9E34VX36EQ7YC%6#7!PNWD3K7H=XO)!N_
MJ$W6.8W&R:]Q``ASV!$#N>#4J7M22Q\EG`8!;!VC8"V]#Q;.0/5!#$-,$\D9
M!E#\3>LJTX&7BK5L(H\)AK#"PM0G>F*^:M?:S$=2VQ1USQ)/_6Z]FXUA3#XK
MU9Z,$N/"'_J4RHLND7IRNBM`;>BT>7G5VMJ6GOUOY:4+74-R-G(MK%2FW3!5
MH/GS51@?'BT7HL[4"V=$G,U5QPH&GJ2!%[G,?-N]`D+3K`CY\0>HVF#.OW4/
MU>Y-H$<XCH!$!#7UI\MLGY7@!ETZNJK(:>@.<^2B2',S0R`I>&H<AQS5H"48
MEMD=+G&'X:I2;U6U>;DMS%N=OD,_E#+S5/G8W\N=A1_O-']0!9@;LLQB9FF]6
M>3"AHJEIDM"7L)%33,[[]F+O>_8[KR7>";D!M"I,H,6O#/CIZZQ&#U5;M\3^G
M.;T,MY8Y7!IBW:D)[UJW$BYIFS-G6RL#1U:GP:5%GYUZ:CKNFLS1RK`Y=[M7
M`7%<_.8[77M=TL.<$0VG=9)J0U8#B<IOO8#`R2?`\P*G<6SS%PXW?Z=E`_A@
M.D%-5\@*F[2@PLVK&]NZ'A0*X+KGW";)"+0C<G6ES)VG$8=)0'`$LDD2.!<W4
M5WPO@9-FW#K&G5OTU0-SP#]0UII7K0SW!W#2$_\3]I/'%/&IZ8\:8QNX0]'C
M3#5C&K_4]JQIJ*[AI/P70:6<38<@:W.ZS-IQY%E9IHP`..9*)A\!)FZP>A_K
MJ),!7]-@8O(!U.BTS0^'*![.)G2Q(6J(3F)";DW!DW.-%E3^$&]8RJ^9<?>='
M!M2#\'&;)RD.&<PM01YWM!6M/#>WDO8J]=$JVQ7V&:K?.50LP.MI"9B.]B[5I
ME(B0I\!M$Y=FTV.6I3E:.>%%B".>##_IV"B9^8$HUKG/G6>6-^L;>7KR]@PV
M6GCC:(VRZ]\TUA;-[ON9JI8F148`NK9!4C4KMID4D%O47CG*H"OIB%/ZZ<UW
M0.K^.H?HTUENKFXX5TRCD-I%^V*!JW`SKC`9RG#5Y39EAT9&*8ZK]%8PW=I)
MHKV0[O*\">\4FE9IY,D"BQ__EP'FHK-MQ@Y^+#(>CJI::S],KI\X]LGL!CP,
MP>TD/H]-5H,7%QAW;AX3<,H_.Z4K?S'7MP82VIPD^P,-I,O:!8'X\N_4`N'F
MR6TE54@62=Y>;DN.WX2O-J=U8U%2$2_^>YS%]AYJ8WU--E;8$F0F]#8ZE+<OC
M'T?20LL--S_CM0(Q%E)HC_M/05T)]79D]*KM-A))_/O8$%<;)/ZF-UUH/FZ9,
M#\+0&$[%YCK26RRB+Z/E#:][W#X;XCY$4?QG20'^]XGKJ2XR(<;)*HF\]\!3V
MQ-UWX6"\G#PZ'FS/?^::N@8O@_S2NQL>Y[\C;@>I>;)P]&X,WN#($F*UDZ.;7
MDO_A?BUM3(WA3PONHF9_H@?-%9*.WEJ<;T>/'-+S[$K211'UUUKBTSP^HO[T
M))FSSZU#DDT)&AJ!I>;^_1@R=(:^GM$M1(AZ1*0Q>'ZK_@.`R/Y8IEU^98KU
MH;R@N#,^C@0]WI/Y>J5[%\XWRV0C\EF'CLW(GX>FEUBTP)^8HK)R+9RA8XIN
MIHM9)V6;%_%Z,>^N$M_'`JEP%:I&=M9E^C>*C8`A/2/P1ZVJ2)80Z3[W60(I
M.-M'T\TIQVM7!?($S?0F)TV#]VF+]$Y9LEY4_.=(+:\.H,84V.UG?E<-*AZ0
MVN5Z//6TZ26XETO5I@Z"QB(A2C_;@+EMU<?.X>E537=SQ;&?YZ3WD$ZGAE"H
MX6"5:E%\<3.6C^;%L4D8&?='\ZDIAUYZ6T.-G-8-U6#$KEK(-#>=;F%\<=G[
M]P'ER\+EU+H#A^)JGZ%Q`]7:"-4(CFMV0BI3G.N?P=8YT4N'YLV<;)B[1\D0P
MZDIU/$'X\\2WOE,U/Z>X+!R0^3Z.<Q>MO<!9H0.CJNK$1H>9$>3,;7QIY.B5
M3S0_J"[WP_J*SI`>TTH:S]FJ]*%)^^^W3\WO7!,&:UI4*57]0V<-OA09#Q:M
MA1S2N$:#IW#+G&P`ZI;"8PB46&;(?S(D40/&_Z*!*^%<>NE&6E9;ZD)T2'Z?:
M$FXMF#S]<8BQIJ3(L-WG2H=#2+P9^7,.Z`?2?\&J7=P><+]=N>G<Q:N1=/J1
MIK&T$4RS+59;SA=X:<MQ&9L<SU/@;1K1IGYO&#^04B/>I=4!E3VX)Q.DRE*G
M..E.&!?$"4'R?LL!S-Q-N3$$U%72:2JB04-R\922P6<ET<E#IOH2W3V\@:[0
M$Y61U$^G)*1(AJ=JK)'*8V,>8;W.GO:P(,TW_O[$[94W.`M;W3/L22E+R/!\
M<C:1Z@Y.MQBEEV(+?$90&@G110DV1-T[RA[.F>U@CEJNE9**E&_"[8(V1"PR
M*+^F6%&A#";UTF6FB,-^S9L+PP#M]0&1"QPVQ@*3P8.\&>WQ"?9%967P[5Z;
M&/7$3"77LUH52/,?%)`\C,-])XP+GXY&0T1>GC:37JE_A>1F+.G$X'>]Z2&!
MMHYL_RJQRT#V+\CWF6+I4O#%MJ6^-F@#P0VOH-:85/9CP9;R92%)U9.;+'!`
M)TW2LJTW\Y-Y"Y,P?4_YDYO3&AYCZ_L/SQ,2MZC03PK^GL3\C^%HTBQ.R:#7
M->;%=:.T]X6@80/@\%4JQO4<K'L1_,"3C;'I2#96V&S-F6:>\E:U>;)[9:`R
M@Z-5U)@5=;+KLTBY;QHJ7OER3\!T4EZ]K]A]3!D8%NA90S-'VE_`T_16VMVJ
M3N+1!Z%%2O_?R_GDZF/N]&-,?KKQ$+(HF,CTU(*M>31<A_-]$I+83#8>JJ#Y
ME-&+U2K2F&PB6WPL3FSG*U=MY9'<*H3(VL;(UD9:*+GS,1V)E0"L'-NCQ[X!
M#-TJ:[W"!(;7IWC#US&G`,Z<ACF8/!#<H,7X,$]OFW4T',=HWPC(/I7>?&II
M"\%CVS%>R/)0&;)0)CS9K509+*$58^I?:V=H)Q!`>SBXB2F<ZALTEQ=7L_#+K
MS!G3W]&C;`FZQBQE'ZE#+2=.K1_9H%C_6Q>.:J?R6"?%^/$_J,"K.I'1&U-L
M.T-E?@1C3)208>+'NY>/[V=4#HFW#Z\:(\7Q/C@!`BP28V8E[I>Y(J)*F7(^
M7:I^>MBGZ><ZXU=>64P44;^*WKX%PE<AL:\IOZ]K$/F34Q0W*\`^DW&PQ)0<
MP'J"]D="G!TH4[@_J`A5:^5#NB4T[U,)**P!&?<=7V>JRD+57DJ$4T2K*AS%
MPOVV=O0_!&VQYK<R74^3=SIY^Q<BCXTCZ7/W(N9)J*9)[ID:)4:DM=>+W./C
M+:\)9MJ,%LNUEVC]@F-#'&/5W\X?SI]);>MCV4Z$[?YAS$C4HGHG>%<JZ':R
M1&;?C,&Z^?PV]M?@SK.G5DP#<.DP=-_K2LNWNFVUZ[AX-3K/-C]W=*A0XEFU
M*I,VKS:X.\[1%I.M<;)I?ZV]S_P/']<3_9!"8=("`*P`D`P``;`H```*O&7=D
M+&V]-ATU"P`@````9G)M36%I;BYF<FVG&%7N$3UGR<QFZV(@'3C@@;6VE;YQ
MAZI+[\X@HJ05!LY,T6U'CX+7"SL\U4H05%Z0@GFA=0:G2,J$[,,-MB!;[U9?
M4H5O"SQL;W1RWXMQ@?9ZYW)%!\AF3""Z72=-4L$-:*^O]@?&68"]X_-)BA%1
MTX1YRF\%0=F;9N`GFU_.QKC9B\!P*V2/]!BF=-@G0V\O^,Z1O<OO2ODP5R'$
M+/`>0D?-M]'&KH\DWMJ`];:>&9&TTR).6;0W=1\[*G]`Y]F+J/L`[C;+>BE?
M"X&Q^GQ\.*7]X/*<'*(TH#N[)/\JF(T_=UI8<A_ZJ]LO9OPXXC\"IF5;Z).P
M9-M5[XOA#93G<?%QQ(6G6[_KBO*[^=(U,VZ_50C%PIXR<Y;E[*H>;S^?&?,W
M2W#H]H2D<I13&H5P.NAA)*=Z.<M@\HX$L0"`7!*.'>;)N0TZ81<V&HNG#AG\^
M:_@$;[':3XQ!ZE^`&M%":"SEKW..\M\[OHQ8>_%T!HSCW*5$648$EGC$#NO(
MBH@&%NYQ&;)I-'&/,>;)BMIU_X)2*&1X)^)D:/?5[:$8+L-8K70AS[0/`/(]>N
M3GR,B%VPX@T,WNEJ'__O$,[NFF)VG&$R>YO7'=W,O2/^'#C'X,GS7-?3L6E(
MG-\5]X7XN7UIWT,FUCRQE5>P;K?8\/&LYGT[]*Q(`'S6=YB6:;&?WM.K8:2#
MFLKCXZ?>E]G:&LN[V++U#?/J0R<;.4(IK%`9FFL/\RHE0MN:KYSYS8I?-XID
MP)*!T03B66+X^@5H1E63J^P$<2,>:NW+D$+0',[=..B<Z@BB+K>7H,;H_D<5
M]/`(G9:/WA`=IND>4%I:H\2"&O)]2KE4>Y-X_V!`:7:DW*?QV,VG[K\C^MF,
M]I+=;)F=_VY1HKV(%D7=4*"-Q3'W']1TRP?J?>'DRR2'%X(+^'8'N*&*]422
M@*K:\/P_.^U2E'')NZ-'A(M`"IK+#14P1D>!VRS7^>0I3S@A>-B%#M0^*'[H
M/LO4K%QDLW`!@@-$C<5_,R]6,/1IXO41?+T.@'1P&-90YLZL-\4-U\*^35_,
M;25^R+TTU";D``+^(9_:I_]3LA72`@#4`X@$``-P"```"P)PA+4-DO38=-14`
M(````%-0145$4$E#5%5215]415-4+G9B<`P9$,S,_1@5/>@7@[$?C;0*@HY!
M?&A^$J_%J`B;0B4<\*Z*";DM49E2)01*<;E%[O0(Y56B5"4G9+;PA!+<S=T[N
M85Q_2"<T[N9N:/OOA]PR+;2&5S8'I]#I:J,LUF^(9&%?;1Z`F"H"2(![-/Q^
M[-AD9Y>1GVL][AZ:_D/A\ON_&/(PSCL6&-/]^=3V9O/U0Z3;3'"CDR;P>4LX
M(6>>/'GYW,7-6<M`CC*1.K4XC&RR3FAN9"6`<AZ[A/?B_XAA0T+>;D1&_>>;)?
MOCXK1A.*JWZ?,A23F%0"=+2A@<<;@>:BZ>ASZQ.0Q,!;BJXTGM/A)?"4%=9O
M$%1>P$TKXCY!/2@1+N=AWF]PSA<4JV<?B&^64,"WQ=B<M`59>-48R=^RMSVL
M9E)K@):K>;))X@IE2EP+A_=KLH;MJ45.Z-*IEFJF+N;\$FW#4;WW<,M!;VM7U
MZNEGIWV@?=_A;HM:3X%8`ZZ%(WU'H]:SD=NRT##M;".OKN*F*LS,7FG&;)-Y.
MM8?@6LDIFM02?:_E*UR:<O;Y$.SP%0H_F-M[1Y`Z25+MA*[!>E+Z8O:%\NZ$
MX+F8,W^A(V$<6JH!2W6U9XUO_64^+9FNYCW,V$TRW38_-^'%%4(AA(.I3Q8-
MOZ8.E7]]W!M2ZK\H0PUT@(`U`$\```!;`````F/2>88N;;TV'345`"````!3
M4$5%1%!)0U154D5?5$535"YV8G>G&$8K%+]NOXC#<B^_T__LC/3PU@[8!\H%
M6_5HPZP$V5&&V\R93`EX?M2*N0SYT6"Q[^^*0.-6D@$7S]KTN$'J;6X0IPPR
M``"_B&?VJ?_4'#)T@(`I`"P!```.!@```C,0%'0!;;TV'34)`"````!S;6%L
M;"YB;7"G&$(-<G@5IT!O1F)MD55EZ3N9#!YK,U698*4:0Z\2(;64LUQLD-##
MW-VZU);A@6,R^U0'G?&]6?D6'JV5H!O`.6!`Y6C_5''XN(G$TU^JH^.,@F!\
ML2(<`O6GWA[-0:W>*EQ(_6H1>A6VRH4RMUAI,_[8D1]-3&;(Z"`V:4Z:DJ04Q
M>T=P,#DXP;&#@F2X"%&XDZKP^M7XH>RL/LZZI1C+<Z(OM!-T2:\87#,0@<2!
MT`J$3`-Z0S9*M)43W-;U3&$D[*V]-SV^=`>-GVGFM""=&;SR("TSW:)*5LR\
M+J5;[DRP6>2J.Y1>BZ119S"/]WH%-3?9&>6\>[EQ268K)2<^PF\<ZXDGJF#0
M^QD;QW@98_$G$0+/#'H[]#9,:='_XKQF(@```+^(9_:I_]3(BG2`@"@`CP<`
M`/8G#``"=X,_S0MMO38=-0@`(````'1E<W0N8FUP"B&155E(_)@-^SL(+1/P
M!$&E$ZP$9)[2M";(IUJ4)\252B42?@2/Q&I!%K6MZBC4M<;("0)3)9)9($K[1(
M'0DE4:NB-"C5ZG]K_S<LX[.Q'I)VB5^AOPS?#-9O.!L-_#PS6;WFZ<W^&YK#
M6?#PUKP_SSTP-!S@<H].<.<SS7]U?P?+X/V^E](\3EI]QY'3U/Z?8?[N\W;_
MP[6OSPY^/`&K3CQ63X3L^"=GP3L^$[/@G9\$[/@G9\)V?!.SX)V?!.SX3L^"
M=GP3L^$[/@G9\$[/@G9\)V?!.SX)V?!.SX3L^"=GP3L^"?GPG9\$[/@G9\)V
M?!.SX)V?!.SX3L^"=GP3L^"=GPG9\$[/@G9\)V?!.SX)V?!.SX3L^"=GP3L^
M"=GPG9\$[/@G9\$[/A.SX)V?!.SX3L^"=GP3L^"=GPG9\$[/@G9\$[/A.SX)
MV?!.SX:>GY\)V?!.SX)V?"=GP3L^"=GP3L^$[/@G9\$[/@M9TKW^?3X3NGY\
M)W7S/RY/A?KUGP[XL?V?"H/>Y;.4[#U7H[IR4[&[3WMG^/`+;=[N5=_9W.&>
M_QW>.]V?X\`M5XFIZ>Y3[X]3UWM/Q=SS%SD]_9V?X\!.ZT?=;E!_K?]]C4\]
MZCW'^-V/[]3P_^BR?+UGY]3_/'BLX\!.]`H7/%U/D_\PL_6UG)/[ZG6UG)3Y
M]V/(K_Y/'BLX\!.ZT?]=3]'<Y7WWFI^%[.Z<E.^I^E_+CV89QX"=Z"E9__^,
M&\\_L^)W6U]O=C][MRI_VQ_9\+?_:S/S?6ECS]6\KUV=3\FS_'@%L/EU/,US
M[O_"M?5K>QJ<SX'I9SS-_\S_'@)W6D\W4Z^N??U/FUY?SU/QOVO0USKYD_CX
MG>@M#<Y+^%V\KG^[7/*[7?I73WQ>%]?,8Y^/`-)=#"LYMRFNH\.GO]MV-/JZ
MG?[J=3=[YMG^/`3O0VH>>-K/.Z6>OSK-OZ?Q\:=Z(UYSN]3XM9UM3Q]X6SFW
M4ZV9\6[Q/\>`=&/5^>!J>[]-7SW9W3X]\7@;.\>`5#?\Y]/A.\>*S'PG=/SX
M1D^"=GPG9\$[/@G9\$[/A.SX)V?!.SX)V?"=GP3L^"=GPG=/SX3L^"=GP3L^
M$[/@G9\$[/@G9\)V?!.SX)V?!.SX3L^"=GP3L^$[/@G9\$[/@G9\)V?!.SX)
MV?!.SX3L^"=GP3L^"?GPG9\$[/@G9\)V?!.SX)V?!.SX3L^"=GP3L^"=GPG9
M\$[/@G9\)V?!.SX)V?!.SX3L^"=GP3L^"=GPG9\$[/@G9\$[/A.SX)V?!.SX
M3L^"=GP3L^"=GPG9\$[/@G9\$[/A.SX)V?!.SX:=GY\)V?!.SX)V?"=GP3L^
M"=GP3L^$[/@G9\$[/@G9\)V?!.SX)V?"=GP3L^"=GVOL<=N7_9]CL^G9\G9]
M;'COQ+>X^QV?5IC^/L=GU:8_C['9]6F/X^QV?5IC^/L=GU=8[C['9]=%C^/L
M=GU=8_C['9]=3C^/L=GU;X_C['9]5V/X^QV?5UC^/L=GU=8_C['9]7N/X^QV
M?5UC^/L=GU>X_C['9]7N.X^QV?718[C['9].SY.SZ=GR=GPG9\$[/@G9\$[/
MA.SX)V?!.SX:>GY\)V?!.SX)V?"=GP3L^"=GP3L^$[/@G9\$[/@G9\)V?!.S
MX)V?"=GP3L^"=GP3L^$[/@G9\$[/@G9\)V?!.SX)V?!/SX3L^"=GP3L^$[/@
MG9\$[/@G9\)V?!.SX)V?!.SX3L^"=GP3L^$[/@G9\$[/@G9\)V?!.SX)V?!.
MSX3L^"=GP3L^"=GPG9\$[/@G9\)V?!.SX)V?!.SX3L^"=GP3L^"=GPG9\$[/
M@G9\-/3\^$[/@G9\$[/A.SX)V?!.SX)V?"=GP3L^"=GP3L^$[/C6XX[:GJQW
M'Q.S\[/BV/';X94[CXQV?QV?&.S^.SXQV?QV?,=8[CXQV?QV?&.S^.SXQW'>
M/;I;/FSNS^G<?&.S^.SXQV?QV?&.X[CXQUCN/C'9_'9\8[/X[/FGL=QW'QCO
M'NHUL[L^-G9_'9\3L_.SY.Z?T[/@G9\$[/@G9\)V?!.SX)V?"=T_/A.SX)V?
M!.SX3L^"=GP3L^"=GPG9\$[/@G9\$[/A.SX)V?!.SX3L^"=GP3L^"=GPG9\$
M[/@G9\$[/A.SX)V?!.SX)^?"=GP3L^"=GPG9\$[/@G9\$[/A.SX)V?!.SX)V
M?"=GP3L^"=GPG9\$[/@G9\$[/A.SX)V?!.SX)V?"=GP3L^"=GP3L^$[/@G9\
M$[/A.SX)V?!.SX)V?"=GP3L^"=GP3L^$[/@G9\$[/AIV?GPG9\$[/@G9\)V?
M!.SX)V?!.SX3L^"=GP3L^"=GPG9\$[/@G9\)V?:_;QVUTXGS'9^=GR=GUL>.
MWU?&/F.S^.SYCL^QV?,=GV.SYCL_CJ?,=G\=GS'9]CL^8[/L=GS'9_'<?Q\G
M9_'9\QV?8[/F.S['9\QV?QU/L=X]S^X_L[/FSL^QV?,=G]/8[/F.S^.\>XR\
M?;.S[9V?,=GT[/D[/SNGY\G9\)V?!.SX)V?!.SX3L^"=GP3L^"=GPG9\$[/@
MG9\)V?!.SX)V?!.SX3L^"=GP3L^"=GPG9\%IZ?0@3Q5T@(`S`"<%``!(&0``
M`DS<82"\;+TV'343`"````!C;'-3<&5E9%!I8W1U<F4N8VQSIQA5[A$]9\G,
M9ND@6C3+,=THA,37^$B6Z\Z6VUG*7NUT+A<2E@$<=F(EZG%PB`R>50%*F">-
MI^ME,D#03'$W[ER=F(B#].*5IWK=N/?Q!30?0S4^I[/64#&G99P-J!A=B"^\
M18Z#A7S+X<M:R\9PJGHU8?N.RX+;_4+Y;\$&;)A2QRJ30TO*U/1H!8HR$$?>\
MI&"C$\FQ,]+>/8&JPDWOYSO&#O$DYV!V&+-92VW;D&!B^G`F&V=`;"PTS\]$
M`X6,U^R!T[AA8GK(ATXGJ$UXB48^OD]3=@^";MQ&X&</'WIPBL0WC;KNL4>.
M]@3;[NC;J>!"..<#8\M&8E$KU890=2%8DT,U^-+HJ$6'<4IJ3/A="HLZ-U<?
MV:F?UODD!M.P#W0*0YQ77YBR_RB)ZPFZ.IY0]DTO3RLRJ]7\W[H8XU"TJ:SK
M8*T%[X[_6#P66*F78T#ZO,LX"-9!F[9&[@+VP^/!-<0UP7#L;?+R6PO2WX@)
M+GPS!Z(OS.[2<I$<;)527-UWM&NZ10B#$_G*1B;AJI,"'?N[A]I,GG3^E2G6(
MWZ3ZQUTTUY-[;!NY,&:9X(R:D4]\/QDF@(]AB1!JIC+J-$4>G&F#GE_'SZJC
M[>;O,&U9_@4':F<"5*2M1?<$IV+FPD?`UM/2>`;W'?ERO"H_#T%ENM29@5JG
M#/>$V6:\K3P]>#KA,+CEEU+@WNV?X0:.P.L0.!I2#^T(*/<Z?ELMV%:UU-[$
M87_7@Z;6:E1\%*.1(**W7*<&!+[]S5=$#B=T0\6PVZF]5P9X.^:48$WBZBO@
MG1<.+`M&',L6B;IPY,]\((BTNR'>ZHX[A./='_V_"X^=F4F28:0T_LZ8V6!R
MC$F0B>/5<%W&3O$!@&$J<:QM9SDS.FFP-+%/5!<><>5KE@H=B>`(C!(IK]3!
MSOMX*49X]>T";D7AY8T29BB;,T+%"I<A2+XGYV!_,EEZP]=G5I-NF4]KOY,ZI
M[@^U&N0G^4LJ(T*+C(Q!?BB[S+HB'@CS%FF@DWQT)N:=,2*42%K(Y=-8S!V>
M/4MRRFGDJD8LT&Y0L:6&O_HD+:=^8>XI[('/EB\M(AWK<<\?O+1H&#OJ=B\Y
M">&!E]!,L[95`X<S>C75YNK,MKJ7BMAU,&MVJ^8.#D-TF.\5I/K8;$X!63@H
M-J95-1RB@.6:ID15PFU*Y&])X[^5"K`@&4W!DM3MXBZ]+05FYQK\Q]P]6)?5
M`!:?JQ+U`?I:"+!$L\H0WXP-!#O!O%(J_3U]'7JJ<"^VGPC,_)8VD4^L?C+(
M>31UV-R_`1?3JZ;S5:,0?'5(B4W&*RNZGP/1"2E:B';&]8GD01X2J%,CQ=&F
M1ZGMV($W@B6PO\D]HJK)NJU[\2$HK/IUH]1/X7WNOF'8`-PB2F8=-?JRLF+T
MB5%Q`4F2"6W+PN')^,E)4&CY<UNUG"7)*SWVJ)$HD_QRI6+LH2\X616`R>+6
MB0&OKQUXPVM94#O11=8_=FOF*^^/8=E1MS[DE*&.""$3P3Q%R$?Y%K?`+#Y(
MP9-N^MOO2&??"A((7U;)"N4'V`N6$Z')I#7-3,T+4-O/4(!R4RYK]C$_6$K8
M70ONE;![L$KS:0M#S*`@;KC%[XY5<JV9RX`3SV3%AIV/Y.&/FK';S8P2,G"P
M*S];V3.DLK7U1-Z\J\IFX[VKLK"MZEYRY%L5L6/C>M-ZIRL^*^@.(1'_QB`Z
MXH-]:\",H8NNJ<V3A/V8I]X^M_0(IJ+#X&SXITT+T=L.,6:H<LL\P7L``+^(
,9_:I_]3$/7L`0`<`
`
end
sum -r/size 38563/10857

Распаковывать Total Comander'om или просто WinRAR'om (UUE кодировка)

Ответить

Номер ответа: 34
Автор ответа:
 ZagZag



ICQ: 295002202 

Вопросов: 87
Ответов: 1684
 Профиль | | #34 Добавлено: 29.05.07 14:39
Изветные баги:
Медленно работает если первая строка small.bmp часто встречается в test.bmp
Ну и еще скорость напрямую зависит, от ширины small.bmp и общего размера test.bmp

Я уже модуль немного переделал, он ищет совпадение первого пикселя test.bmp и small.bmp - на белой картинке черный рисунок ищет очень быстро.

Ответить

Номер ответа: 35
Автор ответа:
 ZagZag



ICQ: 295002202 

Вопросов: 87
Ответов: 1684
 Профиль | | #35 Добавлено: 30.05.07 10:26
up!

Кто-нибудь у себя запускал мой релиз или никто его распаковать не может? =P
Ну просто в текстовик его скопируйте и сохраните как *.uue
Мне интересно ваше мнение

Ответить

Номер ответа: 36
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #36
Добавлено: 30.05.07 10:46
никто его распаковать не может?

В тыблочко :)

Лучше скинь на мыло пжлст: demon@kpost.ru

Ответить

Номер ответа: 37
Автор ответа:
 ZagZag



ICQ: 295002202 

Вопросов: 87
Ответов: 1684
 Профиль | | #37 Добавлено: 30.05.07 11:59
Я же сказал как делать. Не верю я что на одной винде сразу нет ни тотала, на рара. Разве что эту систему только переставили =)

Ответить

Номер ответа: 38
Автор ответа:
 ZagZag



ICQ: 295002202 

Вопросов: 87
Ответов: 1684
 Профиль | | #38 Добавлено: 30.05.07 12:00
Темболее, что я по мылу пришлю? ZIP конечно же =) Значит надо опять либо рар, либо тотал, ну или 7z и т.п.

Ответить

Номер ответа: 39
Автор ответа:
 Silver Ferrum



ICQ: 422640045 

Вопросов: 12
Ответов: 144
 Профиль | | #39 Добавлено: 30.05.07 12:05
..шо его там распаковывать

Ответить

Номер ответа: 40
Автор ответа:
 Silver Ferrum



ICQ: 422640045 

Вопросов: 12
Ответов: 144
 Профиль | | #40 Добавлено: 30.05.07 12:09
..долго конечно, но работает. Классно сделано

Ответить

Номер ответа: 41
Автор ответа:
 -АлександР-



Вопросов: 55
Ответов: 1008
 Web-сайт: sham.clan.su
 Профиль | | #41
Добавлено: 30.05.07 12:28
а мне понравилось, ZagZag придумал новый способ скачиавния файлов

(я сперва решил, что ты код экзешника запостил)

что касается работы с битмапом - молодец, только ну... как ты мог сделать это!!!!

l1:
    Set Picture1.Picture = LoadPicture(App.Path & "\test.bmp";)
    Set Picture2.Picture = LoadPicture(App.Path & "\small.bmp";)
    Picture1.PaintPicture Picture2.Picture, Rnd * Picture1.ScaleWidth, Rnd * Picture1.ScaleHeight, 22, 22
    Set Picture1.Picture = Picture1.Image
    Set Picture2.Picture = Picture2.Image
    a.SetPicture Picture1.Picture
    lngPos = a.SearchPicture(Picture2.Picture)
    Picture1.Line (0, 0)-(lngPos Mod &H10000, (lngPos And &HFFFF0000) \ &H10000), vbRed
    Picture1.Refresh
    DoEvents
GoTo l1
???? убери, пока не поздно!!!

Ответить

Номер ответа: 42
Автор ответа:
 -АлександР-



Вопросов: 55
Ответов: 1008
 Web-сайт: sham.clan.su
 Профиль | | #42
Добавлено: 30.05.07 12:36
SearchPicture
а эта функция вообще находит что-то?... я не дождался...

Ответить

Номер ответа: 43
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #43
Добавлено: 30.05.07 13:34
(я сперва решил, что ты код экзешника запостил)

Китайски ассемблер чтоль? :)

Ответить

Номер ответа: 44
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #44
Добавлено: 30.05.07 13:36
А насчет перекачивания - файлов - это ты прав. Можно даже прогу сбацать - открывает побайтно файл, в начале и в конце приписывает специальный код, а потом распознает.

Ответить

Номер ответа: 45
Автор ответа:
 ZagZag



ICQ: 295002202 

Вопросов: 87
Ответов: 1684
 Профиль | | #45 Добавлено: 30.05.07 23:31
Это UUE кодировка файла. Я удивлен что вы это в первый раз видите =) Специально, между прочим, придумана для передачи бинарных файло в текстовых сообщениях
Альтернатива - Base64, но она увеличивает размер на 33% и не распаковывается WinRAR'ом

???? убери, пока не поздно!!!

-АлександР-, я не понял, что тебе тут ненравится?
Возможно ты возмущаешься по команде Goto =) Сорри, можно на Do Loop заменить

Вобщем-то код формы существует только для демонстрации работы класса
Основная процедура, работу которой я хотел отобразить - SearchPicture
И у меня эта функция показывает лучший результат.
Если хотите посостязаться - код выкладывайте =)

а эта функция вообще находит что-то?... я не дождался...

Да эта функция что-то находит. Неспроста у не такое имя =)
Как это ты не дождался? Ты закрыл форму меньше чем за секунду после открытия?

Вообще пример демонстрирует как найти один рисунок в другом.
Функция SearchPicture возвращает Long (Int + Int) В первом Int - X координата найденого рисунка, во втором - Y
Ну не придумал я как еще без добавления модуля с паблик-POINTAPI передавать 2 параметра из функции класса в форму =)
Да так, имхо, только быстрее получается =)

Picture1.Line (0, 0)-(lngPos Mod &H10000, (lngPos And &HFFFF0000) \ &H10000), vbRed - Рисует линию к левому верхнему углу найденого рисунка (чтобы было нагляднее)

Ответить

Страница: 1 | 2 | 3 | 4 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам