: íéðééðò
ïëåú – éôåñ
çåã øîâ è÷ééåøô
: àåáî
..………………………………………………………………………………………ïåéòøä
..……………………………………………………………………………………úåøèîä
…………………………………………………………………….úåøçà
úåðëåúî äðåùä
..……………………………………………………………………………áåùéçä
úåèéù
………………………………………………………………………………………òåöéáä
.……………………………………………………………………………úåðåøúôä
ïååâî
..………………………………………………………………………………………äøæò
: çåúéô
…………………………………………………………………………øöåîä
çåúéô êéìäú
.………………………………………………………………………………………çå÷ìä
..……………………………………………………………………………çå÷ìä
úåùéøã
..……………………………………………………………………çåúéôä
êéìäú éøöåú
..…………………………………………………………äðëåúä
ìù éìàðåéö÷ðåô
øåàéú
: äðëåúä
úéðá ìò øáñä
…………………………………………………………………………………………éììë
………………………………………………………………………………………úåøå÷
.………………………………………………………………………………………êáñî
.………………………………………………………………………
éììë äîéøæ íéùøú
: ùîúùîì
êéøãî
..……………………………………………………………………………
íéðééðò ïëåú
...……………………………………………………………………………………êáñî
………………………………………………………………………………………äøå÷
………………………………………………………äëéîúå
ãåòéú äð÷úä
– èðøèðéà
.……………………………………………………………………äøå÷
éèøåàéú çôñð
……………………………………………………………………êáñî
éèøåàéú çôñð
: à
å á î
: ïåéòøä
(íéîéåñî
àìå íéîéåñî)
íéø÷î ìù äéðá
øùôàú øùà úåøå÷å
íéëáñî ìù ïåøúôì
äðëåú úéðá
. úéìàîéñ÷î
úåùéîâ íò úéáéè÷àøèðéà
úìåëé íà ,úéúåãéãé
,äèåùô ,úéìàåæéå
äøåöá ïúéðä ìåëë
íéáø
.(íé÷éåãî
íééøôñî íéëøò
úìá÷ ïë åîë) úéôøâ
äøåöá úåðåøúôä
úìá÷
.íéèðãåèñì
ùåîéù øåáò
ïåøúôä éáìù
úìá÷
: úåøèîä
ùîúùîä
úîø éôì íéëáñîäå
úåøå÷ä éàùåð
úðáäì íéèðãåèñì
øæò úðëåú äéðá
1
,íééåðéùä
úòôùä ìò äùåçú
úúì éãë íéèðîìàä
íò èåùô ÷çùî
– úéñéñáä äîøá)
.(ãáìá
øáëòä é"ò úàæå
ìãåâ
àîâåãì) ,úéúééùòú
äðëåúì äáéçøäì
äéäé ïúéðù äðëåúä
úéúùú ìù äùéîâ
äéðá .2
.ä÷éôøâ
ìò ùâã ïúî êåú
,(íúåðùì ïúéðù
íéòåá÷ë íéøãâåî
íéèðîìàä øôñîå
íò êáñîá
àîâåãì øáåãî
øùàë ø÷éòá
áåùç – õáå÷ì
äø÷îä ìù äçéúôå
äøéîù úìåëé
.3
. íéèðîìà
ìù ìåãâ øôñî
.íéôøâä
éåðéù éîåçú
úà úåàøéì ïúéð
øùàë ,äøå÷ êøåàì
èðîìà ìù äéöìåîéñ
.4
.(÷åùá
úìáå÷îäå úåöåôðä)
: úåøçà úåðëåúî
äðåùä
. íééôéöôñ
íéðåúð ìù äîùäá
êøåö àìì ãáìá
íéôøâ íéòöîà
é"ò äø÷î úééðáì
úåøùôàä .1
. (õîàî
òáö ,óøâ úàöåú)
ïåøúôä ïåëãòå
äø÷îä éåðéùì
úåì÷å áçø äìåòô
ùôåç .2
úåøå÷á
íéø÷î ìù íåöò
øôñîì ïåøúô
.3
.íéèðãåèñì
úéãåòéé äðëåú
.4
.úéøáòá
äëéîú .5
98 úåðåìçì
íâ íéàúîù, èéá
32 .6
: áåùéçä
úåèéù
äãåáò
éðúùî åìéà íéëøò
øåîùúå (…úåçåë
íå÷éî çèù êøåà)
ùîúùîäî íéëøòä
úà àø÷ú äðëåúä
.1
íéðéîæ
íéðåúðä åéäé
äöøää ïîæáù êë
êñîä ìò íéèðîìàä
íå÷îî úåøéùé
íéëøòä úà àø÷ú
åà íéøãâåî
.áåùéçä
úåéö÷ðåôì
.äø÷î
ìëì úåîéàúîä
úåàåùî ìù ïåøúô
ìåìñî êéåùî
äéäé äéòá ìëì
.2
(ùîúùîì
çìùéú äòãåäå)
íîå÷îá àì íéèðîìàä
åà íééçøëä íéðåúð
íéøñç øùàë
áåùéç øùôàúé
àì .3
.éèéìðàä
ïåøúôä êåúî
úéøîåð äøåöá
åòöåáé íéôøâä
.4
: òåöéáä
.98 å 95 úåðåìçì
exe äìòôä õáå÷
ìá÷úî øùàë
Visual Basic 6 úðëåúá òåöéáä
: íééøùôàä
úåðåøúôä ïååâî
êáñî
íéèðîìàá
íéöîàîå íééøéö
úåçåë
úåææä
êñîá
äìãåâ ìò äèéìùå
úèñåî äøåö :éôøâ
íéìãâ
éôì íéöîàî íåøè÷ôñ
äçéúî\äöéçì
éôì íéèðîìà
úòéáö
äøå÷
íéôøâä
éøèîøôá äèéìùå
äòé÷ù ,èðîåî
,äøéæâ :éôàøâ
ïåøúô
úåáåâú
ïåöé÷
éëøò
.äøå÷ä
ìò íééåñî íå÷éîá
éøîåð ïåøúô
.úåðåøúôä
çååè úìá÷å
äøå÷ä ìò àåäìùë
èðîìà úææä :äéöìåîéñ
:äøæò
:úðåå÷î
.(éìîéèôåà
øãâåî øãñ éôì)
ùîúùîì úåöìîåîä
äìåòôä úåéåøùôà
ìò éãéîú áåúéë
:úéììë
äøæò
. (äéòáä
úéðá êøã ,áùçì
ïúéð êéàå äî)
íéàùåð éôì
:úéãåîéì
äøæò
.úéôéöôñ
äéòáì ïåøúô
éáìùå éììë
ïôåàá ïåøúôä
êøã ,äéòáì úåîéàúîá
úåàååùîä
.(òâøë
ìéòô àì ) ìå÷
ñô íò MOV úîåéñ
íò õáå÷ : úéìàåæéå
äøæò
: ç
å ú é ô
: øöåîä
çåúéô êéìäú
. visual basic 6 úðëåúá
ùåîéùä ãåîéì
.1
.úåîéé÷
úåðëåú ø÷ç .2
.íéèðîìàäå
íéø÷îä úøãâä
.3
.úåéèéìðàä
úåàçñåðä óåñéà
.4
. éôøâä
÷ùîîä ïåðëú .5
.éôøâä
÷ùîîä úéðá .6
.(úéôøâ
äèéìùì úåéö÷ðåô
,úåöéøèî úìôëä
,úéììë úåàååùî
úëøòî ïåøúô)
áåùéç úåéö÷ðåô
úéðá .7
.áåùéçä
úåéö÷ðåô úøæòá
ïåøúôä íúéøåâìà
úéðá .8
.äö÷ä
ùîúùî ìöà íåùééì
ìéá÷îá íéàúîä
ïôåàá úåàçñåðìå
äø÷îì íéèðîìàì
øåùé÷ .9
: çå÷ìä
úéúééùòú
ùåîéù úîøì
òéâäì äôéàùá)
íéðáî / íé÷öåî
úåðåëî úñãðäì
èðãåèñ
.(úåéòá
ïååâîì úåðåëîä
éñãðäîì
.(éìîéðéî
òãé ìòá) éìàéöðèåô
ùîúùî ìëì úéáéè÷àøèðéà
äùçîä êøåöì
ïë åîë
: çå÷ìä
úåùéøã
.úéúåãéãéå
, äìéòé, äøéäî
, äì÷ úéìàåæéå
êøãá ìãåîä úéðá
.1
. úéøáòá
äëéîú .2
.íéùøãð
íééèéø÷ íéëøò
úìá÷ ïë åîë , úéôøâ
êøãá úåàöåúä
úìá÷ .3
.øëåî
èîøåôá ïåøúô
.4
(íéîìòð
íäù-øúåé åà
ãçà äðúùî íò
éôåñ ìãåî úìá÷)
íéøèîøô íò
ùåîéù úìåëé
.5
.óøâä
ìò íééåðéùä
úà úåàøéìå
'åëå, íéèðîåî,
úåçåë úéáéè÷àøèðéà
úéðèìåîéñ æéæäì
úìåëéä .6
. 95/98 úåðåìçì
íéàúî ÷ùîî
.7
.( ïåøúô
êøã éìàðåéöôåà
) äøæòä úéðåìçá
äø÷îì úëéåùîä
äàååùîì úåùéâð
.8
÷ùîîá
äòéâô àìì ùîúùîä
äéöåìåæøì êñîä
úîàúä úìåëé
.9
. äðëåúä
úñéø÷ áöîì
òéâäì ùîúùîì
øùôàì àì .10
.÷åùá
úåùéâð øùà (íéð÷ú)
úåàìáè êåúî
íéèðîìà úøéçá
úìåëé .11
.úåéöìåîéñ
ïîæá áåùç – øéäî
äáåâî ïîæ .12
.úéôéöôñ
äéòáì ïåøúô
éáìù .13
:çåúéôä
êéìäú éøöåú
.çå÷ìä
úåùéøã èøôî
.à
.(ùîúùîì
éðåùàø êéøãîë
íâ ùîùì ìåëé)
äðëåúä ìù éìàðåéö÷ðåô
øåàéú .á
.äðëåúä
ïåðëú èøôî .â
.úéðééôåà
äéòá ìù éðåùàø
ñåôéè áà – Prototype .ã
.úãáåò
äðëåú ìù Code .ä
.ùîúùîì
øöå÷î êéøãî
.å
:úåøòä
.óèåù
ïôåàá åðëãòúé
çåúéôä éøöåú
.1
.äéòá
ìë øåúôé ùîúùîä
êéà – éìðåéö÷ðåô
øåàéú .2
,íéìãåîì
ä÷åìç ,íéðåúð
äðáî ,éôøâ ÷ùîî
– äðëåú ïåëéú
èøôî .3
. íééøîåð
åà íééèéìàðà
íéáåùéç
äðëåúä
ìù éìàðåéö÷ðåô
øåàéú
: íéèðîìà
: úåøå÷
.äøéøâ
é"ò äøå÷ä êøåàì
úéùôåç äøåöá
íéèðîìàä ìë
ìù äòåðú úìåëé
: (input) íä
íéèðîìàä
,äøéæâ
éøåøçù 5 ,íé÷øô
5 ,íéëîñ ,íéôéöø
úåçåë 10 ,íéèðîåî
10 ,úåçåë 10
.íéëåúéø
5
: (output) ììåë
ïåøúôä óøâ
.óøâ éëøòå
íåîéñ÷î éëøò
,úåáåâú ,äòé÷ù
,èðîåî ,äøéæâ
: íéëáñî
: (input) íä
íéèðîìàä
.íéúîöì
úåçåë 40 ,(íéòåá÷å
íéãééð) íéëîñ
50 ,úåèåî 200 ,úîåö
úåãå÷ð 80
: (output) ììåë
ïåøúôä óøâ
.(øçáéðù
íã÷îá äìôëä
øçàì) êáñîä
úæåæú
.(úåèåî)
íéèðîìàá úåçåëä
.íéöîàîä
íåøè÷ôñ òáöì
íàúäá äðúùéù
èåîä òáö é"òå
,êøò é"ò – íéèðîìàá
íéöîàîä
.äöéçìá
åà äçéúîá íéèðîìàì
äðåù òáö úìá÷ì
úåøùôà ïúî
"Visual Basic"
– á äðëåúä úéðá
ïôåà ìò øáñä
: éììë
: (êáñîä
úðëåúì íâ ó÷ú)
úåéæëøî äãåáò
úåçðä
úåéö÷ðåô
, äîâåãì) íúãåáò
úáéáñì ïúéðä
ìëë úåáåø÷ åéäé
úåéö÷ðåôå íéòåøéà
.1
úåøîì
X úåãå÷ôä úéðåìçá
úåôéãòá åéäé
X úéðåìçá íéàöîðù
íééôøâ íéðúùîá
øéãú úåùîúùîù
,íééììëë
àìå íééèøôë
íéòåøéàä úà
øéàùäì äôéàùä
ïë åîë ,(Y úéðåìçá
úåéäì íéìåëé
íéòåøéàäù
.íéòåöéáä
úà øôùì úðî ìò
úàæå
ìù êøòî
äðáé íéôøâ íéè÷ééáåà
ìù áø øôñîì
íéô÷ú åéäéù
íéäæ íéòåøéà
òöáì íéëéøö
øùàë .2
. ãå÷ä
úåøåù øôñî úà
ïéè÷äì éãëá
,íìåëì úåììåë
åéäé úåãå÷ôäù
êë íééôøâ íéè÷ééáåà
éãëá
,ïúéðù ìëë íéôøâä
íéè÷ééáåàä
ìù íéëøòîì
íéìéá÷î åéäé
íéðúùîä éëøòî
ìù íéñ÷ãðéàä
.3
.øãñ
ìò øåîùì
úåìåòô
,øúåé íééðåëñç
íéðúùîá ùåîéù
: úåìéòé ìò ùâã
ïúðéé ìåãâ áåùéç
ïîæ íéùøåãù
íéòåøéàì .4
.åòöåáé
àì ïäá ïéçáî
àì ùîúùîäù úåøúåéî
: ú
å ø å ÷
: íééììë
íéðåúð
.Integer ë íéøãâåî
íéñ÷ãðéàä éëøò
.úåøôñ
7 ìù ÷åéã Single á íéøãâåî
(úøçà øîàð àì
íà) áåùéçä éëøò
sapo_num :äøå÷
éòè÷ øôñî
deg_num :ùôåç
úåâøã øôñî
:íéðåúð
äðáî
F1[1:10], M1[1:10], W1[1:10]
:íéìáåìâ íéñîåò
éëøòî
ïåéî
øçàì íéè÷ééáåà
êøòî saport1[sapo_num] :äãøôä
éèðîìà éëøòî
.úåáåâúä
áåùéç øåáò
éøåãéñ øôñî
éôì íéè÷ééáåà
êøòî saport2[sapo_num]
,ïåøúôä
é÷ìç ìùîì òè÷
ìë éðåúð úà ìéëî
beam [ sapo_num] :ïåøúôä éðåúð
úøéîùì éùàø
íéðåúð êøòî
…ãåòå
úåçéù÷ ,êøåà
,òè÷ä ìò íéñîåò
éëøòî ,ùôåçä
úåâøã øåôñî
.íéòè÷ä
ìù èðîìàä úåöéøèî
úà ìéëî Ke[sapo_num] :èðîìàä
úåöéøèî êøòî
.'åëå úåææä
ìù úåðåøúô ,ùôåç
úåâøãá íéñîåò
:äîâåãì íéôñåð
íéëøòî íéîéé÷
íéðåúðä äðáîá
.äðúùî
ìù âåñ åúåàì
íéáåùçä íéøèîøôä
úà ìéëîä [struct] äðáî
áøì àåä ì"ðä íéëøòîá
èøô ìë
:ïåøúô
íúéøåâìà
ïéá ìãáä
ùé øùàë ,äøå÷ì
íéðåùä íéè÷ééáåàä
úôñåä éôì íéáìùá
íéðáð ïåøúôäå
äðáîä éììë ïôåàá
.äãøôä
èðîìà úôñåä\úææä
ïéáì ñîåò úôñåä\úææä
íùîå
,ùãçî íéîéé÷
íéñîåò ïåéîå
ùãçî äøå÷ éòè÷
ïåéî òöåáî äãøôä
èðîìà úôñåä\úææä
ìù äø÷îá
. ïåøúôä
úéö÷ðåôì
.ïåøúôä
úà æøæîä øáã
,ñîåò åúåàì
úéúãå÷ð àéä
úåñçéúää ñîåò
úôñåä\úææä ìù
äø÷îá
:úåéùàø
ïåøúô úåéö÷ðåô
èðîìà
úôñåä ìë àìù
ïåéëî úååö÷á
ìåôéèì úåáéùç
ùé .äøå÷ä ìò
äãøôä éèðîìà
øåãéñå ïåéî
: sort_p
åæ äãáåò
.ïåøúôá úåòîùî
ùé éùôåç äö÷ì
íâ éë (äö÷á èðîìà
úôñåä ìùîì )
íéòè÷ä øôñî
úà äìéãâî
.äãøåä
åà äææä ìù íéø÷îì
íâ äðåëð
.äøå÷ä
ïî äãøôä èðîìà
úãøåä : Sort_p1
.åìùî
äéö÷ðåô úîéé÷
ñîåò âåñ ìëì
,ñîåò úææä ìù
äø÷îì ïåéî úåéö÷ðåô
: data_F, data_M ,data_W
.FER úåðåøúô
úà úåðåá ì"ðä
íéñîåòä úåéö÷ðåô
.äãøôä
è÷ééáåà úææä
øçàì FER úåðåøúô
úééðáå íéñîåòä
ìù ùãçî ïåéî
úéö÷ðåô : data_F1
èðîìàä
úöéøèî úéðáå
úåéåçéù÷å íéëøåà
ïåëãò ,äãøôää
éèðîìà éâåñ
éôì ùôåç úåâøã
øåôñî : Beam_sort
.òè÷
ìëì
.ùôåçä
úåâøãá íééðåöéç
íéñîåòå FER ä úåðåøúô
éôì ùôåçä úåâøãá
íéñîåò øåè÷å
úééðá : asamb_f_deg
.òè÷
ìëá úåîéé÷ä
ùôåçä úåâøãå
èðîìàä úîéøèî
éôì äðáîä ìù
úåçéù÷ä úöéøèî
úééðá :asamb_k
FER ïåøúôì
ïå÷éúä áåùéç
,úåææää ìù úåàåùîä
úëøòî ïåøúô
:( èåøô àìì ) ùåîéùá
úåôñåð úåéö÷ðåô
.'åëå äðáîä
úåðé÷ú ú÷éãá
,óøâä òåöéá ,óøâä
ìò äãå÷ð áåùéç
,úåøéúé ú÷éãá
,úåáåâú áåùéç
,úåææää ììâá
: ùîúùî
÷ùîî
.äðëåúä
úøâñîì õåçî
íâ íäìù äòåðú
øùôàì éãë íîöò
éðôá úåðåìç
íä úéãåîéìä
äøæòä ,íéôéèä
,íéìëä ìâøñ
.úéáéè÷ìñ
äøåöá êà íéòåøéà
íúåà úà íéìá÷îå
êøòîá íìåë øùàë
Image box íä íéè÷ééáåàä
úåðåîú
.ãå÷ úøæòá
äøå÷ä ìò íå÷éîá
ïëå Picture box é"ò íúòåðú
øåæàá íéìáâåî
íìåë
.( VB ìù õìîåî
éìë) úåðåîú úéøôñ
êåúá úåøåîù
úåðúùîä úåðåîúä
.äøéøâä
øåøçù ïîæá ÷ø
áåùéç òöáúéù
éãë Drug over é"ò àìå
Drug drop òåøéà é"ò úòöåáî
äøéøâ
. (… éáåò)
íéðåù å÷ éðééôàî
ìò äèéìù øùôàî
øùà ãøôéð Picture box
êåúá íéòöåáî
íéôøâä
íéìáâåî
ïåìçä ìù íéè÷ééáåàä
ìë .äæåæúä éìâøñì
øúåé äçåð äèéìù
øùôàì éãë – ïåìçä
ìãåâ éåðéù
.äðëåúä
ìãåâ úà ïéè÷é
ùîúùîä øùàë
íéè÷ééáåàä
úà åëåúá òìåáù
, Picture box á
.(èéøôú
é"ò òöáì ïúéð
àìù äî) ãå÷á
ù÷îä ìò äöéçì
úìåëé øùôàì
éãë úàæå äãå÷ô
éðöçìì øùå÷î
èéøôúä
: äéöìåîéñ
.íéìëä
ìâøñá ãîä ìù
êøòä éôì äéäú
åúåøéäîù Timer é"ò
Key press ìù òåøéàì
úàøå÷ äéöìåîéñä
úåìáâä
òåøéàì íéôñåð
êà ,íéöç ù÷î
é"ò è÷ééáåàä
úà úéðãé æéæî
ùîúùîä åá òåøéàä
íöòá äæ Key press
.äéöìåîéñä
úà ìòééì éãë
úåðåù
: ê á ñ î
: íééììë
íéðåúð
.Integer ë íéøãâåî
íéñ÷ãðéàä éëøò
.úåøôñ
7 ìù ÷åéã Single á íéøãâåî
(úøçà øîàð àì
íà) áåùéçä éëøò
.P_max :úîåö
úåãå÷ð ìù éìàîéñ÷î
êøò
.L_max :úåèåî
ìù éìàîéñ÷î
êøò
P_Data[P_max] úîåö
ìëì íéðåúð äðáî
.1
: ììåë
.úîåöä
íå÷éî
.(visible = True ) äìåòôá
àåä íàä
(çééð
,Yì ãééð ,Xì ãééð)
.åéìà øáåçîä
êîñä âåñ
(éìéìù/éáåéç
Y, éìéìù/éáåéç
X) .åéìà øáåçîä
çåëä âåñ
.(åðååéëå
å÷ ìë ìù ñ÷ãðéàä)
åéìà íéøáåçîä
íéåå÷ä ñ÷ãðéà
êøòî
.(Image Box äðåîúä
øôñî åäæ úîåöä
øôñî)
.(äøñä
åà äôñåä) äéðáä
êìäîá íéðëãòúî
åìéà íéëøò
Boolean äðúùîá
L_P_index[L_max,p_max,2] íéøù÷ä
úöéøèî .2
òãéîä
úà ïúåð (2) éùéìùä
ãîîä øùàë ,å÷
ìù äøñä åà äôñåä
ïîæá úðëãòúî
òãéî
.å÷ä úøãâä ìù
x2,y2 éëøò åà x1,y1 éëøò
àåä úîåöì øáåçîä
å÷ä äö÷ íàä
.úîåöä
éøçà åôãøé
å÷ä úååö÷ éëøò
äæéà úîåö ìù
äøéøâ ïîæá úòãì
éãë áåùç
.F_index_type[F_max] , R_index_type[R_max]
éëøòî .3
,äðåúîä
âåñ ,äðåîúä ñ÷ãðéà
úà íéðúåð ,íéëîñå
úåçåëä úåðåîú
ìù òãéî éëøòî
. äøñä
/ äéðáä ïîæá ïëãòúî
.íéìòåô íä úîåö
äæéà ìòå
.çåë åà
êîñ ìù äøñä /
äôñåä êøåöì
áåùç
íéðåúð
éëøòî .4
.P[L_max] : úåèåîä
êúç çèù
. E[L_max] : úåéèñìàä
ìãåî
. F[L_max] : íéìéòôä
úåçåëä ìãåâ
.U[P_max] : úåæåæúä
ìãåâ
.t[L_max] : úåèåîáù
çåëä ìãåâ
íééîðéã
áåùéç íéëøòî
.5
.Dim_dir íééùôåç
íéúîö éðååéë
øôñî
.index_L íéîéé÷ä
úåèåîä øôñî
. Q[Dim_dir,index_L] (ì÷ùî
ééååù) íéðååéë
úöéøèî
. S[index_L] úåèåîä
úåðåëú úöéøèî
. K[Dim_dir,index_L] úåçéù÷ä
úöéøèî
.õáå÷
ìù äðéòèå äöéøèî
úëéôä ,úåöéøèî
úìôëä ,úåàååùî
úëøòî ïåøúôá
íéøãâåîä íééîðéã
íéëøòî óñåðá
: ïåøúô
äúòî
øùàë) íéìéòôä
íéúîöä øôñî
úøéôñ ìéá÷îá
, íúøñäå – èåî
ìù øåáéç àìì
íéúîö ùåôéç
úéùàø
.(ìéòôä
ñ÷ãðéàì ãò
íéáåùéçä äàìäå
àì éàðúä
íà ,íéúîö ñîì
äååù åà ìåãâ
úåèåîä ñî íàä
ééàðú ú÷éãáå
,íéìéòô úåèåî
øôñî úøéôñ
úéðù
. áåùéçî
äàéöéå äîéàúî
äòãåä – íéé÷úî
.Y ïë-éøçàå
X úéùàø ïååéëäå
úîåöä øôñî éôì
úåöéøèîä ìë
øåãéñ éàðúä
íéé÷úî íà
.äîéàúîä
äöéøèîä ïåëãòå
íéðååéëä áåùéç
,íäù ìë
úåöéøèî éãîî
úåìá÷îù úåðáåî
úåéö÷ðåô é"ò
úåàååùîä úëøòî
ïåøúôå úåöéøèîä
úìôëä áåùéç
úåàååùî
úëøòî .(ïè÷ ãåàî
ãåàî êøòá ñôà
úôìçä é"ò ñôàá
ä÷åìç úòéðî)
úåéøìåâðéñ
ìù èìô – det=0 íà
. pivot áåùéç
íò L_U úèéù é"ò
.(Line ì RGB úãå÷ô
é"ò) íéìá÷úîä
íéöîàîä êåúî
íéåå÷ä òáö ïåëãò
.(úåéåøùôà
êåúî éìàðåéöôåà)
íéðåúðä úåàìáè
ïåëãò
. VB éúðëúîì
íééììë íéðééôàîå
,íéòåøéà ,úåãå÷ô
åéìò
úåæåæú óøâ øùôàì
éãë úàæå å÷ìçá
÷ø äàøð øùà Picture
ìò äðáéð äéðáä
çèùî : éììë*
.åëåúá
íéèðîìàä ìë
úìáâäå
.íéðå÷ééà
é"ò úåôå÷ù úåøâñî
øùôàì éãëá
Image é"ò åðáéð íéëîñäå
íéúîöä
Image î øúåé
ääåáâ úçà äîøä
òéôåú çåëä úøâñîù
éãë Picture é"ò úåçåëä
.áçøîä
ìåëì úåììåë
úåãå÷ô øùôàì
éãëá ,íéñ÷ãðéà
ìù áçøîá úåðåîúä
ìë
: íéòåøéà*
: è÷ééáåà
úôñåä -
.íéðåúðä
ïåëãòå Picture(index).Visible = true
åà Image(index).Visible = true íìåëì
.äãåáòä
çèùî ìù Picture ìò
mouse up – úîåö
(x1=image(index).left , y1=image(index).top)
Line(index).visible = true – èåî
mouse_ move úãå÷ôá
øáëòä éøçà óåãøé
éðùä äö÷ä x2,y2 øùàë
úîåöä
ìò mouse_ click ìù òåøéà
é"ò – êîñå çåë
Key_ code é"ò
úàæå ,íéðåúðä
ïåëãòå Image(index).Visible = false
: íéè÷ééáåà
úøñä -
.key preview á ìòôé
íàä êîñî øùàë
. Drug_ over òåøéà
é"ò úåçåëäå íéëîñä
,íéåå÷ä úææä
: äøéøâ
ùîúùîì
êéøãî çåãì
óøåöî
|