home *** CD-ROM | disk | FTP | other *** search
Text File | 1993-12-15 | 588.9 KB | 12,257 lines |
- Éπ¬«ó«ñßΓó« »«½∞º«óáΓѽ∩
- ═════════════════════════════════════════════════════════════════════════
-
- B.Pascal 7 & Objects /UG - 1 -
-
- éóÑñÑ¡¿Ñ........................................................6
- èᬠ¿ß»«½∞º«óáΓ∞ απ¬«ó«ñßΓóá »« Borland Pascal................6
- â½áóá 1. ôßΓá¡«ó¬á ¿ ºá»π߬ Borland Pascal.....................10
- êß»«½∞º«óá¡¿Ñ »α«úαá¼¼δ Install..............................10
- Åα«úαá¼¼á Install ¿ Windows..................................11
- çá»π߬ Borland Pascal........................................12
- çáΘ¿ΘÑ¡¡δ⌐ αѪ¿¼ ¿ »á¼∩Γ∞....................................12
- çá»π߬ Borland Pascal for Windows..............................15
- çá»π߬ BP.EXE ó αáßΦ¿αÑ¡¡«¼ αѪ¿¼Ñ Windows 386...............15
- çá»π߬ BP.EXE ó ßΓá¡ñáαΓ¡«¼ αѪ¿¼Ñ Windows...................15
- çá»π߬ BP.EXE ó «¬¡Ñ Windows DOS.............................15
- å¿ñ¬«¬α¿ßΓá½½¿τÑ߬¿Ñ ¿ »½áº¼Ñ¡¡δÑ φ¬αá¡δ.....................16
- öá⌐½ README..................................................16
- öá⌐½δ FILELIST.DOC ¿ HELPME!.DOC.............................16
- Åα¿¼Ñαδ »α«úαá¼¼.............................................17
- â½áóá 2. ùΓ« ¡«ó«ú« ó Borland Pascal...........................18
- Æα¿ ¿¡ΓÑúα¿α«óá¡¡δσ ¿¡ΓÑαá¬Γ¿ó¡δσ ßαÑñδ αáºαáí«Γ¬¿ »α«úαá¼¼..18
- ì«óδÑ ßαÑñßΓóá IDE...........................................18
- 諼»¿½∩Γ«α ¬«¼á¡ñ¡«⌐ ßΓ᫬¿, αáí«ΓáεΘ¿⌐ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ..20
- æαÑñá αáºαáí«Γ¬¿ »α«úαá¼¼ ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á DOS.............20
- 信ἿτÑ߬¿ ¬«¼»«¡πѼδÑ í¿í½¿«ΓѬ¿ DOS.......................20
- ä«íáó½Ñ¡¿∩ ¬ ∩ºδ¬π Åá߬á½∞.....................................22
- ô½πτΦÑ¡¿∩ ó í¿í½¿«ΓÑ¬Ñ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ...................23
- ì«óδÑ »«ñ»α«úαá¼¼δ ¼«ñπ½∩ System...............................24
- ì«óδÑ ¼«ñπ½¿.................................................24
- ì«óδÑ ñ¿αÑ¬Γ¿óδ ¬«¼»¿½∩Γ«αá..................................25
- ôß«óÑαΦÑ¡ßΓó«óá¡¿∩ ¬«¼»¿½∩Γ«αá...............................26
- ô½πτΦÑ¡¿∩ ó Turbo Vision.....................................26
- ô½πτΦÑ¡¿∩ ObjectWindows......................................27
- ì«óδÑ ßαÑñßΓóá ¿ πΓ¿½¿Γδ.....................................28
- â½áóá 3. Äß¡«óδ ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñδ ñ½∩ DOS..................29
- çá»π߬ IDE...................................................30
- 諼»«¡Ñ¡Γδ ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñδ.............................30
- Ĭ¡á IDE.......................................................33
- ô»αáó½Ñ¡¿Ñ «¬¡«¼...............................................36
- æΓ᫬á ß«ßΓ«∩¡¿∩...............................................38
- ä¿á½«ú«óδÑ «¬¡á................................................39
- â½áóá 4. Åα«úαá¼¼¿α«óá¡¿Ñ ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ¿¡ΓÑαá¬Γ¿ó¡«⌐
- ßαÑñÑ ñ½∩ DOS................................................43
- çá»π߬ IDE ¿ óδσ«ñ ¿º ¡ÑÑ....................................43
- Åáαá¼ÑΓαδ ºá»π߬á............................................43
- ôßΓá¡«ó¬á »áαá¼ÑΓα«ó.........................................48
- éδσ«ñ ¿º IDE...................................................49
- êß»«½∞º«óá¡¿Ñ ß»αáó«τ¡«⌐ ß¿ßΓѼδ Help........................49
- ÅÑαѼÑΘÑ¡¿Ñ ó ß»αáó«τ¡«⌐ ß¿ßΓѼÑ.............................49
- çá»α«ß »«¼«Θ¿................................................50
- è«»¿α«óá¡¿Ñ »α¿¼Ñα«ó ¿ßσ«ñ¡«ú« ¬«ñá..........................51
- çáúαπº¬á ñαπú¿σ ß»αáó«τ¡δσ Σá⌐½«ó............................52
- éδσ«ñ ¿º ß»αáó«τ¡¿¬á Help....................................53
- çỿß∞ ¿ αÑñá¬Γ¿α«óá¡¿Ñ ¿ßσ«ñ¡«ú« ¬«ñá.......................53
- ìáßΓα«⌐¬á ¬«¡Σ¿úπαᵿ¿ αÑñá¬Γ«αá.............................54
-
- B.Pascal 7 & Objects /UG - 2 -
-
- 꺼ѡѡ¿Ñ αÑΦÑ¡¿∩: ¬«¼á¡ñá Undo..............................54
- âαπ»»«óá∩ «Γ¼Ñ¡á.............................................54
- ÄΓ¼Ñ¡á «Γ¼Ñ¡δ................................................55
- Éáí«Γá ß í½«¬á¼¿ ΓѬßΓá........................................56
- éδñѽѡ¿Ñ í½«¬á..............................................56
- éδαѺ᡿Ñ, ¬«»¿α«óá¡¿Ñ ¿ óßΓáó¬á í½«¬«ó......................56
- 꺼ѡѡ¿Ñ »«óÑñÑ¡¿∩ óδñѽѡ¡δσ í½«¬«ó........................57
- Å«¿ß¬..........................................................58
- Å«¿ß¬ ¿ ºá¼Ñ¡á...............................................59
- æ««ΓóÑΓßΓó¿Ñ »áα «úαá¡¿τ¿ΓѽÑ⌐...............................59
- ÅÑαÑσ«ñ ¬ ßΓα«¬Ñ ß ºáñá¡¡δ¼ ¡«¼Ñα«¼............................61
- êß»«½∞º«óá¡¿Ñ ½«¬á½∞¡«ú« ¼Ñ¡ε «¬¡á αÑñá¬Γ¿α«óá¡¿∩............61
- éδñѽѡ¿Ñ ß¿¡Γá¬ß¿ßá...........................................62
- éδí«α Σá⌐½«ó ñ½∩ óδñѽѡ¿∩...................................63
- çá»αÑΘÑ¡¿Ñ óδñѽѡ¿∩ ß¿¡Γá¬ß¿ßá..............................63
- ÅÑτáΓ∞ ¿ßσ«ñ¡«ú« ¬«ñá..........................................65
- Éáí«Γá ß Σá⌐½á¼¿...............................................66
- ÄΓ¬αδΓ¿Ñ Σá⌐½«ó................................................67
- ÄΓ¬αδΓ¿Ñ Σá⌐½á ó »«º¿µ¿¿ ¬παß«αá.............................68
- 諼»¿½∩µ¿∩ ¿ óδ»«½¡Ñ¡¿Ñ........................................69
- éδí«α µÑ½Ñó«⌐ »½áΓΣ«α¼δ......................................69
- 諼»¿½∩µ¿∩.....................................................71
- ö«α¼¿α«óá¡¿Ñ (Make)..........................................71
- Å«ßΓα«Ñ¡¿Ñ (Build).............................................73
- éδ»«½¡Ñ¡¿Ñ...................................................73
- ÅÑαÑñáτá »α«úαá¼¼Ñ »áαá¼ÑΓα«ó................................73
- Åáαá¼ÑΓαδ ¬«¼»¿½∩Γ«αá ¿ ¬«¼»«¡«óΘ¿¬á...........................74
- Ä»Γ¿¼¿ºáµ¿∩ ¬«ñá.............................................76
- ôß½«ó¡á∩ ¬«¼»¿½∩µ¿∩............................................79
- ä¿αÑ¬Γ¿óδ DEFINE ¿ UNDEF.......................................80
- ÅαÑñ«»αÑñѽѡ¡δÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ................................81
- êñÑ¡Γ¿Σ¿¬áΓ«αδ IFxxx, ELSE ¿ ENDIF...........................81
- ä¿αÑ¬Γ¿óδ IFDEF ¿ IFNDEF.....................................83
- ä¿αÑ¬Γ¿óá IFOPT..............................................84
- Åα«ß¼«Γα ¿ßσ«ñ¡«ú« ¬«ñá........................................85
- Åα«ß¼«Γα «íΩÑ¬Γ«ó..............................................88
- Åα«ß¼«Γα ¼«ñπ½Ñ⌐...............................................95
- Åα«ß¼«Γα ú½«íá½∞¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó............................96
- Åα«ß¼«Γα ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó ó ¿ßσ«ñ¡«¼ ¬«ñÑ.......................97
- Åα«ß¼«Γα Σπ¡¬µ¿⌐ ObjectBrowser.................................99
- éδ»«½¡Ñ¡¿Ñ ó IDE ñαπú¿σ »α«úαá¼¼..............................101
- ìáßΓα«⌐¬á ¼Ñ¡ε Tools........................................101
- Éáí«Γá ß «¬¡«¼ Messages.....................................103
- ìáßΓα«⌐¬á ¬«¡Σ¿úπαᵿ¿ IDE....................................105
- æ«σαá¡Ñ¡¿Ñ αáí«τÑ⌐ «»Ñαᵿ«¡¡«⌐ ßαÑñδ.......................105
- êß»«½∞º«óá¡¿Ñ Σá⌐½á ¬«¡Σ¿úπαᵿ¿............................105
- êß»«½∞º«óá¡¿Ñ Σá⌐½á «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿.....................106
- ô»αáó½Ñ¡¿Ñ »α«Ñ¬Γ«¼...........................................108
- â½áóá 5. Åα«úαá¼¼¿α«óá¡¿Ñ ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ¿¡ΓÑαá¬Γ¿ó¡«⌐
- ßαÑñÑ ñ½∩ Windows............................................110
- çá»π߬ IDE ñ½∩ Windows......................................110
- êß»«½∞º«óá¡¿Ñ «»ÑαáΓ¿ó¡«⌐ »«½«ßδ..............................111
- ìáßΓα«⌐¬á ¬«¡Σ¿úπαᵿ¿ «»ÑαáΓ¿ó¡«⌐ »«½«ßδ...................114
-
- B.Pascal 7 & Objects /UG - 3 -
-
- êß»«½∞º«óá¡¿Ñ ß»αáó«τ¡«⌐ ß¿ßΓѼδ Help.........................115
- ÅÑαѼÑΘÑ¡¿Ñ »« ß»αáó«τ¡«⌐ ß¿ßΓѼÑ...........................115
- çá»α«ß »«¼«Θ¿...............................................116
- è«»¿α«óá¡¿Ñ »α¿¼Ñα«ó ¬«ñá.....................................119
- éδσ«ñ ¿º ß»αáó«τ¡«⌐ ß¿ßΓѼδ.................................119
- çỿß∞ ¿ αÑñá¬Γ¿α«óá¡¿Ñ ¿ßσ«ñ¡«ú« ¬«ñá......................119
- ìáßΓα«⌐¬á ¬«¡Σ¿úπαᵿ¿ αÑñá¬Γ«αá............................120
- ìáí«α ¬«¼á¡ñ..................................................121
- êß»«½∞º«óá¡¿Ñ αÑñá¬Γ«αá.....................................121
- éδñѽѡ¿Ñ ß¿¡Γá¬ß¿ßá..........................................122
- ûóÑΓ«ó«Ñ óδñѽѡ¿Ñ ΓѬßΓá...................................122
- êß»«½∞º«óá¡¿Ñ ß¿ßΓѼ¡δσ µóÑΓ«ó Windows......................123
- 꺼ѡѡ¿Ñ áΓα¿íπΓ«ó ΓѬßΓá..................................123
- ÅÑτáΓ∞ ¿ßσ«ñ¡«ú« ¬«ñá.........................................125
- Éáí«Γá ß Σá⌐½á¼¿..............................................126
- ÄΓ¬αδΓ¿Ñ Σá⌐½«ó.............................................126
- âñÑ ¡áσ«ñ∩Γß∩ Σá⌐½δ?........................................127
- Éáí«Γá ß Σá⌐½á¼¿ ó ñαπú«¼ ¬áΓὫúÑ..........................127
- 諼»¿½∩µ¿∩ ¿ óδ»«½¡Ñ¡¿Ñ.....................................128
- Åα«ß¼«Γα ¿ßσ«ñ¡«ú« ¬«ñá.....................................128
- Åα«ß¼«Γα «íΩÑ¬Γ«ó.............................................133
- üπ¬óÑ¡¡δÑ ß¿¼ó«½δ ó ObjectBrowser...........................134
- ö¿½∞Γαδ.....................................................135
- Åα«ß¼«Γα ú½«íá½∞¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó...........................137
- Åα«ß¼«Γα ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó ó ¿ßσ«ñ¡«¼ ¬«ñÑ....................137
- éδ»«½¡Ñ¡¿Ñ ó IDE ñαπú¿σ »α«úαá¼¼............................138
- ìáßΓα«⌐¬á ¬«¡Σ¿úπαᵿ¿ IDE..................................139
- â½áóá 6. ÄΓ½áñ¬á ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñÑ......................140
- ùΓ« Γá¬«Ñ «Γ½áñ¬á?..........................................140
- èá¬¿Ñ ßπΘÑßΓóπεΓ ó¿ñδ «Φ¿í«¬?...............................140
- îÑΓ«ñδ «Γ½áñ¬¿................................................143
- âÑ¡Ñαᵿ∩ «Γ½áñ«τ¡«⌐ ¿¡Σ«α¼áµ¿¿...............................145
- ô»αáó½Ñ¡¿Ñ óδ»«½¡Ñ¡¿Ñ¼........................................146
- ùΓ« Γá¬«Ñ Φáú?................................................147
- éδ»«½¡Ñ¡¿Ñ »α«úαá¼¼δ »« Φáúá¼...............................147
- Æαáßß¿α«ó¬á »α«úαá¼¼δ.........................................149
- Æαáßß¿α«ó¬á ¿½¿ óδ»«½¡Ñ¡¿Ñ »« Φáúá¼?........................149
- éδ»«½¡Ñ¡¿Ñ í«½∞Φ¿σ Σαáú¼Ñ¡Γ«ó.................................151
- Å«¿ß¬ ¡πª¡«ú« ¼ÑßΓá.........................................151
- Å«óΓ«α¡«Ñ óδ»«½¡Ñ¡¿Ñ........................................151
- ÄΓ߽Ѫ¿óá¡¿Ñ óδó«ñá »α«úαá¼¼δ...............................152
- ÅÑαѬ½ετÑ¡¿Ñ φ¬αá¡«ó........................................152
- Ĭ¡« Output.................................................152
- êß»«½∞º«óá¡¿Ñ ñóπσ ¼«¡¿Γ«α«ó................................152
- Åα«ß¼«Γα º¡áτÑ¡¿⌐...........................................153
- ùΓ« Γá¬«Ñ óδαáªÑ¡¿Ñ?..........................................154
- Åα«ß¼«Γα óδαáªÑ¡¿⌐............................................156
- æ»Ñµ¿Σ¿¬áΓ«αδ Σ«α¼áΓá ó óδαáªÑ¡¿∩σ «Γ½áñτ¿¬á..................157
- éδτ¿ß½Ñ¡¿Ñ ¿ ¼«ñ¿Σ¿¬áµ¿∩....................................158
- êß»«½∞º«óá¡¿Ñ Γ«τѬ «ßΓá¡«óá..................................160
- çáñá¡¿Ñ Γ«τѬ «ßΓá¡«óá......................................160
- ÄΓ¼Ñ¡á Γ«τ¬Ñ «ßΓá¡«óá.......................................160
- î«ñ¿Σ¿¬áµ¿∩ Γ«τѬ «ßΓá¡«óá..................................160
-
- B.Pascal 7 & Objects /UG - 4 -
-
- 櫺ñá¡¿Ñ πß½«ó¡δ⌐ Γ«τѬ «ßΓá¡«óá............................161
- ÅαÑαδóá¡¿Ñ »α«úαá¼¼δ íѺ Γ«τѬ «ßΓá¡«óá.....................161
- â½áóá 7. î«ñ㫨 Borland Pascal................................163
- ùΓ« Γá¬«Ñ ¼«ñπ½∞?...........................................163
- æΓαπ¬Γπαá ¼«ñπ½∩..............................................164
- ê¡ΓÑαΣÑ⌐ß¡á∩ ßѬµ¿∩...........................................165
- æÑ¬µ¿∩ αÑ὿ºáµ¿¿...........................................165
- æÑ¬µ¿∩ ¿¡¿µ¿á½¿ºáµ¿¿........................................166
- èᬠ¿ß»«½∞ºπεΓß∩ ¼«ñπ½¿?....................................166
- æß佬¿ ¡á «»¿ßá¡¿∩ ¼«ñπ½∩...................................168
- Ä»ÑαáΓ«α uses ßѬµ¿¿ αÑ὿ºáµ¿¿.............................170
- æΓá¡ñáαΓ¡δÑ ¼«ñπ½¿............................................171
- 櫺ñá¡¿Ñ óáΦ¿σ ß«íßΓóÑ¡¡δσ ¼«ñπ½Ñ⌐..........................171
- 諼»¿½∩µ¿∩ ¼«ñπ½∩...........................................171
- ä«ßΓπ»¡«ßΓ∞ ¼«ñπ½∩ ñ½∩ »α«úαá¼¼δ............................172
- Åα¿¼Ñα........................................................173
- î«ñ㫨 ¿ í«½∞Φ¿Ñ »α«úαá¼¼δ..................................173
- ôΓ¿½¿Γá TPUMOVER............................................175
- â½áóá 8. êß»«½∞º«óá¡¿Ñ π¬áºáΓѽÑ⌐.............................176
- ä½∩ τÑú« ¿ß»«½∞ºπεΓß∩ π¬áºáΓѽ¿?............................176
- Éáí«Γá ß í«½∞Φ¿¼¿ «íΩѼἿ ñá¡¡δσ...........................176
- Éáí«Γá ß ñá¡¡δ¼¿ ¡Ñ¿ºóÑßΓ¡«ú« αẼÑαá.......................177
- Éáí«Γá ß óαѼѡ¡δ¼¿ íπΣÑαἿ ñá¡¡δσ.........................178
- Éáí«Γá ß ¡Ñ߬«½∞¬¿¼¿ Γ¿»á¼¿ ñá¡¡δσ..........................178
- æó∩ºá¡¡δÑ ß»¿ß¬¿............................................179
- ùΓ« Γá¬«Ñ π¬áºáΓѽ∞?........................................179
- æß佫τ¡δ⌐ Γ¿»...............................................179
- Æ¿»¿º¿α«óá¡¡δÑ π¬áºáΓѽ¿....................................180
- Éáºδ¼Ñ¡«óá¡¿Ñ π¬áºáΓѽÑ⌐....................................180
- èᬠ¿ß»«½∞º«óáΓ∞ π¬áºáΓѽ¿?...................................182
- éδñѽѡ¿Ñ »á¼∩Γ¿ ñ½∩ ñ¿¡á¼¿τÑ߬¿σ »ÑαѼѡ¡δσ................182
- Äßó«í«ªñÑ¡¿Ñ »á¼∩Γ¿, óδñѽѡ¡«⌐ ñ½∩ ñ¿¡á¼¿τÑ߬¿σ »ÑαѼѡ¡δσ...185
- Åα«µÑñπαδ GetMem ¿ FreeMem..................................185
- Åα«óÑα¬á «íΩѼá ñ«ßΓπ»¡«⌐ ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿...188
- ÄíΘ¿Ñ »α«í½Ñ¼δ ¿ß»«½∞º«óá¡¿∩ π¬áºáΓѽÑ⌐.....................188
- Éáºδ¼Ñ¡«óá¡¿Ñ ¡Ñ¿¡¿µ¿á½¿º¿α«óá¡¡δσ π¬áºáΓѽÑ⌐...............188
- Å«ΓÑα¿ ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿....................189
- ô»αáó½Ñ¡¿Ñ ßó∩ºá¡¡δ¼ ß»¿ß¬«¼................................190
- Å«ßΓα«Ñ¡¿Ñ ß»¿ß¬á.............................................192
- ÅÑαѼÑΘÑ¡¿Ñ »« ß»¿ß¬π.......................................192
- Äßó«í«ªñÑ¡¿Ñ óδñѽѡ¡«⌐ ñ½∩ ß»¿ß¬á »á¼∩Γ¿...................193
- â½áóá 9. ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ............194
- ÄíΩѬΓδ.....................................................195
- ìáß½Ññ«óá¡¿Ñ................................................196
- ÄíΩѬΓδ: ¡áß½ÑñπεΘ¿Ñ ºá»¿ß¿...................................198
- ¥¬ºÑ¼»½∩αδ «íΩÑ¬Γ¡δσ Γ¿»«ó..................................200
- Å«½∩ «íΩÑ¬Γ«ó...............................................200
- ò«α«Φá∩ ¿ »½«σá∩ ΓÑσ¡¿¬á »α«úαá¼¼¿α«óá¡¿∩...................201
- îÑΓ«ñδ........................................................202
- æ«ó¼ÑΘÑ¡¡δÑ ¬«ñ ¿ ñá¡¡δÑ....................................203
- Ä»αÑñѽѡ¿Ñ ¼ÑΓ«ñ«ó.........................................204
- Äí½áßΓ∞ ñÑ⌐ßΓó¿∩ ¼ÑΓ«ñá ¿ »áαá¼ÑΓα Self.....................205
- Å«½∩ ñá¡¡δσ «íΩѬΓá ¿ Σ«α¼á½∞¡δÑ »áαá¼ÑΓαδ ¼ÑΓ«ñá...........206
-
- B.Pascal 7 & Objects /UG - 5 -
-
- ÄíΩѬΓδ, φ¬ß»«αΓ¿απѼδÑ ¼«ñπ½∩¼¿............................207
- æÑ¬µ¿∩ private..............................................208
- Åα«úαá¼¼¿α«óá¡¿Ñ ó "ñÑ⌐ßΓó¿Γѽ∞¡«¼ ºá½«úÑ"..................209
- ꡬá»ßπ½∩µ¿∩..................................................211
- îÑΓ«ñδ: ¡¿¬á¬«ú« πσπñΦÑ¡¿∩..................................212
- ÉáßΦ¿α∩εΘ¿Ñß∩ «íΩѬΓδ.......................................212
- ìáß½Ññ«óá¡¿Ñ ßΓáΓ¿τÑ߬¿σ ¼ÑΓ«ñ«ó............................216
- é¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ ¿ »«½¿¼«αΣ¿º¼..............................220
- Éá¡¡ÑÑ ßó∩ºδóá¡¿Ñ »α«Γ¿ó »«ºñ¡Ñú« ßó∩ºδóá¡¿∩................221
- æ«ó¼ÑßΓ¿¼«ßΓ∞ Γ¿»«ó «íΩÑ¬Γ«ó................................222
- Å«½¿¼«αΣ¿τÑ߬¿Ñ «íΩѬΓδ.......................................225
- é¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ..........................................226
- Åα«óÑα¬á ñ¿á»áº«¡«ó »α¿ ó맮óÑ ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó..........229
- ÉáßΦ¿α∩Ѽ«ßΓ∞ «íΩѬΓá.......................................230
- æΓáΓ¿τÑ߬¿Ñ ¼ÑΓ«ñδ ¿½¿ ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ?..................230
- 信ἿτÑ߬¿Ñ «íΩѬΓδ........................................231
- ÉẼÑΘÑ¡¿Ñ ¿ ¿¡¿µ¿á½¿ºáµ¿∩ ß »«¼«Θ∞ε »α«µÑñπαδ New..........232
- ôñá½Ñ¡¿Ñ ñ¿¡á¼¿τÑ߬¿σ «íΩÑ¬Γ«ó..............................233
- äÑßΓαπ¬Γ«αδ...................................................234
- Åα¿¼Ñα αẼÑΘÑ¡¿∩ ñ¿¡á¼¿τÑ߬«ú« «íΩѬΓá.....................236
- ùΓ« ªÑ ñá½∞ΦÑ?..............................................240
- çᬽετÑ¡¿Ñ..................................................240
- â½áóá 10. éºú½∩ñ ¡á Windows...................................242
- ùΓ« Γá¬«Ñ »α¿½«ªÑ¡¿Ñ Windows?.................................243
- ÅαÑ¿¼πΘÑßΓóá Windows........................................244
- ÆαÑí«óá¡¿∩..................................................245
- Åα«úαá¼¼¡δÑ ßαÑñßΓóá........................................245
- Çασ¿ΓѬΓπαá ß π»αáó½Ñ¡¿Ñ¼ »« ß«íδΓ¿∩¼.......................245
- âαáΣ¿¬á, ¡Ñºáó¿ß¿¼á∩ «Γ πßΓα«⌐ßΓó...........................245
- î¡«ú«ºáñáτ¡«ßΓ∞.............................................246
- ô»αáó½Ñ¡¿Ñ »á¼∩Γ∞ε..........................................246
- ÉÑßπαßδ.....................................................247
- 信ἿτÑ߬á∩ ¬«¼»«¡«ó¬á.....................................247
- üπΣÑα óδαѺᡡ«ú« ¿º«íαáªÑ¡¿∩...............................248
- 信ἿτÑ߬¿⌐ «í¼Ñ¡ ñá¡¡δ¼¿..................................248
- î¡«ªÑßΓóÑ¡¡δ⌐ ñ«¬π¼Ñ¡Γá½∞¡δ⌐ ¿¡ΓÑαΣÑ⌐ß........................249
- Æ¿»δ ñá¡¡δσ Windows...........................................250
- ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡á∩ αáí«Γá ß «¬¡á¼¿....................250
- ïπτΦ¿⌐ ¿¡ΓÑαΣÑ⌐ß ß Windows..................................250
- ê¡ΓÑαΣÑ⌐ß¡δÑ «íΩѬΓδ......................................251
- ÇíßΓαáú¿α«óá¡¿Ñ Σπ¡¬µ¿⌐ Windows...........................251
- ÇóΓ«¼áΓ¿ºáµ¿∩ «ΓóÑΓá ¡á ß««íΘÑ¡¿∩.........................251
- æΓαπ¬Γπαá »α«úαá¼¼δ Windows...................................253
- æΓαπ¬Γπαá Windows...........................................253
- éºá¿¼«ñÑ⌐ßΓó¿Ñ ß Windows ¿ DOS..............................253
- ¥½Ñ¼Ñ¡Γáα¡á∩ »α«úαá¼¼á........................................254
- äÑ⌐ßΓó¿∩ »α«úαá¼¼δ »α¿ ºá»π߬Ñ............................254
- ìạáτÑ¡¿Ñ «ß¡«ó¡«ú« «¬¡á.................................255
- û¿¬½ αáºαáí«Γ¬¿ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ..........................256
- êºπτÑ¡¿Ñ ObjectWindows......................................256
-
- B.Pascal 7 & Objects /UG - 6 -
-
- ─────────────────────────────────────────────────────────────────────────
- éóÑñÑ¡¿Ñ
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal with Objects (Åá߬á½∞ ß «íΩѬΓἿ Σ¿α¼δ
- Borland) »αÑñ¡áº¡áτÑ¡ ñ½∩ óßÑσ ΓÑσ »«½∞º«óáΓѽÑ⌐, ¬«Γ«αδÑ σ«Γ∩Γ
- αáºαáíáΓδóáΓ∞ »α¿¬½áñ¡δÑ »α«úαá¼¼δ ñ½∩ «»Ñαᵿ«¡¡«⌐ ß¿ßΓѼδ DOS
- ¿½¿ «»Ñαᵿ«¡¡«⌐ ßαÑñδ Windows. éδ ¼«ªÑΓÑ ß«ºñáóáΓ∞ »α¿¬½áñ¡δÑ
- »α«úαá¼¼δ, αáí«ΓáεΘ¿Ñ ó αÑá½∞¡«¼ αѪ¿¼Ñ DOS, Windows ¿½¿ »α¿¬½áñ-
- ¡δÑ »α«úαá¼¼δ ñ½∩ ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á DOS ¿½¿ Windows. Borland
- Pascal »αÑñ½áúáÑΓ í«úáΓπε ßαÑñπ »α«úαá¼¼¿α«óá¡¿∩, ¬«Γ«αá∩ ñѽáÑΓ
- αáºαáí«Γ¬π »α«úαá¼¼¡«ú« «íÑß»ÑτÑ¡¿∩ í«½ÑÑ »α«¿ºó«ñ¿Γѽ∞¡«⌐ ¿ í«-
- ½ÑÑ »α¿∩Γ¡«⌐. êß»«½∞ºπ∩ ßΓαπ¬Γπα¿α«óá¡¡δ⌐ ∩ºδ¬ óδß«¬«ú« πα«ó¡∩
- Åá߬á½∞, óδ ¼«ªÑΓÑ »¿ßáΓ∞ »α«úαá¼¼δ ñ½∩ »α¿½«ªÑ¡¿⌐ ½εí«ú« Γ¿»á ¿
- αẼÑαá.
-
- Borland Pascal 7.0, «ßΓáóá∩ß∞ ß«ó¼ÑßΓ¿¼δ¼ ß »α«úαá¼¼¡δ¼ ¬«-
- ñ«¼, ¡á»¿ßá¡¡δ¼ ñ½∩ Turbo Pascal ¿½¿ Turbo Pascal for Windows,
- »αÑñ«ßΓáó½∩ÑΓ óá¼ ¡«óδÑ ó«º¼«ª¡«ßΓ¿. êßß½Ññπ∩ φΓ¿ 󫺼«ª¡«ßΓ¿
- ß½ÑñπÑΓ πτ¿ΓδóáΓ∞, τΓ« φëà ¬«¼»¿½∩Γ«α Åá߬á½∩ ∩ó½∩ÑΓß∩ íδßΓαδ¼ ¿
- φΣΣÑ¬Γ¿ó¡δ¼ ¬«¼»¿½∩Γ«α«¼ ¿ »α¿¡∩Γ ó ¬áτÑßΓóÑ «íΘѼ¿α«ó«ú« ßΓá¡-
- ñáαΓá.
-
- èᬠ¿ß»«½∞º«óáΓ∞ απ¬«ó«ñßΓóá »« Borland Pascal
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal »«ßΓáó½∩ÑΓß∩ ß «ñ¿¡¡áñµáΓ∞ε απ¬«ó«ñßΓóἿ,
- ¬áªñ«Ñ ¿º ¬«Γ«αδσ ¿¼ÑÑΓ ßó«Ñ ¡áº¡áτÑ¡¿Ñ.
-
- Åα¿¼Ñτá¡¿Ñ: àß½¿ αá¡∞ΦÑ óδ ¡¿¬«úñá ¡Ñ αáí«Γ὿ ß »α«ú-
- αá¼¼¡δ¼ »α«ñπ¬Γ«¼ Turbo Pascal, »α«τΓ¿ΓÑ απ¬«ó«ñßΓó« »«½∞-
- º«óáΓѽ∩.
-
- "Éπ¬«ó«ñßΓó« »«½∞º«óáΓѽ∩" íπñÑΓ ñ½∩ óáß »«½Ñº¡δ¼, Ñß½¿:
-
- - óδ σ«Γ¿ΓÑ º¡áΓ∞, ¬á¬ πßΓá¡«ó¿Γ∞ Borland Pascal;
-
- - αá¡ÑÑ óδ ¿ß»«½∞º«ó὿ Turbo Pascal ¿½¿ Borland Pascal for
- Windows ¿ σ«Γ¿ΓÑ º¡áΓ∞, τΓ« ¡«ó«ú« ó φΓ«⌐ óÑαß¿¿;
-
- - óδ σ«Γ¿ΓÑ πº¡áΓ∞, ¬á¬ αáí«ΓáΓ∞ ß ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñ«⌐
- αáºαáí«Γ¬¿ »α«úαá¼¼ Borland (IDE) ¿ ¿ß»«½∞º«óáΓ∞ ÑÑ ñ½∩
- αáºαáí«Γ¬¿ ¿ «Γ½áñ¬¿ »α«úαá¼¼;
-
- - óδ σ«Γ¿ΓÑ πº¡áΓ∞ « »α«úαá¼¼¡δσ ¼«ñπ½∩σ ¿ « Γ«¼, ¬á¬ ¡á»¿-
- ßáΓ∞ ßó«⌐ ß«íßΓóÑ¡¡δ⌐ ¼«ñπ½∞;
-
- - αá¡ÑÑ óδ ¡Ñ ¿ß»«½∞º«ó὿ ó ßó«¿σ »α«úαá¼¼áσ π¬áºáΓѽ¿ ¿½¿
- σ«Γ¿ΓÑ «ßóѪ¿Γ∞ ßó«¿ º¡á¡¿∩ «í π¬áºáΓѽ∩σ;
-
- - óδ ¡Ñ º¡á¬«¼δ ß «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δ¼ »α«úαá¼¼¿α«óá¡¿-
- Ѽ;
-
- - σ«Γ¿ΓÑ »«½πτ¿Γ∞ ¡áτá½∞¡δÑ ßóÑñÑ¡¿∩ «í ObjectWindows.
-
- B.Pascal 7 & Objects /UG - 7 -
-
-
- Åα¿¼Ñτá¡¿Ñ: àß½¿ óδ σ«Γ¿ΓÑ πº¡áΓ∞ « ∩ºδ¬Ñ Borland
- Pascal, »α«τΓ¿ΓÑ "Éπ¬«ó«ñßΓó« »« ∩ºδ¬π".
-
- "Éπ¬«ó«ñßΓó« »« ∩ºδ¬π" »«ßó∩ΘÑ¡« ∩ºδ¬π Borland Pascal ¿ »«-
- ∩ß¡∩ÑΓ ¬á¬ ¿ºó½Ñτ∞ ¿º ¡Ñú« ¼á¬ß¿¼π¼ 󫺼«ª¡«ú«. êß»«½∞ºπ⌐ΓÑ "Éπ-
- ¬«ó«ñßΓó« »« ∩ºδ¬π", τΓ«íδ:
-
- - ¡á⌐Γ¿ Σ«α¼á½∞¡«Ñ «»αÑñѽѡ¿Ñ ∩ºδ¬á Borland Pascal, ó¬½ετá∩
- »«ñα«í¡δÑ ñ¿áúαá¼¼δ ß¿¡Γá¬ß¿ßá, «»¿ßδóáεΘ¿Ñ ¬áªñπε ¬«¡ß-
- Γαπ¬µ¿ε Borland Pascal;
-
- - πº¡áΓ∞ ¬á¬ ¿ß»«½∞º«óáΓ∞ í¿í½¿«ΓѬ¿ ñ¿¡á¼¿τÑ߬«⌐ ¬«¼»«¡«ó¬¿
- ¿ ¬á¬ ¡á»¿ßáΓ∞ ßó«ε ß«íßΓóÑ¡¡πε í¿í½¿«ΓѬπ;
-
- - ¿ºπτ¿Γ∞ «αúá¡¿ºáµ¿ε í¿í½¿«ΓѬ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓÑ¼δ ¿ ¿σ ¿ß-
- »«½∞º«óá¡¿Ñ;
-
- - ¿ºπτ¿Γ∞ »α«µÑñπαδ, Σπ¡¬µ¿¿, »αÑñ«»¿ßá¡¡δÑ »ÑαѼѡ¡δÑ,
- ¬«¡ßΓá¡Γδ ¿ Γ.ñ. ¿ πº¡áΓ∞ « Γ«¼, τΓ« ß«í«⌐ »αÑñßΓáó½∩εΓ
- ñ«ßΓπ»¡δÑ óáΦ¿¼ »α«úαἼἠí¿í½¿«ΓѬ¿ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ;
-
- - ¿ßß½Ññ«óáΓ∞, ¬á¬ »α«úαá¼¼δ Borland Pascal ¿ß»«½∞ºπε »á-
- ¼∩Γ∞;
-
- - πº¡áΓ∞, ¬á¬ Borland Pascal αÑ὿ºπÑΓ π»αáó½Ñ¡¿Ñ »α«úαá¼-
- ¼«⌐;
-
- - πº¡áΓ∞ «í «»Γ¿¼¿ºáµ¿¿ ¬«ñá ó Borland Pascal;
-
- - óδ∩ß¡¿Γ∞, ¬á¬ Borland Pascal ¿ß»«½∞ºπÑΓ ∩ºδ¬ áßßѼí½Ñαá.
-
- Åα¿¼Ñτá¡¿Ñ: Åα¿ »α«úαá¼¼¿α«óá¡¿¿ ó Borland Pascal ó
- ¬áτÑßΓóÑ «ß¡«ó¡«ú« ß»αáó«τ¡¿¬á ¿ß»«½∞ºπ⌐ΓÑ "æ»αáó«τ¡«Ñ απ-
- ¬«ó«ñßΓó« »α«úαá¼¼¿ßΓá".
-
- "æ»αáó«τ¡«Ñ απ¬«ó«ñßΓó« »α«úαá¼¼¿ßΓá" »αÑñßΓáó½∩ÑΓ ß«í«⌐
- ß»αáó«τ¡¿¬ ß« óßѼ¿ ¡Ñ«íσ«ñ¿¼δ¼¿ óá¼ »«ñα«í¡«ßΓ∩¼¿. Åα¿ »α«úαá¼-
- ¼¿α«óá¡¿¿ ñÑনΓÑ φΓ« απ¬«ó«ñßΓó« α∩ñ«¼ ß ¬«¼»∞εΓÑα«¼. êß»«½∞ºπ⌐-
- ΓÑ "æ»αáó«τ¡«Ñ απ¬«ó«ñßΓó« »α«úαá¼¼¿ßΓá", Ñß½¿ óδ σ«Γ¿ΓÑ:
-
- - πº¡áΓ∞ « ñÑΓá½∩σ ¬«¡¬αÑΓ¡«⌐ »α«µÑñπαδ, Σπ¡¬µ¿¿, Γ¿»Ñ ¿½¿
- ¬«¡ßΓá¡ΓÑ í¿í½¿«ΓѬ¿ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓÑ¼δ ¿ óδ∩ß¡¿Γ∞, ¬á¬
- ¿σ ¿ß»«½∞º«óáΓ∞;
-
- - »«¡∩Γ∞, ¬á¬ αáí«ΓáεΓ ñ¿αÑ¬Γ¿óδ ¬«¼»¿½∩Γ«αá, τΓ« ñѽáÑΓ
- ¬áªñá∩ ñ¿αÑ¬Γ¿óá ¬«¼»¿½∩Γ«αá ¿ ¬á¬ »«½∞º«óáΓ∞ß∩ φΓ¿¼¿ ñ¿-
- αÑ¬Γ¿óἿ;
-
- - óδ∩ß¡¿Γ∞, τΓ« «º¡áτáÑΓ ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ;
-
- - »«º¡á¬«¼¿Γ∞ß∩ ß ¿ß»«½∞º«ó᡿Ѽ ¬«¼»¿½∩Γ«αá, αáí«ΓáεΘÑú« ó
- αѪ¿¼Ñ ¬«¼á¡ñ¡«⌐ ßΓ᫬¿;
-
- B.Pascal 7 & Objects /UG - 8 -
-
-
- - »α«ß¼«ΓαÑΓ∞ ¬«¼á¡ñδ αÑñá¬Γ«αá;
-
- - »α«ß¼«ΓαÑΓ∞ ¬αáΓ¬πε ß»αáó«τ¡πε ¿¡Σ«α¼áµ¿ε »« ñ¿αÑ¬Γ¿óá¼
- ¬«¼»¿½∩Γ«αá;
-
- - «º¡á¬«¼¿Γ∞ß∩ ß« ß»¿ß¬«¼ ºáαѺÑαó¿α«óá¡¡δσ ß½«ó ¿ ßΓá¡ñáαΓ-
- ¡δσ ñ¿αÑ¬Γ¿ó.
-
- Åα¿¼Ñτá¡¿Ñ: ùΓ«íδ πº¡áΓ∞ « αáºαáí«Γ¬Ñ »α«úαá¼¼ ñ½∩ DOS
- ß »«¼«Θ∞ε Turbo Vision, ¿ß»«½∞ºπ⌐ΓÑ "Éπ¬«ó«ñßΓó« »« »α«ú-
- αá¼¼¿α«óá¡¿ε ß ¿ß»«½∞º«ó᡿Ѽ Turbo Vision"
-
- "Éπ¬«ó«ñßΓó« »« »α«úαá¼¼¿α«óá¡¿ε ß ¿ß»«½∞º«ó᡿Ѽ Turbo
- Vision" º¡á¬«¼¿Γ óáß ß Turbo Vision ¿ »«∩ß¡∩ÑΓ ¬á¬ ß ¡Ñ⌐ αáí«-
- ΓáΓ∞. Turbo Vision - φΓ« ¿¡ΓÑúα¿α«óá¡¡á∩ ß¿ßΓѼá αáºαáí«Γ¬¿ »α¿¬-
- ½áñ¡δσ »α«úαá¼¼, »«ºó«½∩εΘá∩ óá¼ íδßΓα« ¡áτáΓ∞ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿-
- α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ ó DOS. ùΓ«íδ «ßó«¿Γ∞ Turbo Vision, óá¼
- ¡πª¡«:
-
- - »α«αáí«ΓáΓ∞ απ¬«ó«ñßΓó« ¿ »α¿«íαÑßΓ¿ ¡Ñ¬«Γ«αδÑ ¡áó모 αáº-
- αáí«Γ¬¿ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ Turbo Vision;
-
- - ¿ºπτ¿Γ∞ ¿Ñαáασ¿ε Turbo Vision ¿ »«º¡á¬«¼¿Γ∞ß∩ ß Γ¿»á¼¿
- «íΩÑ¬Γ«ó;
-
- - »«¡∩Γ∞ ß¼δß½ »α«úαá¼¼¿α«óá¡¿∩, π»αáó½∩Ѽ«ú« ß«íδΓ¿∩¼¿, ¿
- τΓ« «¡« ºá ß«í«⌐ ó½ÑτÑΓ;
-
- - ¿ß»«½∞º«óáΓ∞ ß»αáó«τ¡¿¬ »« Turbo Vision ñ½∩ ¡áσ«ªñÑ¡¿∩ ñÑ-
- Γá½∞¡«⌐ ¿¡Σ«α¼áµ¿¿ «í «íΩѬΓáσ ¿ ß««ΓóÑΓßΓóπεΘ¿σ Γ¿»áσ,
- ¬«¡ßΓá¡Γáσ ¿ »ÑαѼѡ¡δσ ó ¿Ñαáασ¿¿ Turbo Vision.
-
- Åα¿¼Ñτá¡¿Ñ: ùΓ«íδ πº¡áΓ∞ « Γ«¼ ¬á¬ »¿ßáΓ∞ »α«úαá¼¼δ
- ñ½∩ Windows ß »«¼«Θ∞ε ObjectWindows, ¿ß»«½∞ºπ⌐ΓÑ "Éπ¬«ó«ñß-
- Γó« »« »α«úαá¼¼¿α«óá¡¿ε ß ¿ß»«½∞º«ó᡿Ѽ ObjectWindows"
-
- "Éπ¬«ó«ñßΓó« »« »α«úαá¼¼¿α«óá¡¿ε ß ¿ß»«½∞º«ó᡿Ѽ
- ObjectWindows" - φΓ« óáΦÑ απ¬«ó«ñßΓó« ñ½∩ αáºαáí«Γ¬¿ »α¿½«ªÑ¡¿⌐
- Windows ß »«¼«Θ∞ε í¿í½¿«ΓѬ¿ ObjectWindows Borland Pascal with
- Objects. ùΓ«íδ «ó½áñÑΓ∞ ObjectWindows, óá¼ »«¡áñ«í¿Γß∩:
-
- - »α«αáí«ΓáΓ∞ απ¬«ó«ñßΓó« ¿ »α¿«íαÑßΓ¿ ¡Ñ¬«Γ«αδÑ ¡áó모 αáº-
- αáí«Γ¬¿ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ ObjectWindows;
-
- - ¿ºπτ¿Γ∞ ¿Ñαáασ¿ε ObjectWindows ¿ »α«τ¿ΓáΓ∞ « Γ«¼, ¬á¬¿Ñ
- ºáñáτ¿ ¼«úπΓ óδ»«½¡∩Γ∞ «íΩѬΓδ ObjectWindows;
-
- - ¡áπτ¿Γ∞ß∩ αáí«ΓáΓ∞ ó ßó«Ñ⌐ »α«úαá¼¼Ñ ObjectWindows ß úαá-
- Σ¿¬«⌐, αÑßπαßἿ ¿ ñá¡¡δ¼¿;
-
- - ¿ß»«½∞º«óáΓ∞ ß»αáó«τ¡¿¬ »« ObjectWindows ñ½∩ ¡áσ«ªñÑ¡¿∩
- ñÑΓá½∞¡«⌐ ¿¡Σ«α¼áµ¿¿ «í «íΩѬΓáσ ¿ ß««ΓóÑΓßΓóπεΘ¿σ Γ¿»áσ,
-
- B.Pascal 7 & Objects /UG - 9 -
-
- ¬«¡ßΓá¡Γáσ ¿ »ÑαѼѡ¡δσ ó ¿Ñαáασ¿¿ ObjectWindows.
-
- Åα¿¼Ñτá¡¿Ñ: ùΓ«íδ πº¡áΓ∞ «í ¿¡ßΓαπ¼Ñ¡Γá½∞¡δσ ßαÑñß-
- Γóáσ, ¬«Γ«αδÑ ¼«úπΓ ßñѽáΓ∞ »α«úαá¼¼¿α«óá¡¿Ñ ¡á Åá߬á½Ñ ÑΘÑ
- í«½ÑÑ »α«ñπ¬Γ¿ó¡δ¼, »«º¡á¬«¼∞ΓÑß∞ ß "Éπ¬«ó«ñßΓó«¼ »« ¿¡ß-
- Γαπ¼Ñ¡Γá½∞¡δ¼ ßαÑñßΓóá¼ ¿ πΓ¿½¿Γá¼".
-
- "Éπ¬«ó«ñßΓó« »« ¿¡ßΓαπ¼Ñ¡Γá½∞¡δ¼ ßαÑñßΓóá¼ ¿ πΓ¿½¿Γá¼" »«∩ß-
- ¡∩ÑΓ ¬á¬ ¿ß»«½∞º«óáΓ∞ »«ßΓáó½∩ѼδÑ ß Borland Pascal ¿¡ßΓαπ¼Ñ¡-
- Γá½∞¡δÑ ßαÑñßΓóá ¿ πΓ¿½¿Γδ. Å«º¡á¬«¼∞ΓÑß∞ ß "Éπ¬«ó«ñßΓó«¼ »« ¿¡ß-
- Γαπ¼Ñ¡Γá½∞¡δ¼ ßαÑñßΓóá¼ ¿ πΓ¿½¿Γá¼", Ñß½¿ óδ σ«Γ¿ΓÑ:
-
- - πº¡áΓ∞ « Γ«¼, ¬á¬ ¿ß»«½∞º«óáΓ∞ πΓ¿½¿Γπ TPUMOVER ñ½∩ ñ«íáó-
- ½Ñ¡¿∩ ¿ πñá½Ñ¡¿∩ ¼«ñπ½Ñ⌐ ¿º í¿í½¿«ΓѬ¿ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ
- Borland Pascal.
-
- - óδ∩ß¡¿Γ∞, ¬á¬ ¼«ª¡« ¿ß»«½∞º«óáΓ∞ áñ¼¿¡¿ßΓαáΓ«α »α«Ñ¬Γ«ó
- MAKE;
-
- - ¿ß»«½∞º«óáΓ∞ πΓ¿½¿Γπ WinSight ñ½∩ »α«óÑન ß««íΘÑ¡¿⌐, »«-
- ½πτáѼδσ ¿ ¬«¡Γα«½¿απѼδσ óáΦ¿¼ »α¿½«ªÑ¡¿Ñ¼ Windows;
-
- - ¿ß»«½∞º«óáΓ∞ πΓ¿½¿Γπ WinSpector ñ½∩ »α«óÑન óáΦÑú« »α¿½«-
- ªÑ¡¿∩ Windows »«ß½Ñ »«½πτÑ¡¿∩ ¡Ñó«ßßΓá¡áó½¿óáѼ«⌐ «Φ¿í¬¿
- »α¿¬½áñ¡«⌐ »α«úαá¼¼δ (Unrecoverable Application Error),
- τΓ«íδ »«¼«τ∞ óá¼ óδ∩ß¡¿Γ∞, τΓ« ºñÑß∞ ¡ÑóÑα¡«;
-
- - »α«τ¿ΓáΓ∞ « ¬«¼»¿½∩Γ«αÑ αÑßπαß«ó Resource Compiler, »«ºó«-
- ½∩εΘѼ ¬«¼»¿½¿α«óáΓ∞ óáΦ¿ αÑßπαßδ Windows; ñ½∩ ß«ºñá¡¿∩
- αÑßπαß«ó óδ, ¡Ñß«¼¡Ñ¡¡«, »αÑñ»«τΓÑΓÑ ¿ß»«½∞º«óáΓ∞ »á¬ÑΓ
- αáºαáí«Γτ¿¬á αÑßπαß«ó Σ¿α¼δ Borland (Resource Workshop),
- ¡« ñ½∩ »«½¡«Γδ ¼δ ó¬½ετ¿½¿ ¬«¼»¿½∩Γ«α αÑßπαß«ó;
-
- - πº¡áΓ∞ « Γ«¼, ¬á¬ ß«ºñáóáΓ∞ ß»αáó«τ¡δÑ Σá⌐½δ Windows 3.0 ¿
- 3.1;
-
- - óδ∩ß¡¿Γ∞, ¬á¬ ¿ß»«½∞º«óáΓ∞ »α¿ αáí«ΓÑ ß ¿¡ßΓαπ¼Ñ¡Γá½∞¡δ¼¿
- ßαÑñßΓóἿ αѪ¿¼á ¬«¼á¡ñ¡«⌐ ßΓ᫬¿ αѺ¿ñÑ¡Γ¡πε ó »á¼∩Γ¿
- ß»αáó«τ¡πε ß¿ßΓѼπ Borland Pascal - Turbo Help.
-
- èα«¼Ñ φΓ¿σ ¬¡¿ú, ߻ѵ¿á½∞¡« »«ßó∩ΘÑ¡¡δσ Borland Pascal, »á-
- ¬ÑΓ Borland Pascal ó¬½ετáÑΓ ó ßÑí∩ Γá¬ªÑ ß½ÑñπεΘ¿Ñ απ¬«ó«ñßΓóá,
- ¬«Γ«αδÑ ¼«ª¡« ¿ß»«½∞º«óáΓ∞ ß Borland Pascal ¿ ñαπú¿¼¿ ∩ºδ¬«ó묨
- ßαÑñßΓóἿ Borland:
-
- - "Éπ¬«ó«ñßΓó« »«½∞º«óáΓѽ∩ »« Æπαí« «Γ½áñτ¿¬π";
-
- - "Éπ¬«ó«ñßΓó« »«½∞º«óáΓѽ∩ »« Æπαí« »α«Σ¿½¿α«óΘ¿¬π";
-
- - "Éπ¬«ó«ñßΓó« »«½∞º«óáΓѽ∩ »« Æπαí« ÇßßѼí½Ñαπ";
-
- - "èαáΓ¬¿⌐ ß»αáó«τ¡¿¬ »« Æπαí« ÇßßѼí½Ñαπ".
-
-
- B.Pascal 7 & Objects /UG - 10 -
-
- ────────────────────────────────────────────────────────────────────────────
- â½áóá 1. ôßΓá¡«ó¬á ¿ ºá»π߬ Borland Pascal
- ─────────────────────────────────────────────────────────────────
-
- éáΦ »á¬ÑΓ Borland Pascal ó¬½ετáÑΓ ó ßÑí∩ »∩Γ∞ αẽ¿τ¡δσ óÑα-
- ᨩ Borland Pascal:
-
- * BP.EXE, ¿¡ΓÑúα¿α«óá¡¡πε ßαÑñπ αáºαáí«Γ¬¿ »α«úαá¼¼ (IDE),
- ¬«Γ«αá∩ αáí«ΓáÑΓ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ DOS ¿ úÑ¡Ñα¿απÑΓ
- »α¿¬½áñ¡δÑ »α«úαá¼¼δ DOS αÑá½∞¡«ú« αѪ¿¼á, Windows ¿ DOS
- ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á.
- * BPW.EXE, ¿¡ΓÑúα¿α«óá¡¡πε ßαÑñπ, ¬«Γ«αá∩ αáí«ΓáÑΓ »«ñ
- Windows ¿ úÑ¡Ñα¿απÑΓ »α¿¬½áñ¡δÑ »α«úαá¼¼δ DOS αÑá½∞¡«ú«
- αѪ¿¼á, Windows ¿ DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á.
- * TURBO.EXE, ¿¡ΓÑúα¿α«óá¡¡πε ßαÑñπ, ¬«Γ«αá∩ αáí«ΓáÑΓ ó αÑ-
- á½∞¡«¼ αѪ¿¼Ñ DOS ¿ úÑ¡Ñα¿απÑΓ Γ«½∞¬« »α¿¬½áñ¡δÑ »α«úαá¼¼δ
- DOS αÑá½∞¡«ú« αѪ¿¼á.
- * BPC.EXE, ¬«¼»¿½∩Γ«α, αáí«ΓáεΘ¿⌐ ó αѪ¿¼Ñ ¬«¼á¡ñ¡«⌐ ßΓ᫬¿
- ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ DOS ¿ úÑ¡Ñα¿απεΘ¿⌐ »α¿¬½áñ¡δÑ »α«úαá¼-
- ¼δ DOS αÑá½∞¡«ú« αѪ¿¼á, Windows ¿ DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á.
- * TPC.EXE ¬«¼»¿½∩Γ«α, αáí«ΓáεΘ¿⌐ ó αѪ¿¼Ñ ¬«¼á¡ñ¡«⌐ ßΓ᫬¿ ó
- αÑá½∞¡«¼ αѪ¿¼Ñ DOS ¿ úÑ¡Ñα¿απεΘ¿⌐ Γ«½∞¬« »α¿¬½áñ¡δÑ »α«ú-
- αá¼¼δ DOS αÑá½∞¡«ú« αѪ¿¼á.
-
- Borland Pascal »«ßΓáó½∩ÑΓß∩ ß áóΓ«¼áΓ¿τÑ߬«⌐ »α«úαá¼¼«⌐ πß-
- Γá¡«ó¬¿, ¬«Γ«αá∩ ¡áºδóáÑΓß∩ INSTALL. êº-ºá ¿ß»«½∞º«óá¡¿∩ ¼ÑΓ«ñ«ó
- π»á¬«ó¬¿ Σá⌐½«ó óδ ñ«½ª¡δ ó«ß»«½∞º«óáΓ∞ß∩ ñá¡¡«⌐ »α«úαá¼¼«⌐, á ¡Ñ
- »α«ßΓ« ߬«»¿α«óáΓ∞ ¡á ßó«⌐ ªÑßΓ¬¿⌐ ñ¿ß¬ Σá⌐½δ Borland Pascal.
- Åα«úαá¼¼á INSTALL áóΓ«¼áΓ¿τÑ߬¿ ¬«»¿απÑΓ ¿ αá߻ᬫóδóáÑΓ Σá⌐½δ
- Borland Pascal ¿ Borland Pascal for Windows.
-
- îδ »αÑñ»«½áúáѼ, τΓ« óδ πªÑ º¡á¬«¼δ ß ¬«¼á¡ñἿ DOS. ìá»α¿-
- ¼Ñα, ñ½∩ ß«ºñá¡¿∩ αѺÑαó¡δσ ¬«»¿⌐ ßó«¿σ ñ¿ßΓα¿íπΓ¿ó¡δσ ñ¿ß¬ÑΓ
- (¬π»½Ñ¡¡δσ óἿ ñ¿ß¬ÑΓ) óá¼ »«ΓαÑíπÑΓß∩ ¬«¼á¡ñá DISKCOPY. è«úñá
- óδ »«½πτ¿ΓÑ ñ¿ß¬ÑΓδ, ßñѽá⌐ΓÑ ¿σ »«½¡πε αáí«τπε ¬«»¿ε, á «α¿ú¿¡á-
- ½δ ß«σαá¡¿ΓÑ ºáΓѼ ó ¡áñѪ¡«¼ ¼ÑßΓÑ.
-
- äá¡¡á∩ ú½áóá ß«ñÑαª¿Γ ¿¡Σ«α¼áµ¿ε »« ß½ÑñπεΘ¿¼ ó«»α«ßá¼:
-
- * πßΓá¡«ó¬á Borland Pascal ¿ Borland Pascal for Windows ó
- óáΦÑ⌐ ß¿ßΓѼÑ;
- * ñ«ßΓπ» ¬ Σá⌐½π README;
- * ñ«ßΓπ» ¬ Σá⌐½π HELPME!.DOC;
- * ¿ß»«½∞º«óá¡¿Ñ »α¿¼Ñα«ó »α«úαá¼¼ Borland.
-
- êß»«½∞º«óá¡¿Ñ »α«úαá¼¼δ Install
- ─────────────────────────────────────────────────────────────────
-
- èα«¼Ñ óδ»«½¡Ñ¡¿∩ ñαπú¿σ Σπ¡¬µ¿⌐ »α«úαá¼¼á Install αáß»«º¡áÑΓ
-
- B.Pascal 7 & Objects /UG - 11 -
-
- ¿ß»«½∞ºπѼ«Ñ á»»áαáΓ¡«Ñ «íÑß»ÑτÑ¡¿Ñ ¿ ¡áßΓαá¿óáÑΓ ß««ΓóÑΓßΓóπεΘ¿¼
- «íαẫ¼ Borland Pascal. Ä¡á Γá¬ªÑ áóΓ«¼áΓ¿τÑ߬¿ ß«ºñáÑΓ ¡Ñ«íσ«ñ¿-
- ¼δÑ ¬áΓὫú¿ ¿ »ÑαÑ»¿ßδóáÑΓ Σá⌐½δ ß óáΦ¿σ ñ¿ßΓα¿íπΓ¿ó¡δσ ñ¿ß¬«ó
- ¡á ªÑßΓ¬¿⌐ ñ¿ß¬. àÑ ñÑ⌐ßΓó¿∩ ú«ó«α∩Γ ßἿ ºá ßÑí∩, á ó »α¿óÑñÑ¡-
- ¡«¼ ¡¿ªÑ ΓѬßΓÑ ß««íΘáÑΓß∩ óßÑ, τΓ« óá¼ ¡πª¡« º¡áΓ∞.
-
- ùΓ«íδ πßΓá¡«ó¿Γ∞ Borland Pascal, ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éßΓáó∞ΓÑ πßΓá¡«ó«τ¡πε ñ¿ß¬ÑΓπ (ñ¿ß¬ÑΓπ 1) ó ñ¿ß¬«ó«ñ A.
- ìáíÑα¿ΓÑ ß½ÑñπεΘπε ¬«¼á¡ñπ, ºáΓѼ ¡áª¼¿ΓÑ ¬½áó¿Φπ Enter:
-
- A: INSTALL
-
- 2. ì᪼¿ΓÑ Enter, ¬«úñá óδóÑñÑΓß∩ φ¬αá¡ πßΓá¡«ó¬¿.
-
- 3. æ½Ññπ⌐ΓÑ »«ñ߬Ậá¼.
-
- 4. Åα«úαá¼¼Ñ Install ñ½∩ ºá»¿ß¿ óαѼѡ¡δσ Σá⌐½«ó »ÑαÑñ ¿σ
- αá߻ᬫó¬«⌐ ΓαÑíπÑΓß∩ »α«ßΓαá¡ßΓó« ¡á ñ¿ß¬Ñ. é ¡áτá½∞¡«¼
- φ¬αá¡Ñ INSTALL »ÑαÑτ¿ß½∩εΓß∩ ΓαÑí«óá¡¿∩ ¬ »α«ßΓαá¡ßΓóπ ¡á
- ñ¿ß¬Ñ; Ñß½¿ Ñú« ¡Ññ«ßΓáΓ«τ¡«, óδ⌐ñ¿ΓÑ ¿º Install ¿ «ßó«-
- í«ñ¿ΓÑ ¡Ñ«íσ«ñ¿¼«Ñ »α«ßΓαá¡ßΓó«. Å«ß½Ñ ºáóÑαΦÑ¡¿∩ αáí«Γδ
- Install φΓ¿ óαѼѡ¡δÑ Σá⌐½δ íπñπΓ πñá½Ñ¡δ.
-
- 5. é ¬«¡µÑ πßΓá¡«ó¬¿ óá¼ ¼«ªÑΓ »«ΓαÑí«óáΓ∞ß∩ ñ«íáó¿Γ∞ ó Σá⌐½
- CONFIG.SYS ß½ÑñπεΘπε ßΓ᫬π:
-
- FILES = 20
-
- á ó Σá⌐½ AUTOEXEC.BAT ß½ÑñπεΘπε ßΓ᫬π:
-
- PATH = C:\BP\BIN
-
- (¿½¿ ¼«ñ¿Σ¿µ¿απ⌐ΓÑ «»ÑαáΓ«α PATH, Ñß½¿ «¡ πªÑ ¿¼ÑÑΓß∩).
-
- Åα¿¼Ñτá¡¿Ñ: àß½¿ óδ ߼ѡ¿ΓÑ ¿ß»«½∞ºπѼδ⌐ »« π¼«½τá¡¿ε
- ¬áΓὫú, óá¼ ¡πª¡« ¿º¼Ñ¡¿Γ∞ πßΓá¡«ó¬π PATH.
-
- è«úñá óδ ºáóÑαΦ¿ΓÑ αáí«Γπ, »α«úαá¼¼á Install ¡á»«¼¡¿Γ óá¼,
- τΓ« ¡πª¡« »α«τÑßΓ∞ Σá⌐½ README, ¬«Γ«αδ⌐ ß«ñÑαª¿Γ »«ß½Ññ¡εε ¿¡Σ«α-
- ¼áµ¿ε « ñÑΓá½∩σ ¿¼ÑεΘÑú«ß∩ π óáß ¿ºñá¡¿∩ ñá¡¡«⌐ óÑαß¿¿ Borland
- Pascal.
-
- Åα«úαá¼¼á Install ¿ Windows
- ─────────────────────────────────────────────────────────────────
-
- é ß½ÑñπεΘ¿⌐ αáº, ¬«úñá óδ ºá»πßΓ¿ΓÑ Microsoft Windows (»«ß½Ñ
- óδσ«ñá ¿º »α«úαá¼¼δ »α«ß¼«Γαá Σá⌐½á README), óδóÑñÑΓß∩ ºá»α«ß,
- σ«Γ¿ΓÑ ½¿ óδ ß«ºñáΓ∞ ó áñ¼¿¡¿ßΓαáΓ«αÑ »α«úαá¼¼ »α«úαá¼¼¡πε úαπ»-
- »π Borland Pascal. àß½¿ óδ óδíÑαÑΓÑ πΓóÑαñ¿Γѽ∞¡δ⌐ «ΓóÑΓ, Yes,
- Windows ß«ºñáÑΓ »α«úαá¼¼¡πε úαπ»»π, ß«ñÑαªáΘπε »¿¬Γ«úαá¼¼δ ñ½∩
-
- B.Pascal 7 & Objects /UG - 12 -
-
- »α«úαá¼¼ ¿ πΓ¿½¿Γ Borland Pascal ¿ Borland Pascal for Windows.
-
- Åα«úαá¼¼á Install »αÑñ»«½áúáÑΓ, τΓ« Windows πßΓá¡áó½¿óáÑΓß∩
- ó ¬áΓὫúÑ, ¬«Γ«αδ⌐ óδ ºáñ὿ ¬á¬ ¬áΓὫú Windows ó »α«µÑßßÑ πß-
- Γá¡«ó¬¿. Ä¡á »αÑñ»«½áúáÑΓ ΓᬪÑ, τΓ« áñ¼¿¡¿ßΓαáΓ«α »α«úαá¼¼ ºá-
- »π߬áÑΓß∩ áóΓ«¼áΓ¿τÑ߬¿ ¬á¬ "«í«½«τ¬á" Windows »α¿ ºá»π߬Ñ
- Windows. àß½¿ óδ ¿ß»«½∞ºπÑΓÑ »α«úαá¼¼¡πε «í«½«τ¬π, «Γ½¿τ¡πε «Γ
- áñ¼¿¡¿ßΓαáΓ«αá »α«úαá¼¼, Γ« óá¼ ¼«ªÑΓ »«ΓαÑí«óáΓ∞ß∩ «ΓαÑñá¬Γ¿α«-
- óáΓ∞ Σá⌐½ SYSTEM.INI ó ¬áΓὫúÑ Windows ¿ ó¬½ετ¿Γ∞ ó ¡Ñú« ßΓ᫬π:
-
- SHELL=PROGMAN.EXE
-
- é »α«Γ¿ó¡«¼ ß½πτáÑ »α¿ »Ñαó«¡áτá½∞¡«¼ «Γ¬αδΓ¿¿ Windows ¿ »«-
- »δ⪥ Borland Pascal ß«ºñáΓ∞ ¡«óπε úαπ»»π áñ¼¿¡¿ßΓαáΓ«αá »α«úαá¼¼
- óδ »«½πτ¿ΓÑ ß««íΘÑ¡¿Ñ, ú«ó«α∩ΘÑÑ «í "«ΓßπΓßΓó¿¿ ßó∩º¿ ß áñ¼¿¡¿ßΓ-
- αáΓ«α«¼ »α«úαá¼¼". Å«ß½Ñ Γ«ú« ¬á¬ Borland Pascal for Windows ¿
- ñαπú¿Ñ ¿¡ßΓαπ¼Ñ¡Γá½∞¡δÑ ßαÑñßΓóá íπñπΓ πßΓá¡«ó½Ñ¡δ ó úαπ»»Ñ áñ¼¿-
- ¡¿ßΓαáΓ«αá »α«úαá¼¼, óδ ¼«ªÑΓÑ »α«óÑα¿Γ∞ φΓ¿ πßΓá¡«ó¬¿ ¿, Ñß½¿
- σ«Γ¿ΓÑ, »ÑαÑπßΓá¡«ó¿Γ∞ ¿σ ó á½∞ΓÑα¡áΓ¿ó¡«⌐ ¬«¼á¡ñ¡«⌐ «í«½«τ¬Ñ.
-
- çá»π߬ Borland Pascal
- ─────────────────────────────────────────────────────────────────
-
- ä½∩ ºá»π߬á Borland Pascal »ÑαÑ⌐ñ¿ΓÑ ó ß«ºñá¡¡δ⌐ »α«úαá¼¼«⌐
- Install »«ñ¬áΓὫú Borland Pascal BIN. Äíδτ¡« φΓ¿¼ ¬áΓὫú«¼ ∩ó-
- ½∩ÑΓß∩ ¬áΓὫú C:\BP\BIN. ä½∩ ºá»πß¬á ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñδ ºáΘ¿-
- ΘÑ¡¡«ú« αѪ¿¼á ¡áíÑα¿ΓÑ:
-
- BP
-
- Åα¿¼Ñτá¡¿Ñ: Äí ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñÑ Windows αáß߬áºδ-
- óáÑΓß∩ ¡¿ªÑ.
-
- öá⌐½δ DPMI16BI.OVL ¿ RTM.EXE ñ«½ª¡δ »α¿ßπΓßΓó«óáΓ∞ ó ¬áΓá-
- ½«úÑ »« ΓѬπΘѼπ ¼áαΦαπΓπ, ó »α«Γ¿ó¡«¼ ß½πτáÑ BP.EXE ¡Ñ ºá»πßΓ¿Γ-
- ß∩.
-
- ùΓ«íδ ºá»πßΓ¿Γ∞ ¿¡ΓÑúα¿α«óá¡¡πε ßαÑñπ IDE, αáí«ΓáεΘπε ó αÑ-
- á½∞¡«¼ αѪ¿¼Ñ, ¡áíÑα¿ΓÑ:
-
- TURBO
-
- çáΘ¿ΘÑ¡¡δ⌐ αѪ¿¼ ¿ »á¼∩Γ∞
- ─────────────────────────────────────────────────────────────────
-
- ê¡ΓÑúα¿α«óá¡¡á∩ ßαÑñá DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á, ¬«¼»¿½∩Γ«α αÑ-
- ª¿¼á ¬«¼á¡ñ¡«⌐ ßΓ᫬¿ ¿ ñαπú¿Ñ ¿¡ßΓαπ¼Ñ¡Γá½∞¡δÑ ßαÑñßΓóá ºáΘ¿ΘÑ¡-
- ¡«ú« αѪ¿¼á ¿ß»«½∞ºπεΓ ¿¡ΓÑαΣÑ⌐ß ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á DOS, τΓ« ñáÑΓ
- óá¼ ñ«ßΓπ» ¬« óßÑ⌐ »á¼∩Γ¿ ¬«¼»∞εΓÑαá. èα«¼Ñ Γ«ú«, óδ ¼«ªÑΓÑ ¿ß-
- »«½∞º«óáΓ∞ Borland Pascal ñ½∩ ¡á»¿ßá¡¿∩ ßó«¿σ ß«íßΓóÑ¡¡δσ »α¿½«-
- ªÑ¡¿⌐, αáí«ΓáεΘ¿σ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ. ê¡ΓÑαΣÑ⌐ß ºáΘ¿ΘÑ¡¡«ú« αÑ-
- ª¿¼á »«½¡«ßΓ∞ε »α«ºαáτÑ¡ ñ½∩ »«½∞º«óáΓѽ∩, ¿ ºá ¡Ñ¼¡«ú¿¼¿ 󫺼«ª-
- ¡δ¼¿ ¿ß¬½ετÑ¡¿∩¼¿ óá¼ ¡Ñ ¡πª¡« « ¡Ñ¼ ñπ¼áΓ∞.
-
- B.Pascal 7 & Objects /UG - 13 -
-
-
- DPMIINST
-
- Äñ¡¿¼ Γᬿ¼ ¿ß¬½ετÑ¡¿Ñ¼ ¼«ªÑΓ íδΓ∞ ß¿Γπᵿ∩, ¬«úñá óδ ºá»πß-
- ¬áÑΓÑ Borland Pascal ßá¼δ⌐ »Ñαóδ⌐ αáº. ä½∩ «»αÑñѽѡ¿∩ Γ«ú«, ¬á¬
- αáºαÑΦ¿Γ∞ ¿ß»«½∞º«óá¡¿Ñ ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á ¡á óáΦѼ ¬«¼»∞εΓÑαÑ,
- Borland Pascal ¿ß»«½∞ºπÑΓ ó¡πΓαÑ¡¡εε íáºπ ñá¡¡δσ σáαá¬ΓÑα¿ßΓ¿¬
- αẽ¿τ¡δσ ¼áΦ¿¡ ¿ ß««ΓóÑΓßΓóπεΘ¿¼ «íαẫ¼ ¡áßΓαá¿óáÑΓß∩. àß½¿ ¡á
- óáΦÑ⌐ ¼áΦ¿¡Ñ í«½ÑÑ ßΓáαδ⌐ ¼¿¬α«»α«µÑßß«α, τѼ 80286, Γ« Borland
- Pascal ¼«ªÑΓ Ñú« ¡Ñ αáß»«º¡áΓ∞. Åα¿ ºá»π᪥ Borland Pascal óδ
- πó¿ñ¿ΓÑ ß½ÑñπεΘÑÑ ß««íΘÑ¡¿Ñ:
-
- Machine not in database (RUN DPMIINST)
- (îáΦ¿¡δ ¡ÑΓ ó íáºÑ ñá¡¡δσ, ºá»πßΓ¿ΓÑ DPMIINST)
-
- àß½¿ óδ »«½πτ¿½¿ φΓ« ß««íΘÑ¡¿Ñ, »α«ßΓ« ºá»πßΓ¿ΓÑ »α«úαá¼¼π
- DPMIINST, ¡áíαáó DPMIINST ó «ΓóÑΓ ¡á »«ñ߬Ậπ DOS.
-
- ä½∩ «»αÑñѽѡ¿∩ ¡á¿½πτΦÑú« ß»«ß«íá αáºαÑΦÑ¡¿∩ ºáΘ¿ΘÑ¡¡«ú«
- αѪ¿¼á DPMIINST óδ»«½¡∩ÑΓ ¡á óáΦÑ⌐ ¼áΦ¿¡Ñ »«ß½Ññ«óáΓѽ∞¡«ßΓ∞ ΓÑß-
- Γ«ó ¿ áóΓ«¼áΓ¿τÑ߬¿ ¬«¡Σ¿úπα¿απÑΓ ß««ΓóÑΓßΓóπεΘ¿¼ «íαẫ¼ Borland
- Pascal. Å«ß½Ñ óδ»«½¡Ñ¡¿∩ »α«úαá¼¼δ DPMIINST óá¼ í«½∞ΦÑ ¡Ñ »«ΓαÑ-
- íπÑΓß∩ ÑÑ ºá»π߬áΓ∞.
-
- ìѬ«Γ«αδÑ áñ¼¿¡¿ßΓαáΓ«αδ »á¼∩Γ¿, ñαá⌐óÑαδ πßΓα«⌐ßΓó ¿ αѺ¿-
- ñÑ¡Γ¡δÑ ó »á¼∩Γ¿ »α«úαá¼¼δ (TSR) ¼«úπΓ ¡áαπΦáΓ∞ ß»«ß«í¡«ßΓ∞
- DPMIINST á¡á½¿º¿α«óáΓ∞ óáΦ ¬«¼»∞εΓÑα. àß½¿ óδ»«½¡Ñ¡¿Ñ DPMIINST
- ºáóÑαΦáÑΓß∩ ¡Ñπñáτ¡«, óαѼѡ¡« ºá»αÑΓ¿ΓÑ ¿½¿ πñ὿ΓÑ φΓ¿ »α«úαá¼-
- ¼δ. ¥Γ« ñáÑΓ DPMIINST ¡Ñ«úαá¡¿τÑ¡¡δ⌐ ñ«ßΓπ», ¬«Γ«αδ⌐ ¡Ñ«íσ«ñ¿¼ Ñ⌐
- ñ½∩ «»αÑñѽѡ¿∩ ¡á¿½πτΦÑú« »πΓ¿ »ÑαÑσ«ñá ó ºáΘ¿ΘÑ¡¡δ⌐ αѪ¿¼.
-
- ÅÑαѼѡ¡á∩ DPMIMEM
-
- Å« π¼«½τá¡¿ε ¿¡ΓÑαΣÑ⌐ß DPMIMEM Borland Pascal αáß»αÑñѽ∩ÑΓ
- ñ½∩ ßó«Ñú« ¿ß»«½∞º«óá¡¿∩ óßε ñ«ßΓπ»¡πε ñ«»«½¡¿Γѽ∞¡πε ¿ αáßΦ¿αÑ¡-
- ¡πε »á¼∩Γ∞. àß½¿ óδ ¡Ñ σ«Γ¿ΓÑ αáß»αÑñѽ∩Γ∞ óßε ñ«ßΓπ»¡πε »á¼∩Γ∞
- ñ½∩ ∩ñαá DPMIMEM, óδ ¼«ªÑΓÑ πßΓá¡«ó¿Γ∞ »ÑαѼѡ¡πε «»Ñαᵿ«¡¡«⌐
- ßαÑñδ Γᬿ¼ «íαẫ¼, τΓ«íδ ºáñáΓ∞ ¼á¬ß¿¼á½∞¡δ⌐ «íΩѼ ¿ß»«½∞ºπѼ«⌐
- »á¼∩Γ¿. ¥Γπ »ÑαѼѡ¡πε ¼«ª¡« óóÑßΓ¿ ¡Ñ»«ßαÑñßΓóÑ¡¡« ó «ΓóÑΓ ¡á
- »«ñ߬Ậπ DOS ¿½¿ ºáñáΓ∞ ó ó¿ñÑ ßΓ᫬¿ Σá⌐½á AUTOEXEC.BAT, ¿ß-
- »«½∞ºπ∩ ß½ÑñπεΘ¿⌐ ß¿¡Γá¬ß¿ß:
-
- SET DPMIMEM=MAXMEM nnnn
-
- úñÑ nnnn - «íΩѼ »á¼∩Γ¿ ó ¬¿½«íá⌐Γáσ.
-
- ìá»α¿¼Ñα, Ñß½¿ π óáß ÑßΓ∞ ß¿ßΓѼá ß 4 ¼Ñúáíá⌐ΓἿ »á¼∩Γ¿ ¿
- óδ σ«Γ¿ΓÑ, τΓ«íδ ∩ñα« DPMIMEM ¿ß»«½∞º«óὫ 2 ¼Ñúáíá⌐Γá, «ßΓáó½∩∩
- 2 ¼Ñúáíá⌐Γá ßó«í«ñ¡δ¼¿, »ÑαѼѡ¡πε DPMIMEM ß½ÑñπÑΓ πßΓá¡«ó¿Γ∞
- ß½ÑñπεΘ¿¼ «íαẫ¼:
-
- SET DPMIMEM=MAXMEM 2000
-
-
- B.Pascal 7 & Objects /UG - 14 -
-
- RTMRES
-
- RTMRES óδ»«½¡∩ÑΓ »αÑñºáúαπº¬π DPMI-ßÑαóÑαá. Ä¡ αáºαÑΦáÑΓ
- DPMI ¿ »«α«ªñáÑΓ ¬«¼á¡ñ¡δ⌐ »α«µÑßß«α DOS. ÅαÑñºáúαπº¬á DPMI-ßÑα-
- óÑαá »«ºó«½∩ÑΓ óá¼ ºáúαπªáΓ∞ ¿¡ßΓαπ¼Ñ¡Γá½∞¡δÑ ßαÑñßΓóá Borland
- Pascal, αáí«ΓáεΘ¿⌐ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ, Γá¬¿Ñ ¬á¬ BP, BPC, TASMX
- ¿ Γ.ñ. ¡Ñ߬«½∞¬« íδßΓαÑÑ. ä½∩ óδσ«ñá ¿º ¬«¼á¡ñ¡«ú« »α«µÑßß«αá ¡á-
- íÑα¿ΓÑ EXIT.
-
- RTMRES «ß«íÑ¡¡« »«½ÑºÑ¡, Ñß½¿ óδ ¿ß»«½∞ºπÑΓÑ BPC - ¬«¼»¿½∩-
- Γ«α ¬«¼á¡ñ¡«⌐ ßΓ᫬¿, αáí«ΓáεΘ¿⌐ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ DOS. èáªñδ⌐
- αáº, ¬«úñá óδ Ñú« óδºδóáÑΓÑ, ºáúαπªáÑΓß∩ DPMI-ßÑαóÑα. àß½¿ óδ
- »αÑñóáα¿Γѽ∞¡« ºá»πßΓ¿½¿ RTMRES, Γ« ßÑαóÑα πªÑ »α¿ßπΓßΓóπÑΓ, ¿
- ¬«¼»¿½∩Γ«α αѪ¿¼á ¬«¼á¡ñ¡«⌐ ßΓ᫬¿ ºáúαπªáÑΓß∩ íδßΓαÑÑ.
-
- Borland Pascal ¿ αáßΦ¿αÑ¡¡á∩ »á¼∩Γ∞
-
- Å«ß½Ñ ºáúαπº¬¿ ∩ñαá DPMI (óδ»«½¡Ñ¡¿Ñ¼ BP ¿½¿ ß »«¼«Θ∞ε πΓ¿-
- ½¿Γδ RTMRES) ¿¡ΓÑúα¿α«óá¡¡á∩ ¿¡ΓÑαá¬Γ¿ó¡á∩ ßαÑñá Borland Pascal
- óºá¿¼«ñÑ⌐ßΓóπÑΓ ß DPMI-ßÑαóÑα«¼ τÑαÑñ áñ¼¿¡¿ßΓαáΓ«α φΓá»á óδ»«½-
- ¡Ñ¡¿∩ Borland (RTM.EXE) ñ½∩ αáß»αÑñѽѡ¿∩ »á¼∩Γ¿ Γᬿ¼ «íαẫ¼,
- τΓ« ß¼«ªÑΓ ºáúαπªáΓ∞ß∩ ¿ óδ»«½¡∩Γ∞ß∩ ¿¡ΓÑúα¿α«óá¡¡á∩ ßαÑñá IDE.
- Å« π¼«½τá¡¿ε IDE ¿ß»«½∞ºπÑΓ óßε αáßΦ¿αÑ¡¡πε »á¼∩Γ∞, ºáαѺÑαó¿α«-
- óá¡¡πε ∩ñα«¼ DPMI.
-
-
-
- B.Pascal 7 & Objects /UG - 15 -
-
- çá»π߬ Borland Pascal for Windows
- ─────────────────────────────────────────────────────────────────
-
- ùΓ«íδ ºá»πßΓ¿Γ∞ Borland Pascal for Windows, Θѽ¬¡¿ΓÑ ¬¡«»¬«⌐
- "¼δΦ¿" ¡á »¿¬Γ«úαá¼¼á Borland Pascal for Windows áñ¼¿¡¿ßΓαáΓ«αá
- »α«úαá¼¼. êº Windows óδ ¼«ªÑΓÑ Γá¬ªÑ ºá»π߬áΓ∞ ñóÑ ¿¡ΓÑúα¿α«óá¡-
- ¡δÑ ¿¡ΓÑαá¬Γ¿ó¡δÑ ßαÑñδ ñ½∩ DOS; ¿σ »¿¬Γ«úαá¼¼δ ¼«ª¡« ¡á⌐Γ¿ ó áñ-
- ¼¿¡¿ßΓαáΓ«αÑ »α«úαá¼¼.
-
-
- çá»π߬ BP.EXE ó αáßΦ¿αÑ¡¡«¼ αѪ¿¼Ñ Windows 386
- ─────────────────────────────────────────────────────────────────
-
- ê¡ΓÑúα¿α«óá¡¡á∩ ßαÑñá ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á DOS ñ«½ª¡á »αѬαáß-
- ¡« αáí«ΓáΓ∞, Ñß½¿ óδ ºá»π߬áÑΓÑ Windows ó αáßΦ¿αÑ¡¡«¼ αѪ¿¼Ñ 386.
- ÅÑαѼѡ¡πε DPMIMEM óá¼ πßΓá¡áó½¿óáΓ∞ ¡Ñ »«ΓαÑíπÑΓß∩; ó¼ÑßΓ« φΓ«ú«
- ¿ß»«½∞ºπ⌐ΓÑ ñ½∩ ¬«¡Σ¿úπα¿α«óá¡¿∩ «íΩÑ¼á »á¼∩Γ¿, ¬«Γ«απε óδ σ«Γ¿ΓÑ
- «ΓóÑßΓ¿ ñ½∩ ¿ß»«½∞º«óá¡¿∩ Borland Pascal, Σá⌐½ PIF Borland Pascal
- for Windows (BP\BIN\BP.PIF).
-
-
- çá»π߬ BP.EXE ó ßΓá¡ñáαΓ¡«¼ αѪ¿¼Ñ Windows
- ─────────────────────────────────────────────────────────────────
-
- ÅαÑñóáα¿Γѽ∞¡á∩ ºáúαπº¬á DPMI-ßÑαóÑαá »«ºó«½∩ÑΓ óá¼ ºá»πß-
- ¬áΓ∞ ¿¡ßΓαπ¼Ñ¡Γá½∞¡δÑ ßαÑñßΓóá ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á (BP, BPC, TASMX
- ¿ Γ.ñ.) ó Windows ó ßΓá¡ñáαΓ¡«¼ αѪ¿¼Ñ DOS. ä½∩ φΓ«ú« ºá»πßΓ¿ΓÑ
- RTMRES.EXE (¬á¬ «»¿ßá¡« óδΦÑ). êß»«½∞º«óá¡¿Ñ RTMRES.EXE ó ß«τÑΓá-
- ¡¿¿ ß Windows óßÑúñá πßΓá¡áó½¿óáÑΓ »ÑαѼѡ¡πε DPMIMEM ó «íΩѼ »á-
- ¼∩Γ¿, ¼Ñ¡∞Φ¿⌐ ¼á¬ß¿¼á½∞¡«ú«. ¥Γ« «íÑß»Ñτ¿óáÑΓ ó Windows ¡á½¿τ¿Ñ
- ñ«ßΓáΓ«τ¡«ú« «íΩѼá Σ¿º¿τÑ߬«⌐ »á¼∩Γ¿ ñ½∩ αáí«Γδ.
-
- àß½¿ óδ αáí«ΓáÑΓÑ »«ñ π»αáó½Ñ¡¿Ñ¼ «í«½«τ¬¿ RTMRES, Γ« ¡Ñ
- ß¼«ªÑΓÑ ºá»πßΓ¿Γ∞ Windows ó π½πτΦÑ¡¡«¼ αѪ¿¼Ñ 386, »«ß¬«½∞¬π
- DPMI-ßÑαóÑα »« π¼«½τá¡¿ε αáß»αÑñѽ∩ÑΓ óßε αáßΦ¿αÑ¡¡πε »á¼∩Γ∞ ñ½∩
- ßó«Ñú« ß«íßΓóÑ¡¡«ú« ¿ß»«½∞º«óá¡¿∩. éá¼ ¡πª¡« ß¡áτá½á óδ⌐Γ¿ ¿º
- «í«½«τ¬¿, á ºáΓѼ ºá»πßΓ¿Γ∞ Windows ¿½¿ ¿ß»«½∞º«óáΓ∞ ñ½∩ «úαá¡¿-
- τÑ¡¿∩ «íΩÑ¼á »á¼∩Γ¿, αáß»αÑñѽ∩Ѽ«⌐ DPMI-ßÑαóÑα«¼, »ÑαѼѡ¡πε
- DPMIMEM.
-
-
- çá»π߬ BP.EXE ó «¬¡Ñ Windows DOS
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ ó «¬¡Ñ Windows DOS óδ óδíÑα¿ΓÑ ºá»π߬ ¿¡ΓÑúα¿α«óá¡¡«⌐
- ßαÑñδ ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á, Γ« óá¼ ¡πª¡« ß¡áτá½á ¼«ñ¿Σ¿µ¿α«óáΓ∞
- Σá⌐½ DOSPRMPT.PIF (¬«Γ«αδ⌐ ¼«ª¡« ¡á⌐Γ¿ ó ¬áΓὫúÑ Windows), í½á-
- ú«ñáα∩ τѼπ IDE ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á ß¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ αáßΦ¿αÑ¡-
- ¡πε »á¼∩Γ∞.
-
- ÄΓ¬α«⌐ΓÑ Σá⌐½ DOSPRMPT.PIF ß »«¼«Θ∞ε αÑñá¬Γ«αá PIF ¿ π¬áª¿ΓÑ
- «íΩѼ αáßΦ¿αÑ¡¡«⌐ »á¼∩Γ¿, ¬«Γ«αδ⌐ óδ σ«Γ¿ΓÑ ¿ß»«½∞º«óáΓ∞ ó ¿¡ΓÑú-
- α¿α«óá¡¡«⌐ ¿¡ΓÑαá¬Γ¿ó¡«⌐ ßαÑñÑ ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á. àß½¿ óδ ¡Ñ
-
- B.Pascal 7 & Objects /UG - 16 -
-
- 󻫽¡Ñ º¡á¬«¼δ ß αáí«Γ«⌐ αÑñá¬Γ«αá PIF, ß¼. "Éπ¬«ó«ñßΓó« »«½∞º«-
- óáΓѽ∩ »« Microsoft Windows".
-
-
- å¿ñ¬«¬α¿ßΓá½½¿τÑ߬¿Ñ ¿ »½áº¼Ñ¡¡δÑ φ¬αá¡δ
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ π óáß ¿¼ÑÑΓß∩ »«αΓáΓ¿ó¡δ⌐ ¬«¼»∞εΓÑα ß ª¿ñ¬«¬α¿ßΓá½½¿-
- τÑ߬¿¼ ½¿ »½áº¼Ñ¡¡δ¼ ñ¿ß»½ÑѼ, Γ« Borland Pascal ß½ÑñπÑΓ ºá»πß-
- Γ¿Γ∞ ß »áαá¼ÑΓα«¼ ºá»π߬á /L. ìáíÑα¿ΓÑ:
-
- BP /L
- ¿½¿
- TURBO /L
-
- ò«Γ∩ óδ óßÑúñá ¼«ªÑΓÑ ºá»πßΓ¿Γ∞ Borland Pascal Γᬿ¼ ß»«ß«-
- í«¼, ó IDE Γá¬ªÑ ¼«ª¡« ¡áßΓα«¿Γ∞ ¬«¡Σ¿úπαáµ¿ε ¡á ¿ß»«½∞º«óá¡¿Ñ
- τÑα¡«-íѽ«ú« φ¬αá¡á, ¿ß»«½∞ºπ∩ ñ½∩ φΓ«ú« ñ¿á½«ú«ó«Ñ «¬¡« Option│
- Enviroment│Startup. éδíÑα¿ΓÑ »áαá¼ÑΓα LCD Color Set.
-
-
- öá⌐½ README
- ─────────────────────────────────────────────────────────────────
-
- öá⌐½ README ß«ñÑαª¿Γ »«ß½Ññ¡εε ¿¡Σ«α¼áµ¿ε, ¬«Γ«αá∩ ¼«ªÑΓ «Γ-
- ßπΓßΓó«óáΓ∞ ó ñ«¬π¼Ñ¡Γᵿ¿.
-
- Borland Pascal áóΓ«¼áΓ¿τÑ߬¿ »«¼ÑΘáÑΓ óá¼ ó Σá⌐½ README,
- ¬«úñá óδ óδ»«½¡∩ÑΓÑ »α«úαá¼¼π Install. ùΓ«íδ »«½πτ¿Γ∞ ñ«ßΓπ» ¬
- Σá⌐½π README »«ºñ¡ÑÑ, óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ »α«úαá¼¼π README
- Borland Pascal, ¡áíαáó ó ¬«¼á¡ñ¡«⌐ ßΓα«¬Ñ DOS ß½ÑñπεΘ¿Ñ ¬«¼á¡ñδ:
-
- CD \BP
- README
-
- öá⌐½δ FILELIST.DOC ¿ HELPME!.DOC
- ─────────────────────────────────────────────────────────────────
-
- éáΦ πßΓá¡«ó«τ¡δ⌐ ñ¿ß¬ ß«ñÑαª¿Γ Σá⌐½ ß ¿¼Ñ¡Ñ¼ FILELIST.DOC, ó
- ¬«Γ«α«¼ »ÑαÑτ¿ß½Ñ¡δ óßÑ Σá⌐½δ, ß«ñÑαªáΘ¿Ñß∩ ¡á ñ¿ßΓα¿íπΓ¿ó¡δσ
- ñ¿ß¬ÑΓáσ, ¿ ñá¡δ ¬αáΓ¬¿Ñ «»¿ßá¡¿∩ ¬áªñ«ú« ¿º ¡¿σ, ¿ Σá⌐½
- HELPME!.DOC, ß«ñÑαªáΘ¿⌐ «ΓóÑΓδ ¡á ó«»α«ßδ, ß ¬«Γ«α묨 «íδτ¡«
- ßΓὬ¿óáεΓß∩ »«½∞º«óáΓѽ¿. àß½¿ óδ óßΓαÑΓ¿ΓÑß∞ ß Γαπñ¡«ßΓ∩¼¿, «í-
- αáΓ¿ΓÑß∞ ¬ Σá⌐½π HELPME!.DOC. ä½∩ »α«ß¼«Γαá Σá⌐½«ó FILELIST.DOC ¿
- HELPME!.DOC óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ »α«úαá¼¼π README. ìáíÑα¿ΓÑ ó
- ¬«¼á¡ñ¡«⌐ ßΓα«¬Ñ ß½ÑñπεΘÑÑ:
-
- README HELPME!.DOC
- ¿½¿
- README FILELIST.DOC
-
-
- B.Pascal 7 & Objects /UG - 17 -
-
-
- Åα¿¼Ñαδ »α«úαá¼¼
- ─────────────────────────────────────────────────────────────────
-
- Åá¬ÑΓ Borland Pascal ó¬½ετáÑΓ ó ßÑí∩ í«½∞Φ«Ñ ¬«½¿τÑßΓó« »α¿-
- ¼Ñα«¼ »α«úαá¼¼ ó ¿ßσ«ñ¡«¼ ¬«ñÑ ¬á¬ ñ½∩ DOS, Γᬠ¿ ñ½∩ Windows.
- ¥Γ¿ »α«úαá¼¼δ ¡áσ«ñ∩Γß∩ ó »«ñ¬áΓὫúáσ ¬áΓὫúá EXAMPLES, ß«ºñá¡-
- ¡«ú« »α«úαá¼¼«⌐ Install. èáΓὫú EXAMPLES ß«ñÑαª¿Γ Γá¬ªÑ »«ñ¬áΓá-
- ½«ú¿ ñαπú¿σ ¿¡ßΓαπ¼Ñ¡Γá½∞¡δσ ßαÑñßΓó ¿ πΓ¿½¿Γ, »«ßΓáó½∩Ѽδσ ß
- Borland Pascal (Γᬿσ ¬á¬ Turbo Assembler, Turbo Debugger ¿
- Resource Workshop). Å«ΓαáΓ∞ΓÑ ¡Ñ¼¡«ú« óαѼѡ¿ ¿ »α«ß¼«Γα¿ΓÑ φΓ¿
- ¬áΓὫú¿. éδ πó¿ñ¿ΓÑ, ߬«½∞¬« ñ½∩ óáß »αÑñπß¼«ΓαÑ¡« »α¿¼Ñα«ó
- »α«úαá¼¼.
-
-
-
- B.Pascal 7 & Objects /UG - 18 -
-
- ────────────────────────────────────────────────────────────────────────────
- â½áóá 2. ùΓ« ¡«ó«ú« ó Borland Pascal
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal with Objects - φΓ« »α«ΣÑßß¿«¡á½∞¡á∩ «íΩѬΓ-
- ¡«-«α¿Ñ¡Γ¿α«óá¡¡á∩ ß¿ßΓÑ¼á »α«úαá¼¼¿α«óá¡¿∩ ñ½∩ αÑá½∞¡«ú« ¿ ºáΘ¿-
- ΘÑ¡¡«ú« αѪ¿¼á DOS ¿ Windows. àß½¿ óδ αáí«ΓáÑΓÑ ß »α«úαá¼¼¡δ¼¿
- »α«ñπ¬ΓἿ Turbo Pascal ¿½¿ Turbo Pascal for Windows, Γ« ¿º ñá¡-
- ¡«⌐ ú½áóδ óδ πº¡áÑΓÑ « ¡«óδσ ßαÑñßΓóáσ Borland Pascal ¿ « Γ«¼,
- úñÑ ¡á⌐Γ¿ ¿¡Σ«α¼áµ¿ε « ¡¿σ.
-
-
- Æα¿ ¿¡ΓÑúα¿α«óá¡¡δσ ¿¡ΓÑαá¬Γ¿ó¡δσ ßαÑñδ αáºαáí«Γ¬¿ »α«úαá¼¼
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal »αÑñ«ßΓáó½∩ÑΓ óá¼ Γα¿ ¿¡ΓÑúα¿α«óá¡¡δσ ¿¡ΓÑ-
- αá¬Γ¿ó¡δσ ßαÑñδ αáºαáí«Γ¬¿ »α«úαá¼¼ (IDE):
-
- * BP.EXE, ¿¡ΓÑúα¿α«óá¡¡πε ßαÑñπ αáºαáí«Γ¬¿ »α«úαá¼¼, ¬«Γ«αá∩
- αáí«ΓáÑΓ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ DOS ¿ úÑ¡Ñα¿απÑΓ »« óáΦѼπ
- óδí«απ »α¿¬½áñ¡δÑ »α«úαá¼¼δ DOS αÑá½∞¡«ú« αѪ¿¼á, Windows
- ¿ DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á. IDE ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á «º¡áτáÑΓ,
- τΓ« ¬áªñ«Ñ óáΦÑ «τÑ¡∞ í«½∞Φ«Ñ »α¿½«ªÑ¡¿Ñ íπñÑΓ ¿¼ÑΓ∞ ñ½∩
- ¬«¼»¿½∩µ¿¿ ñ«ßΓáΓ«τ¡« »á¼∩Γ¿.
-
- * BPW.EXE, ¿¡ΓÑúα¿α«óá¡¡πε ßαÑñπ, ¬«Γ«αá∩ αáí«ΓáÑΓ »«ñ
- Windows ¿ úÑ¡Ñα¿απÑΓ »« óáΦѼπ óδí«απ »α¿¬½áñ¡δÑ »α«úαá¼¼δ
- DOS αÑá½∞¡«ú« αѪ¿¼á, Windows ¿ DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á.
-
- * TURBO.EXE, ¿¡ΓÑúα¿α«óá¡¡πε ßαÑñπ, ¬«Γ«αá∩ αáí«ΓáÑΓ ó αÑ-
- á½∞¡«¼ αѪ¿¼Ñ DOS ¿ úÑ¡Ñα¿απÑΓ Γ«½∞¬« »α¿¬½áñ¡δÑ »α«úαá¼¼δ
- DOS αÑá½∞¡«ú« αѪ¿¼á, αáí«ΓáεΘ¿Ñ Γ«½∞¬« ¡á »α«µÑßß«αáσ
- 80σ86.
-
- Åα¿¼Ñτá¡¿Ñ: ä½∩ αáí«Γδ IDE DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á óáΦ
- ¬«¼»∞εΓÑα ñ«½ªÑ¡ ¿¼ÑΓ∞ »α«µÑßß«α 80286 ¿½¿ ßΓáαΦÑ ¿ ¡Ñ ¼Ñ-
- ¡ÑÑ 2 ¼Ñúáíá⌐Γ »á¼∩Γ¿.
-
- Äí ¿¡ΓÑúα¿α«óá¡¡δσ ßαÑñáσ ñ½∩ DOS αáß߬áºδóáÑΓß∩ ó â½áóÑ 4
- "Åα«úαá¼¼¿α«óá¡¿Ñ ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ¿¡ΓÑαá¬Γ¿ó¡«⌐ ßαÑñÑ ñ½∩ DOS".
- Ä ß»Ñµ¿á½∞¡δσ ßαÑñßΓóáσ ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñδ ñ½∩ Windows óδ ¼«-
- ªÑΓÑ πº¡áΓ∞ ¿º â½áóδ 5 "Åα«úαá¼¼¿α«óá¡¿Ñ ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ¿¡ΓÑ-
- αá¬Γ¿ó¡«⌐ ßαÑñÑ ñ½∩ Windows".
-
-
- ì«óδÑ ßαÑñßΓóá IDE
- ─────────────────────────────────────────────────────────────────
-
- é »ÑαÑτ¿ß½Ñ¡¡δσ IDE óδ ¼«ªÑΓÑ ¡á⌐Γ¿ ß½ÑñπεΘ¿Ñ ¡«óδÑ ßαÑñß-
- Γóá:
-
- * äóá ßαÑñßΓóá »α«ß¼«Γαá «íΩÑ¬Γ«ó ObjectBrowser - «ñ¡« ó IDE
- ñ½∩ DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á, ñαπú«Ñ ó IDE ñ½∩ Windows. æ
- »«¼«Θ∞ε ObjectBrowser óδ ¼«ªÑΓÑ »α«ß¼áΓα¿óáΓ∞ ó ßó«Ñ⌐
-
- B.Pascal 7 & Objects /UG - 19 -
-
- »α«úαá¼¼Ñ «íΩѬΓδ ¿ ¼«ñπ½¿, »α«óÑα∩Γ∞ ßó«⌐ ¿ßσ«ñ¡δ⌐ ¬«ñ,
- »«½πτáΓ∞ »«½¡δÑ »ÑαѬαÑßΓ¡δÑ ßß佬¿ ¡á ¬áªñδ⌐ ¿ß»«½∞ºπѼδ⌐
- ó »α«úαá¼¼Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ¿ ó¿ñÑΓ∞ ßó«ε »α«úαá¼¼π ß ¡«ó«⌐
- »«º¿µ¿¿. Äí ObjectBrowser ñ½∩ DOS ¿ Windows ó ñá¡¡«⌐ ¬¡¿úÑ
- αáß߬áºδóáÑΓß∩ ¡¿ªÑ.
-
- * éδñѽѡ¿Ñ ß¿¡Γá¬ß¿ßá. é« óßÑσ ¿¡ΓÑúα¿α«óá¡¡δσ ßαÑñáσ ó
- »α«úαá¼¼áσ ¿ß»«½∞ºπÑΓß∩ µóÑΓ«ó«Ñ óδñѽѡ¿Ñ φ½Ñ¼Ñ¡Γ«ó ¬«ñá,
- í½áú«ñáα∩ τѼπ óδ ¼«ªÑΓÑ íδßΓα« ¿ñÑ¡Γ¿Σ¿µ¿α«óáΓ∞ Σαáú¼Ñ¡Γδ
- ¿ßσ«ñ¡«ú« ¬«ñá. é IDE ñ½∩ Windows óδ ¼«ªÑΓÑ Γá¬ªÑ ¿ß»«½∞-
- º«óáΓ∞ ß¿¡Γá¬ß¿τÑ߬¿Ñ φ½Ñ¼Ñ¡Γδ, óδñѽ∩ѼδÑ ª¿α¡δ¼, ¡á¬½«¡-
- ¡δ¼ Φα¿ΣΓ«¼ ¿½¿ »«ñτÑનó᡿Ѽ. é« óßÑσ IDE óδ ¼«ªÑΓÑ »Ñ-
- τáΓáΓ∞ ß¿¡Γá¬ß¿τÑ߬¿ óδñѽѡ¡δ⌐ ¬«ñ. Ä óδñѽѡ¿¿ ß¿¡Γá¬ß¿-
- ßá αáß߬áºδóáÑΓß∩ ó â½áóÑ 4 "Åα«úαá¼¼¿α«óá¡¿Ñ ó ¿¡ΓÑúα¿α«-
- óá¡¡«⌐ ¿¡ΓÑαá¬Γ¿ó¡«⌐ ßαÑñÑ ñ½∩ DOS" ¿ ó â½áóÑ 5 "Åα«úαá¼-
- ¼¿α«óá¡¿Ñ ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ¿¡ΓÑαá¬Γ¿ó¡«⌐ ßαÑñÑ ñ½∩
- Windows".
-
- * Ä»ÑαáΓ¿ó¡á∩ »«½«ßá SpeedBar ó IDE ñ½∩ Windows. ¥Γá «»Ñαá-
- Γ¿ó¡á∩ »«½«ßá »αÑñ«ßΓáó½∩ÑΓ íδßΓαδ⌐ ß»«ß«í óδí«αá ¬«¼á¡ñ
- ¼Ñ¡ε ¿ ñαπú¿σ ñÑ⌐ßΓó¿⌐ ß »«¼«Θ∞ε "¼δΦ¿". éδ ¼«ªÑΓÑ »« ßó«-
- Ѽπ óδí«απ óδó«ñ¿Γ∞ ÑÑ ú«α¿º«¡Γá½∞¡«, óÑαΓ¿¬á½∞¡« ¿½¿ ó
- ó¿ñÑ ßó«í«ñ¡«⌐ »á½¿Γαδ, ½¿í« ñáªÑ ó䬽ετ¿Γ∞ ÑÑ »«½¡«ßΓ∞ε.
-
- * é αÑñá¬Γ«αáσ ñ½∩ DOS ¿ Windows ¿¼ÑεΓß∩ ßαÑñßΓóá Undo (ÄΓ-
- ¼Ñ¡á) ¿ Redo (Å«óΓ«α). àß½¿ óδ ßñѽáÑΓÑ ó »α«µÑßßÑ αÑñá¬-
- Γ¿α«óá¡¿∩ «Φ¿í¬π, ¡áª¼¿ΓÑ Undo, ¿ óáΦá «Φ¿í¬á ¿ßτѺ¡ÑΓ.
- ì᪼¿ΓÑ Redo - ¿ «¡á »«∩ó¿Γß∩ ó¡«ó∞.
-
- * îÑ¡ε ¿¡ßΓαπ¼Ñ¡Γá½∞¡δσ ßαÑñßΓó Tools. ê¡ßΓαπ¼Ñ¡Γá½∞¡δÑ
- ßαÑñßΓóá ¿ πΓ¿½¿Γδ, »«ßΓáó½∩ѼδÑ ß Borland Pascal, óδ ¼«-
- ªÑΓÑ ºá»π߬áΓ∞ ¡Ñ»«ßαÑñßΓóÑ¡¡« ¿º IDE. é IDE ñ½∩ DOS ó ¼Ñ-
- ¡ε Tools óδ ¼«ªÑΓÑ ñ«íáó¿Γ∞ ßó«¿ ß«íßΓóÑ¡¡δÑ πΓ¿½¿Γδ ¿ ¿º-
- ¼Ñ¡¿Γ∞ »« ßó«Ñ¼π πß¼«ΓαÑ¡¿ε «»ÑαáΓ¿ó¡δÑ ¬½áó¿Φ¿. Ä ¼Ñ¡ε
- Tools IDE ñ½∩ DOS ¿ « ¼Ñ¡ε Tools IDE ñ½∩ Windows αáß߬áºδ-
- óáÑΓß∩ ó â½áóÑ 4.
-
- * Ĭ¡« ß««íΘÑ¡¿⌐ Messages ó IDE ñ½∩ DOS. Ĭ¡« Messages óδ
- ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ñ½∩ óδó«ñá ß««íΘÑ¡¿⌐ ¿º Γᬿσ πΓ¿½¿Γ
- ¬á¬ GREP. éδ ¼«ªÑΓÑ óδíαáΓ∞ αÑñá¬Γ¿α«óá¡¿Ñ »α«úαá¼¼¡«⌐
- ßΓ᫬¿ ß« ßß佬«⌐ ¡á ß««íΘÑ¡¿Ñ ¿½¿ «Γ߽Ѫ¿óáΓ∞ ß««íΘÑ¡¿∩ ó
- ¿ßσ«ñ¡«¼ ¬«ñÑ »α¿ »α«ß¼«ΓαÑ ß««íΘÑ¡¿⌐.
-
- * 﫬á½∞¡δÑ ¼Ñ¡ε ó« óßÑσ ¿¡ΓÑúα¿α«óá¡¡δσ ßαÑñáσ. Åα«ßΓδ¼ ¡á-
- ªáΓ¿Ñ¼ »αáó«⌐ ¬¡«»¬¿ "¼δΦ¿" ¿½¿ ¬½áó¿Φ Alt+F10 óδ ¼«ªÑΓÑ
- óδóÑßΓ¿ ½«¬á½∞¡«Ñ ¼Ñ¡ε ß« ß»¿ß¬«¼ ¬«¼á¡ñ, «Γ¡«ß∩Θ¿σß∩ ¬
- á¬Γ¿ó¡«¼π «¬¡π.
-
- * ê¡Σ«α¼áµ¿∩ «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ ß«σαá¡∩ÑΓß∩ «Γ «ñ¡«ú« ßÑá¡ßá
- ¬ ñαπú«¼π. ¥Γ« »«ºó«½∩ÑΓ »«ß½Ñ óδσ«ñá ¿ »ÑαѺá»π߬á IDE
- óá¼ »α«ß¼áΓα¿óáΓ∞, «Γ½áª¿óáΓ∞ ¿½¿ óδ»«½¡∩Γ∞ »α«úαá¼¼δ íѺ
- »ÑαѬ«¼»¿½∩µ¿¿.
-
-
- B.Pascal 7 & Objects /UG - 20 -
-
- * ê¡Σ«α¼áµ¿∩ «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ ß«σαá¡∩ÑΓß∩ «Γ «ñ¡«⌐ ñ« ñαπ-
- ú«⌐ ¬«¼»¿½∩µ¿¿. àß½¿ óδ πß»ÑΦ¡« ߬«¼»¿½¿απÑΓÑ »α«úαá¼¼π,
- ¿º¼Ñ¡¿ΓÑ ¿ßσ«ñ¡δ⌐ ¬«ñ, »ÑαѬ«¼»¿½¿απÑΓÑ ÑÑ, ¿ ¬«¼»¿½∩µ¿∩
- ºáóÑαΦ¿Γß∩ ¡Ñπñáτ¡«, ¿¡Σ«α¼áµ¿∩ «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ ß«σαá-
- ¡¿Γß∩ ß ¼«¼Ñ¡Γá »«ß½Ññ¡Ñ⌐ ¬«¼»¿½∩µ¿¿. àÑ »α«ß¼«Γα ¼«ªÑΓ
- »«¼«τ∞ óá¼ óδ∩ó¿Γ∞ «Φ¿í¬π ó ¿ßσ«ñ¡«¼ ¬«ñÑ.
-
- * é ¿¡ΓÑúα¿α«óá¡¡δσ ßαÑñáσ ñ½∩ DOS »«ññÑনóáεΓß∩ ¼¡«ªÑßΓ-
- óÑ¡¡δÑ πßΓá¡áó½¿óáѼδÑ »«½∞º«óáΓѽѼ ß»αáó«τ¡δÑ Σá⌐½δ. é
- ß»αáó«τ¡πε ß¿ßΓѼπ Borland Pascal óδ ¼«ªÑΓÑ ºáúαπº¿Γ∞ ñ«-
- »«½¡¿Γѽ∞¡δÑ ß»αáó«τ¡δÑ Σá⌐½δ. IDE «íΩÑñ¿¡∩ÑΓ ΓѼáΓ¿τÑ߬¿Ñ
- π¬áºáΓѽ¿ ó¡«ó∞ ºáúαπªÑ¡¡δσ ß»αáó«τ¡δσ Σá⌐½«ó ¿ ßΓá¡ñáαΓ-
- ¡«ú« ß¿ßΓѼ¡«ú« ΓѼáΓ¿τÑ߬«ú« π¬áºáΓѽ∩ Help.
-
-
- 諼»¿½∩Γ«α ¬«¼á¡ñ¡«⌐ ßΓ᫬¿, αáí«ΓáεΘ¿⌐ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ
- ─────────────────────────────────────────────────────────────────
-
- 諼»¿½∩Γ«α ¬«¼á¡ñ¡«⌐ ßΓ᫬¿ BPC.EXE, αáí«ΓáÑΓ ó ºáΘ¿ΘÑ¡¡«¼
- αѪ¿¼Ñ, í½áú«ñáα∩ τѼπ «τÑ¡∞ í«½∞Φ¿Ñ »α«úαá¼¼δ ¿¼ÑεΓ ñ«ßΓáΓ«τ¡«
- »á¼∩Γ¿ ñ½∩ πß»ÑΦ¡«⌐ ¬«¼»¿½∩µ¿¿. ǡὫú¿τ¡« IDE ñ½∩ DOS, αáí«Γáε-
- ΘÑ⌐ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ, BPC.EXE ¼«ªÑΓ ß«ºñáóáΓ∞ »α¿¬½áñ¡δÑ »α«ú-
- αá¼¼δ αÑá½∞¡«ú« αѪ¿¼á DOS, Windows ¿ ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á DOS. Ä
- ¬«¼»¿½∩Γ«αÑ, αáí«ΓáεΘѼ ó αѪ¿¼Ñ ¬«¼á¡ñ¡«⌐ ßΓ᫬¿, αáß߬áºδóáÑΓß∩
- ó â½áóÑ 3 "諼»¿½∩Γ«αδ, αáí«ΓáεΘ¿Ñ ó αѪ¿¼Ñ ¬«¼á¡ñ¡«⌐ ßΓ᫬¿"
- "æ»αáó«τ¡«ú« απ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá".
-
- æαÑñá αáºαáí«Γ¬¿ »α«úαá¼¼ ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á DOS
- ─────────────────────────────────────────────────────────────────
-
- æ »«¼«Θ∞ε ¬«¼»¿½∩Γ«α«ó ¬«¼á¡ñ¡«⌐ ßΓ᫬¿ BP.EXE ¿ BPC.EXE óδ
- ¼«ªÑΓÑ ß«ºñáóáΓ∞ »α«úαá¼¼δ, αáí«ΓáεΘ¿Ñ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ DOS
- íѺ ¿ß»«½∞º«óá¡¿∩ «óÑα½ÑÑó. éáΦ¿ »α«úαá¼¼δ ß¼«úπΓ, ¡á¬«¡Ñµ, »αÑ-
- óδß¿Γ∞ íáα∞Ñα αÑá½∞¡«ú« αѪ¿¼á DOS ó 640è.
-
- ä½∩ ¼¡«ú¿σ óáΦ¿σ »α«úαá¼¼ óßÑ, τΓ« ¡πª¡« ßñѽáΓ∞ ñ½∩ ß«ºñá-
- ¡¿∩ »α¿½«ªÑ¡¿∩ DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á, φΓ« óδí«α ºáΘ¿ΘÑ¡¡«ú« αÑ-
- ª¿¼á DOS ó ¬áτÑßΓóÑ µÑ½Ñó«⌐ »½áΓΣ«α¼δ ¿ πßΓá¡«ó¬á ß««ΓóÑΓßΓóπεΘ¿σ
- »áαá¼ÑΓα«ó ¬«¼»¿½∩Γ«αá (ß¼. â½áóπ 4). 髺¼«ª¡«, óδ ºáσ«Γ¿ΓÑ »α«-
- τÑßΓ∞ Γá¬ªÑ â½áóπ 17 "Éπ¬«ó«ñßΓóá »« ∩ºδ¬π" ("Åα«úαá¼¼¿α«óá¡¿Ñ ó
- ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ DOS"), ¬«Γ«α«⌐ ó«»α«ßδ, ¬áßáεΘ¿Ñß∩ ºáΘ¿ΘÑ¡¡«ú«
- αѪ¿¼á, αáßß¼áΓα¿óáεΓß∩ í«½ÑÑ πú½πí½Ñ¡¡«.
-
- 信ἿτÑ߬¿ ¬«¼»«¡πѼδÑ í¿í½¿«ΓѬ¿ DOS
- ─────────────────────────────────────────────────────────────────
-
- 信ἿτÑ߬¿ ¬«¼»«¡πѼδÑ í¿í½¿«ΓѬ¿ (DLL) Γαáñ¿µ¿«¡¡« í뫨
- τáßΓ∞ε αáºαáí«Γ¬¿ »α«úαá¼¼ Windows. æ »«¼«Θ∞ε Borland Pascal óδ
- ß¼«ªÑΓÑ ß«ºñáóáΓ∞ DLL ñ½∩ DOS.
-
- ü¿í½¿«ΓѬ¿ DLL ºáúαπªáεΓß∩ ¡á φΓá»Ñ óδ»«½¡Ñ¡¿∩ «Γñѽ∞¡« «Γ
- óáΦ¿σ Σá⌐½«ó .EXE ¿ ¼«úπΓ ß«ó¼ÑßΓ¡« ¿ß»«½∞º«óáΓ∞ß∩ ¡Ñ߬«½∞¬¿¼¿
- »α¿¬½áñ¡δ¼¿ »α«úαἼἿ. DLL ñ½∩ DOS αáí«ΓáεΓ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ
-
- B.Pascal 7 & Objects /UG - 21 -
-
- DOS ¿ »«½¡«ßΓ∞ε ß«ó¼ÑßΓ¿¼δ ß DLL ñ½∩ Windows, τΓ« »«ºó«½∩ÑΓ óá¼
- ß«ó¼ÑßΓ¡« ¿ß»«½∞º«óáΓ∞ DLL ñ½∩ »α¿¬½áñ¡δσ »α«úαá¼¼ DOS ¿ Windows.
- Ä ñ¿¡á¼¿τÑ߬¿ ¬«¼»«¡πѼδσ í¿í½¿«ΓѬáσ αáß߬áºδóáÑΓß∩ ó â½áóÑ 11
- "信ἿτÑ߬¿ ¬«¼»«¡πѼδÑ í¿í½¿«ΓѬ¿" ó "Éπ¬«ó«ñßΓóÑ »« ∩ºδ¬π".
-
- B.Pascal 7 & Objects /UG - 22 -
-
- ä«íáó½Ñ¡¿∩ ¬ ∩ºδ¬π Åá߬á½∞
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal ¿¼ÑÑΓ ¡Ñ߬«½∞¬« ¡«óδσ αáßΦ¿αÑ¡¿∩ ∩ºδ¬á, «í-
- ½ÑúτáεΘ¿σ ¡á»¿ßá¡¿Ñ »α«úαá¼¼:
-
- * ÄΓ¬αδΓδÑ »áαá¼ÑΓαδ. ÄΓ¬αδΓδÑ »áαá¼ÑΓαδ »«ºó«½∩εΓ »ÑαÑñá-
- óáΓ∞ ó »α«µÑñπαπ ¿½¿ Σπ¡¬µ¿ε ßΓ᫬¿ ¿ ¼áßß¿óδ »ÑαѼѡ¡δσ
- αẼÑα«ó. Äí φΓ¿σ »áαá¼ÑΓαáσ αáß߬áºδóáÑΓß∩ ó â½áóÑ 9
- "Åα«µÑñπαδ ¿ Σπ¡¬µ¿¿", ó αáºñÑ½Ñ "ÄΓ¬αδΓδÑ »áαá¼ÑΓαδ" ¬¡¿-
- ú¿ "Éπ¬«ó«ñßΓó« »« ∩ºδ¬π".
-
- * æΓá¡ñáαΓ¡á∩ ñ¿αÑ¬Γ¿óá public. é Turbo Pascal 6.0 ¿ Turbo
- Pascal for Windows ñ«»π߬áεΓß∩ ßѬµ¿¿ ¬«¼»«¡Ñ¡Γ«ó «íΩÑ¬Γ«ó
- private. Borland Pascal óó«ñ¿Γ ßѬµ¿¿ ¬«¼»«¡Ñ¡Γ«ó «íΩÑ¬Γ«ó
- public, ¡Ñ ¿¼ÑεΘ¿Ñ «úαá¡¿τÑ¡¿⌐ »« «í½áßΓ¿ ñÑ⌐ßΓó¿∩ «»¿ßá¡-
- ¡δσ ó ¡¿σ »«½Ñ⌐ ¿ ¼ÑΓ«ñ«ó. àß½¿ óδ ¡áσ«ñ¿ΓÑ φΓ« πñ«í¡δ¼, ó
- «íΩѬΓáσ ¼«ª¡« τÑαÑñ«óáΓ∞ ßѬµ¿¿ ¬«¼»«¡Ñ¡Γ«ó public ¿
- private. Å«ñα«í¡ÑÑ « ¡«ó«⌐ ßΓá¡ñáαΓ¡«⌐ ñ¿αÑ¬Γ¿óÑ public
- αáß߬áºδóáÑΓß∩ ó αáºñÑ½Ñ "諼»«¡Ñ¡Γδ ¿ «í½áßΓ∞ ñÑ⌐ßΓó¿∩"
- â½áóδ 4 "Æ¿»δ" ó "Éπ¬«ó«ñßΓóÑ »α«úαá¼¼¿ßΓá".
-
- * çáαѺÑαó¿α«óá¡¡«Ñ ß½«ó« inherited. çáαѺÑαó¿α«óá¡¡«Ñ ß½«ó«
- inherited ¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ß∩ ó¡πΓα¿ ¼ÑΓ«ñá ñ½∩ ßß佬¿ ¡á
- »αÑñ¬á «íΩÑ¬Γ¡«ú« Γ¿»á ¼ÑΓ«ñá. æ¼. αáºñѽ "Ç¬Γ¿ó¿ºáµ¿∩
- πΓ«τ¡Ñ¡¡«ú« ¼ÑΓ«ñá" â½áóδ 4 "Æ¿»δ" ¬¡¿ú¿ "Éπ¬«ó«ñßΓó« »«
- ∩ºδ¬π".
-
- * Åáαá¼ÑΓαδ-¬«¡ßΓá¡Γδ. Åα«µÑñπαδ ¿ Σ«α¼π½δ ¼«úπΓ ¿ß»«½∞º«-
- óáΓ∞ »áαá¼ÑΓαδ-¬«¡ßΓá¡Γδ: úαπ»»Ñ »áαá¼ÑΓα«ó »αÑñΦÑßΓóπÑΓ
- ºáαѺÑαó¿α«óá¡¡«Ñ ß½«ó« const, ºá ¬«Γ«αδ¼ ß½ÑñπÑΓ Γ¿». Åá-
- αá¼ÑΓαδ-¬«¡ßΓá¡Γδ ºáΘ¿ΘáεΓ «Γ ß½πτá⌐¡δσ »α¿ßóá¿óá¡¿⌐ Σ«α-
- ¼á½∞¡«¼π »áαá¼ÑΓαπ, ¿ ó ¡Ñ¬«Γ«αδσ ß½πτá∩σ φΓ« »«ºó«½∩ÑΓ
- ¬«¼»¿½∩Γ«απ úÑ¡Ñα¿α«óáΓ∞ í«½ÑÑ φΣΣÑ¬Γ¿ó¡δ⌐ ¬«ñ. æ¼. αáºñѽ
- "Åáαá¼ÑΓαδ" ó â½áóÑ 9 "Åα«µÑñπαδ ¿ Σπ¡¬µ¿¿" ó "Éπ¬«ó«ñßΓóÑ
- »« ∩ºδ¬π".
-
- * 信ἿτÑ߬¿Ñ ¼ÑΓ«ñδ ¿ Γáí½¿µδ ñ¿¡á¼¿τÑ߬¿σ ¼ÑΓ«ñ«ó (DMT).
- àß½¿ óδ αáí«Γ὿ ß Turbo Pascal for Windows, Γ« πªÑ º¡áÑΓÑ
- « ñ¿¡á¼¿τÑ߬¿σ ¼ÑΓ«ñáσ ¿ Γáí½¿µáσ ñ¿¡á¼¿τÑ߬¿σ ¼ÑΓ«ñ«ó
- DMT. é Borland Pascal ¿σ ¼«úπΓ Γá¬ªÑ ¿ß»«½∞º«óáΓ∞ »α«úαá¼-
- ¼δ ñ½∩ DOS.
-
- 信ἿτÑ߬¿Ñ ¼ÑΓ«ñδ «Γ½¿τáεΓß∩ «Γ ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó ß»«-
- ß«í«¼ ñ¿ß»ÑΓτÑα¿ºáµ¿¿ ñ¿¡á¼¿τÑ߬¿σ ¼ÑΓ«ñ«ó ¡á φΓá»Ñ óδ»«½-
- ¡Ñ¡¿∩. é¼ÑßΓ« »«ßΓα«Ñ¡¿∩ ñ½∩ ñ¿¡á¼¿τÑ߬¿σ ¼ÑΓ«ñ«ó Γáí½¿µδ
- ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó (VMT) ¬«¼»¿½∩Γ«α ßΓα«¿Γ DMT. êß»«½∞º«-
- óá¡¿Ñ DMT π¼Ñ¡∞ΦáÑΓ »«ΓαÑí¡«ßΓ¿ óáΦÑ⌐ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ
- ó »á¼∩Γ¿ »α¿ »α«úαá¼¼¿α«óá¡¿¿ ß «íΩѬΓἿ. ü«½ÑÑ »«ñα«í¡«
- « ñ¿¡á¼¿τÑ߬¿σ ¼ÑΓ«ñáσ αáß߬áºδóáÑΓß∩ ó αáºñÑ½Ñ "信Ἷ-
- τÑ߬¿Ñ ¼ÑΓ«ñδ" ó â½áóÑ 4 ("Æ¿»δ") "Éπ¬«ó«ñßΓóá »« ∩ºδ¬π".
- ùΓ«íδ πº¡áΓ∞ »«ñα«í¡«ßΓ¿ « Γáí½¿µáσ ñ¿¡á¼¿τÑ߬¿σ ¼ÑΓ«ñ«ó,
- ß¼. αáºñѽ "Æáí½¿µδ ñ¿¡á¼¿τÑ߬¿σ ¼ÑΓ«ñ«ó" ó â½áóÑ 21
-
- B.Pascal 7 & Objects /UG - 23 -
-
- ("é«»α«ßδ ¿ß»«½∞º«óá¡¿∩ »á¼∩Γ¿") "Éπ¬«ó«ñßΓóá »« ∩ºδ¬π".
-
-
- ô½πτΦÑ¡¿∩ ó í¿í½¿«ΓÑ¬Ñ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal ¿¼ÑÑΓ Γα¿ í¿í½¿«ΓѬ¿ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ:
- TURBO.TPL ñ½∩ »α«úαá¼¼ DOS αÑá½∞¡«ú« αѪ¿¼á, TPW.TPL ñ½∩ »α«úαá¼¼
- Windows ¿ TPP.TPL ñ½∩ »α«úαá¼¼ DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á.
-
- ô½πτΦÑ¡¿∩ í¿í½¿«ΓѬ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓÑ¼δ ¬áßáεΓß∩ ß½ÑñπεΘ¿σ
- φ½Ñ¼Ñ¡Γ«ó:
-
- * í«½ÑÑ íδßΓα«ú« óó«ñá-óδó«ñá ΓѬßΓ«ó«ú« Σá⌐½á;
-
- * í«½ÑÑ íδßΓα«⌐ Σπ¡¬µ¿¿ Pos;
-
- * «»Γ¿¼¿ºáµ¿¿ 80386 ñ½∩ «»Ñαᵿ⌐ π¼¡«ªÑ¡¿∩, ñѽѡ¿∩, ßñó¿úá
- ó½Ñó« ¿ ó»αáó« ß« º¡áτÑ¡¿∩¼¿ Γ¿»á Longint.
-
-
-
-
- B.Pascal 7 & Objects /UG - 24 -
-
- ì«óδÑ »«ñ»α«úαá¼¼δ ¼«ñπ½∩ System
- ─────────────────────────────────────────────────────────────────
-
- î«ñπ½∞ System ß«ñÑαª¿Γ ßѼ∞ ¡«óδσ »α«µÑñπα ¿ Σπ¡¬µ¿⌐. éδ ¼«-
- ªÑΓÑ ¡á⌐Γ¿ ¿σ ó â½áóÑ 1 ("æ»αáó«τ¡¿¬ »« í¿í½¿«ΓѬÑ") "æ»αáó«τ¡«ú«
- απ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá".
-
- * Åα«µÑñπαá Assigned óδ»«½¡∩ÑΓ »α«óÑα¬π ¿ á¡á½¿º Γ«ú«, ß«-
- ñÑαª¿Γ ½¿ π¬áºáΓѽ∞ ¿½¿ »α«µÑñπα¡á∩ »ÑαѼѡ¡á∩ nil.
-
- * Åα«µÑñπαá Break ºáóÑαΦáÑΓ «»ÑαáΓ«α for, while ¿½¿ repeat.
-
- * Åα«µÑñπαá Continue »α«ñ«½ªáÑΓ ß½ÑñπεΘ¿Ñ ¿ΓÑαᵿ¿ «»ÑαáΓ«αá
- for, while ¿½¿ repeat.
-
- * Åα«µÑñπαá Include ó¬½ετáÑΓ φ½Ñ¼Ñ¡Γ ó ¼¡«ªÑßΓó«.
-
- * Åα«µÑñπαá Exclude ¿ß¬½ετáÑΓ φ½Ñ¼Ñ¡Γ ¿º ¼¡«ªÑßΓóá.
-
- * öπ¡¬µ¿∩ High ó«ºóαáΘáÑΓ ¡á¿óδßΦÑÑ º¡áτÑ¡¿Ñ ó ñ¿á»áº«¡Ñ áα-
- úπ¼Ñ¡Γá.
-
- * öπ¡¬µ¿∩ Low ó«ºóαáΘáÑΓ ¡¿ºΦÑÑ º¡áτÑ¡¿Ñ ó ñ¿á»áº«¡Ñ áαúπ-
- ¼Ñ¡Γá.
-
-
- ì«óδÑ ¼«ñπ½¿
- ─────────────────────────────────────────────────────────────────
-
- ü½áú«ñáα∩ ¼«ñπ½ε Strings »α«úαá¼¼¿ßΓδ, ¿ß»«½∞ºπεΘ¿Ñ Turbo
- Pascal for Windows, ¼«ú½¿ αáí«ΓáΓ∞ ß« ßΓα«¬á¼¿ ß ºáóÑαΦáεΘ¿¼ ¡π-
- ½Ñ¼ (ó ßΓ¿½Ñ æ¿). ÆÑ»Ñα∞ ¼«ñπ½∞ Strings ¼«úπΓ ¿ß»«½∞º«óáΓ∞ ¬á¬
- »α«úαá¼¼¿ßΓδ, αáí«ΓáεΘ¿Ñ ó Windows, Γᬠ¿ αáí«ΓáεΘ¿Ñ ó DOS. Å«ñ-
- α«í¡ÑÑ « ßΓ᫬áσ ß ºáóÑαΦáεΘ¿¼ ¡π½Ñ¼ αáß߬áºδóáÑΓß∩ ó â½áóÑ 18
- "êß»«½∞º«óá¡¿Ñ ßΓ᫬ ß ºáóÑαΦáεΘ¿¼ ¡π½Ñ¼" ó "Éπ¬«ó«ñßΓóÑ »« ∩ºδ-
- ¬π". Å«½¡πε ¿¡Σ«α¼áµ¿ε « ßΓ᫬áσ ß ºáóÑαΦáεΘ¿¼ ¡π½Ñ¼ óδ ¼«ªÑΓÑ
- »«½πτ¿Γ∞, »α«τ¿Γáó â½áóπ 1 ("æ»αáó«τ¡¿¬ »« í¿í½¿«ΓѬÑ") "æ»αáó«τ-
- ¡«ú« απ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá".
-
- Åα«úαá¼¼¿ßΓδ, αáí«ΓáεΘ¿Ñ ß Turbo Pascal for Windows, πªÑ
- º¡á¬«¼δ ß ¼«ñπ½Ñ¼ WinDos. Åα«úαá¼¼¿ßΓδ, αáí«ΓáεΘ¿Ñ ó DOS, ΓᬪÑ
- ¼«úπΓ ¿ß»«½∞º«óáΓ∞ ¼«ñπ½∞ WinDos ñ½∩ αÑ὿ºáµ¿¿ «»Ñαᵿ«¡¡δσ ß¿ß-
- ΓѼ ¿ »«ñ»α«úαá¼¼ «íαáí«Γ¬¿ Σá⌐½«ó. ùΓ«íδ óδ∩ß¡¿Γ∞, ß½ÑñπÑΓ óá¼
- ¿ß»«½∞º«óáΓ∞ ¼«ñπ½∞ WinDos ¿½¿ Dos, »α«τ¿Γá⌐ΓÑ â½áóπ 16 "ê¡ΓÑα-
- ΣÑ⌐ß ß DOS" "Éπ¬«ó«ñßΓóá »« ∩ºδ¬π". éßÑ »α«µÑñπαδ ¿ Σπ¡¬µ¿¿ »«ñ-
- α«í¡« »«∩ß¡∩εΓß∩ ó â½áóÑ 1 ("æ»αáó«τ¡¿¬ »« í¿í½¿«ΓѬÑ") "æ»αáó«τ-
- ¡«ú« απ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá".
-
- î«ñπ½∞ WinAPI ñáÑΓ óἠ󫺼«ª¡«ßΓ∞ »α∩¼«ú« ñ«ßΓπ»á ¬ αáßΦ¿-
- αÑ¡¿∩¼ DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á. ê¡ΓÑαΣÑ⌐ß WinAPI αáºαáí«Γá¡ ¬á¬
- »«ñ¼¡«ªÑßΓó« API (¿¡ΓÑαΣÑ⌐ß »α¿¬½áñ¡δσ »α«úαá¼¼) Windows, τΓ«íδ
- «í½Ñúτ¿Γ∞ ¡á»¿ßá¡¿Ñ »ÑαÑ¡«ß¿¼δσ »α¿½«ªÑ¡¿⌐ ¿ ñó«¿τ¡«-ß«ó¼ÑßΓ¿¼δσ
- DLL. Ä ¼«ñπ½Ñ WinAPI αáß߬áºδóáÑΓß∩ ó â½áóÑ 17 "Åα«úαá¼¼¿α«óá¡¿Ñ
-
- B.Pascal 7 & Objects /UG - 25 -
-
- ó DOS ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ" "Éπ¬«ó«ñßΓóá »« ∩ºδ¬π". ü«½ÑÑ »«½¡πε
- ¿¡Σ«α¼áµ¿ε « »α«µÑñπαáσ ¿ Σπ¡¬µ¿∩σ ¼«ñπ½∩ WinAPI ¼«ª¡« ¡á⌐Γ¿ ó
- â½áóÑ 1 ("æ»αáó«τ¡¿¬ »« í¿í½¿«ΓѬÑ") "æ»αáó«τ¡«ú« απ¬«ó«ñßΓóá
- »α«úαá¼¼¿ßΓá".
-
- î«ñπ½∞ WinPrn »«ºó«½∩ÑΓ »«ß½áΓ∞ ¿¡Σ«α¼áµ¿ε, óδó«ñ¿¼πε óáΦÑ⌐
- »α«úαá¼¼«⌐ Windows, ¡á óδíαá¡¡δ⌐ »α¿¡ΓÑα. Ä »ÑτáΓ¿ ó »α«úαá¼¼áσ
- Windows αáß߬áºδóáÑΓß∩ ó â½áóÑ 14 ("éó«ñ ¿ óδó«ñ") "Éπ¬«ó«ñßΓóá
- »« ∩ºδ¬π". æ¼. Γá¬ªÑ αáßΦ¿αÑ¡¡δÑ »«∩ߡѡ¿∩ »« »α«µÑñπαá¼ WinPrn ó
- â½áóÑ 1 ("æ»αáó«τ¡¿¬ »« í¿í½¿«ΓѬÑ") "æ»αáó«τ¡«ú« απ¬«ó«ñßΓóá
- »α«úαá¼¼¿ßΓá".
-
- î«ñπ½∞ Win31 «íÑß»Ñτ¿óáÑΓ ¿¡ΓÑαΣÑ⌐ß ß ñ«»«½¡¿Γѽ∞¡δ¼¿ »α«ú-
- αἼἿ API, ¬«Γ«αδÑ ¼«ª¡« ¡á⌐Γ¿ ó DLL KERNEL ¿ USER Windows 3.1.
- Åα¿½«ªÑ¡¿∩, ¿ß»«½∞ºπεΘ¿Ñ ¼«ñπ½∞ Win31, ¡Ñ íπñπΓ αáí«ΓáΓ∞ »«ñ
- Windows 3.0. Å«ñα«í¡«ßΓ¿ « ¼«ñπ½Ñ Win31 óδ ¼«ªÑΓÑ πº¡áΓ∞ ó ß»αá-
- ó«τ¡«⌐ ß¿ßΓÑ¼Ñ Borland Pascal.
-
- ÄßΓá½∞¡δÑ αáßΦ¿αÑ¡¿∩ API Windows 3.1 Borland Pascal »«ññÑα-
- ª¿óáÑΓ ó ¡Ñ߬«½∞¬¿σ ¼«ñπ½∩σ (¿¡Σ«α¼áµ¿ε « ¡¿σ óδ ¼«ªÑΓÑ »«½πτ¿Γ∞
- ó ß»αáó«τ¡«⌐ ß¿ßΓÑ¼Ñ Borland Pascal):
-
- ColorDlg LZExpand ShellAPI
- CommDlg MMSystem Stress
- Cpl OLE TooHelp
- DDEML PenWin Ver
- Dlgs Print WinMem32
-
-
- ì«óδÑ ñ¿αÑ¬Γ¿óδ ¬«¼»¿½∩Γ«αá
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal ¿¼ÑÑΓ »∩Γ∞ ¡«óδσ ñ¿αÑ¬Γ¿ó ¬«¼»¿½∩Γ«αá. Å«ñ-
- α«í¡ÑÑ « ¡¿σ αáß߬áºδóáÑΓß∩ ó â½áóÑ 2 ("ä¿αÑ¬Γ¿óδ ¬«¼»¿½∩Γ«αá")
- "æ»αáó«τ¡«ú« απ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá":
-
- * ä¿αÑ¬Γ¿óá $P («Γ¬αδΓδÑ ßΓ᫬«óδÑ »áαá¼ÑΓαδ) π»αáó½∩ÑΓ
- ß¼δß½«¼ »áαá¼ÑΓα«ó-»ÑαѼѡ¡δσ, «»¿ßá¡¡δσ ß »«¼«Θ∞ε ¬½ετÑ-
- ó«ú« ß½«óá string.
-
- * ä¿αÑ¬Γ¿óá $T (π¬áºáΓѽ¿ ß »α«óÑᬫ⌐ Γ¿»á) π»αáó½∩ÑΓ Γ¿»á¼¿
- º¡áτÑ¡¿⌐ π¬áºáΓѽÑ⌐, úÑ¡Ñα¿απѼδσ «»ÑαᵿÑ⌐ @.
-
- * ä¿αÑ¬Γ¿óá $Q (»α«óÑα¬á »ÑαÑ»«½¡Ñ¡¿∩) π»αáó½∩ÑΓ úÑ¡ÑαᵿÑ⌐
- ¬«ñá »α«óÑન »ÑαÑ»«½¡Ñ¡¿∩ ñ½∩ «Γñѽ∞¡δσ áα¿Σ¼ÑΓ¿τÑ߬¿σ
- «»Ñαᵿ⌐.
-
- * ä¿αÑ¬Γ¿óá $K (φΣΣÑ¬Γ¿ó¡δÑ ó맮óδ) π»αáó½∩ÑΓ úÑ¡ÑαᵿÑ⌐ φΣ-
- ΣÑ¬Γ¿ó¡δσ ó맮ó«ó »α«µÑñπα ¿ Σπ¡¬µ¿⌐, φ¬ß»«αΓ¿απѼδσ »α¿-
- ½«ªÑ¡¿Ñ¼ Windows. Å«ñα«í¡ÑÑ «í «íαáí«Γ¬Ñ ó Borland Pascal
- φΣΣÑ¬Γ¿ó¡δσ ó맮ó«ó αáß߬áºδóáÑΓß∩ ó αáºñÑ½Ñ "è«ñ óσ«ñá ¿
- óδσ«ñá" â½áóδ 22 ("é«»α«ßδ π»αáó½Ñ¡¿∩") "Éπ¬«ó«ñßΓóá »«
- ∩ºδ¬π".
-
- B.Pascal 7 & Objects /UG - 26 -
-
-
- * ä¿αÑ¬Γ¿óá $Y (¿¡Σ«α¼áµ¿∩ «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αÑ) úÑ¡Ñα¿απÑΓ
- ó ¬«¼»¿½¿απѼ«⌐ »α«úαá¼¼Ñ ¿½¿ ¼«ñπ½Ñ ßß佫τ¡πε ¿¡Σ«α¼áµ¿ε
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αá, í½áú«ñáα∩ τѼπ ObjectBrowser ¼«ªÑΓ óδó«-
- ñ¿Γ∞ ¡á φ¬αá¡ «»αÑñѽѡ¿Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ¿ ßß佫τ¡πε ¿¡-
- Σ«α¼áµ¿ε ñ½∩ ñá¡¡«ú« »α«úαá¼¼¡«ú« ¼«ñπ½∩.
-
-
- ôß«óÑαΦÑ¡ßΓó«óá¡¿∩ ¬«¼»¿½∩Γ«αá
- ─────────────────────────────────────────────────────────────────
-
- èα«¼Ñ αáßΦ¿αÑ¡¿⌐ ∩ºδ¬á Borland Pascal ¿ ñ«íáó½Ñ¡¿∩ ¡«óδσ ñ¿-
- αÑ¬Γ¿ó ¬«¼»¿½∩Γ«αá, ó ßá¼ ¬«¼»¿½∩Γ«α Γá¬ªÑ ó¡ÑßÑ¡δ π½πτΦÑ¡¿∩:
-
- * 諼»¿½∩Γ«α »«ºó«½∩ÑΓ óδ»«½¡∩Γ∞ í«½ÑÑ »α«ßΓπε ¬«¼»«¡«ó¬π ß
- æ¿ ¿ áßßѼí½Ñα«¼ »πΓѼ »ÑαÑñáτ¿ ó óáΦ óδ»«½¡∩Ѽδ⌐ Σá⌐½ ¿¡-
- Σ«α¼áµ¿¿ « ¡«¼Ñαáσ ßΓ᫬ .OBJ. Æá¬¿¼ «íαẫ¼, óδ ¼«ªÑΓÑ
- ¿ß»«½∞º«óáΓ∞ óßΓα«Ñ¡¡δÑ «Γ½áñτ¿¬ ñ½∩ óδ»«½¡Ñ¡¿∩ »« Φáúá¼
- ¬«ñá ∩ºδ¬á æ¿ ¿ áßßѼí½Ñαá. æ¼. ó ñá¡¡«⌐ ¬¡¿úÑ â½áóπ 6
- "ÄΓ½áñ¬á ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñÑ".
-
- * è«úñá »αáóδ¼ «»Ñαá¡ñ«¼ «»Ñαᵿ¿ in ∩ó½∩ÑΓß∩ ¬«¡ßΓá¡Γá ¼¡«-
- ªÑßΓóÑ¡¡«ú« Γ¿»á, ¬«¼»¿½∩Γ«α úÑ¡Ñα¿απÑΓ í«½ÑÑ φΣΣÑ¬Γ¿ó¡δ⌐
- ¬«ñ. æ¼. αáºñѽ "éßΓαá¿óá¡¿Ñ ¬«¡ßΓá¡Γ ¼¡«ªÑßΓóÑ¡¡«ú« Γ¿»á"
- ó â½áóÑ 23 ("Ä»Γ¿¼¿ºáµ¿∩ ¬«ñá") ó "Éπ¬«ó«ñßΓóÑ »« ∩ºδ¬π".
-
- * 諼»¿½∩Γ«α úÑ¡Ñα¿απÑΓ í«½ÑÑ φΣΣÑ¬Γ¿ó¡δ⌐ ¬«ñ ñ½∩ ¼á½δσ ¼¡«-
- ªÑßΓó. Ä ¼á½δσ ¼¡«ªÑßΓóáσ »«ñα«í¡ÑÑ αáß߬áºδóáÑΓß∩ ó â½áóÑ
- 23 ("Ä»Γ¿¼¿ºáµ¿∩ ¬«ñá") ó "Éπ¬«ó«ñßΓóÑ »« ∩ºδ¬π".
-
- * 諼»¿½∩Γ«α ñ«»π߬áÑΓ ¡Ñ«úαá¡¿τÑ¡¡πε 󽫪ѡ¡«ßΓ∞ ¼«ñπ½Ñ⌐.
-
- * Ä»ÑαáΓ«α uses ó αáºñÑ½Ñ implementation ¼«ñπ½∩ ¡Ñ óδºδóáÑΓ
- ΓÑ»Ñα∞ µ¿¬½¿τÑ߬«⌐ ßß佬¿ ¡á ¼«ñπ½∞.
-
- * é «»αÑñѽѡ¡δσ ß¿Γπᵿ∩σ ¬«¼»¿½∩Γ«α »«ñáó½∩ÑΓ «»Ñαᵿ¿ ¿º-
- íδΓ«τ¡«⌐ ºáúαπº¬¿ π¬áºáΓѽÑ⌐. æ¼. â½áóπ 23 ("Ä»Γ¿¼¿ºáµ¿∩
- ¬«ñá") "Éπ¬«ó«ñßΓóá »« ∩ºδ¬π".
-
-
- ô½πτΦÑ¡¿∩ ó Turbo Vision
- ─────────────────────────────────────────────────────────────────
-
- é Turbo Vision 2.0 ó ¿Ñαáασ¿ε ñ«íáó½Ñ¡δ ¡«óδÑ «íΩѬΓδ, á ¬
- ßπΘÑßΓóπεΘ¿¼ «íΩѬΓá¼ ñ«íáó½Ñ¡δ ¡Ñ¬«Γ«αδÑ ¡«óδÑ ó«º¼«ª¡«ßΓ¿. êº-
- ¼Ñ¡Ñ¡¿∩ ßπΘÑßΓóπεΘ¿⌐ «íΩÑ¬Γ«ó ¿¼ÑεΓ «íαáΓ¡πε ß«ó¼ÑßΓ¿¼«ßΓ∞, »«φ-
- Γ«¼π ßπΘÑßΓóπεΘ¿⌐ ¬«ñ Turbo Vision ß½ÑñπÑΓ ¬«¼»¿½¿α«óáΓ∞ íѺ ¿º-
- ¼Ñ¡Ñ¡¿⌐, á ßπΘÑßΓóπεΘ¿Ñ »«Γ«¬¿ ¿ αÑßπαßδ ºáúαπªáεΓß∩ íѺ «Φ¿í«¬.
-
- é Turbo Vision 2.0 ¿¼ÑεΓß∩ ¡Ñ¬«Γ«αδÑ ¡«óδÑ ßαÑñßΓóá. Ä ¡¿σ
- αáß߬áºδóáÑΓß∩ ó "Éπ¬«ó«ñßΓóÑ »« »α«úαá¼¼¿α«óá¡¿ε ß Turbo
- Vision":
-
-
- B.Pascal 7 & Objects /UG - 27 -
-
- * Å«ññÑαª¬á »α«óÑન ñ«»πßΓ¿¼«ßΓ¿ ñá¡¡δσ. éáΦ¿ »α¿½«ªÑ¡¿∩
- Turbo Vision ¼«úπΓ «íÑß»Ñτ¿Γ∞ »«½πτÑ¡¿∩ ñ½∩ «íαáí«Γ¬¿ ñ«-
- »πßΓ¿¼δσ ñá¡¡δσ.
-
- * è¡«»¬¿ ß ¡Ñºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ ß ¼¡«ªÑßΓó«¼ ß«ßΓ«∩¡¿⌐.
- è¡«»¬¿ ß ¡Ñºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ ¼«úπΓ ¿¼ÑΓ∞ ß«ßΓ«∩¡¿∩, «Γ-
- ½¿τ¡δÑ «Γ "óδíαá¡á" ¿ "¡Ñ óδíαá¡á". IDE ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á
- DOS (BP.EXE) ¿ß»«½∞ºπÑΓ ¬¡«»¬¿ ß ¡Ñºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ ß
- ¼¡«ªÑßΓó«¼ ß«ßΓ«∩¡¿⌐ ó ßó«Ñ¼ ñ¿á½«ú«ó«¼ «¬¡Ñ »áαá¼ÑΓα«ó
- ¬«¼»¿½∩Γ«αá Compiler Options.
-
- * æαÑñßΓó« »α«ß¼«Γαá ßσÑ¼δ «íΩÑ¬Γ«ó. ä½∩ óδó«ñá ßσѼ óáΦ¿
- »α¿½«ªÑ¡¿∩ ¼«úπΓ ¿ß»«½∞º«óáΓ∞ ñóá «íΩѬΓá - TOutlineViewer
- ¿ TOutline. ¥Γ¿ «íΩѬΓδ ¿ß»«½∞ºπÑΓ ßαÑñßΓó« DOS
- ObjectBrowser.
-
- * Å«ññÑ᪬á óÑαß¿⌐ «íΩÑ¬Γ«ó ó »«Γ«¬áσ. äáªÑ Ñß½¿ óáΦ¿ «íΩѬ-
- Γδ í뫨 ß«ºñá¡δ ß »«¼«Θ∞ε Turbo Vision 1.0, óáΦ¿ »α«úαá¼¼δ
- óßÑ αáó¡« ß¼«úπΓ ßτ¿ΓδóáΓ∞ ¿σ ¬á¬ «íΩѬΓδ, ß«ó¼ÑßΓ¿¼δÑ ß
- Turbo Vision 2.0.
-
- * ì«ó«Ñ πτÑí¡«Ñ απ¬«ó«ñßΓó« ¿ »ÑαÑß¼«ΓαÑ¡¡á∩ ñ«¬π¼Ñ¡Γᵿ∩.
- éδ πó¿ñ¿ΓÑ, τΓ« ¼«ª¡« íδßΓα« ¿ºπτ¿Γ∞ ¿ «ßó«¿Γ∞ Turbo
- Vision.
-
-
- ô½πτΦÑ¡¿∩ ObjectWindows
- ─────────────────────────────────────────────────────────────────
-
- é ¿Ñαáασ¿ε ObjectWindows ñ«íáó½Ñ¡δ ¡«óδÑ «íΩѬΓδ. è ßπΘÑßΓ-
- óπεΘ¿¼ «íΩѬΓá¼ Γá¬ªÑ ñ«íáó½Ñ¡δ ¡Ñ¬«Γ«αδÑ ¡«óδÑ ó«º¼«ª¡«ßΓ¿.
-
- î«ñπ½∞ WObjects í«½∞ΦÑ ¡Ñ ßπΘÑßΓóπÑΓ. æπΘÑßΓóπεΘ¿⌐ π óáß ¿ß-
- σ«ñ¡δ⌐ ¬«ñ ¼«ª¡« íπñÑΓ πß»ÑΦ¡« »ÑαѬ«¼»¿½¿α«óáΓ∞, Ñß½¿ óδ ºá¼Ñ¡¿-
- ΓÑ ¬áªñπε ßß佬π ¡á WObjects ¼«ñπ½∩¼¿ OWindows, ODialogs, OMemory
- ¿ Objects.
-
- ObjectWindows ß«ñÑαª¿Γ ¡«óδÑ ßαÑñßΓóá. ôº¡áΓ∞ « ¡¿σ ¼«ª¡«,
- »α«τ¿Γáó "Éπ¬«ó«ñßΓó« »« »α«úαá¼¼¿α«óá¡¿ε ß ¿ß»«½∞º«ó᡿Ѽ
- ObjectWindows":
-
- * Å«ññÑαª¬á »α«óÑન ñ«»πßΓ¿¼«ßΓ¿ ñá¡¡δσ. éáΦ¿ »α¿½«ªÑ¡¿∩
- ObjectWindows ¼«úπΓ «íÑß»Ñτ¿Γ∞ »«½πτÑ¡¿Ñ ñ½∩ «íαáí«Γ¬¿ ñ«-
- »πßΓ¿¼δσ ñá¡¡δσ.
-
- * ÅÑτáΓ∞ «íΩÑ¬Γ«ó. ü½áú«ñáα∩ ¡«óδ¼ «íΩѬΓá¼ »ÑτáΓ¿ óδó«ñ¿Γ∞
- ñá¡¡δÑ ¡á »ÑτáΓ∞ ó »α«úαá¼¼áσ ObjectWindows ßΓὫ »α«ΘÑ.
-
- * Å«ññÑ᪬á ߻ѵ¿á½¿º¿α«óá¡¡δσ π»αáó½∩εΘ¿σ φ½Ñ¼Ñ¡Γ«ó Windows
- Σ¿α¼δ Borland. éáΦ¿ »α«úαá¼¼δ Windows ¼«úπΓ ¿¼ÑΓ∞ ó¿ñ, ß«-
- «ΓóÑΓßΓóπεΘ¿⌐ ßΓá¡ñáαΓπ Borland.
-
-
-
- B.Pascal 7 & Objects /UG - 28 -
-
- ì«óδÑ ßαÑñßΓóá ¿ πΓ¿½¿Γδ
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ óáΦÑ⌐ µÑ½Ñó«⌐ »½áΓΣ«α¼«⌐ ∩ó½∩ÑΓß∩ Windows, »«¼«τ∞ »α«-
- µÑßßπ αáºαáí«Γ¬¿ ¼«úπΓ ñóá ¡«óδσ ßαÑñßΓóá. Åα«τÑßΓ∞ « ¡¿σ ¼«ª¡« ó
- "Éπ¬«ó«ñßΓóÑ »« ¿¡ßΓαπ¼Ñ¡Γá½∞¡δ¼ ßαÑñßΓóá¼ ¿ πΓ¿½¿Γá¼".
-
- * ôΓ¿½¿Γá WinSight. WinSight - φΓ« ¿¡ßΓαπ¼Ñ¡Γá½∞¡«Ñ ßαÑñßΓó«
- «Γ½áñ¬¿, ¬«Γ«α«Ñ ñáÑΓ óá¼ ¿¡Σ«α¼áµ¿ε «í «¬¡áσ, ¬½áßßáσ ¿
- ß««íΘÑ¡¿∩σ. êß»«½∞ºπ⌐ΓÑ ÑÑ ñ½∩ ¿ºπτÑ¡¿∩ ¡«óδσ »α¿½«ªÑ¡¿⌐
- Windows (óáΦ¿σ ¿½¿ τπª¿σ), τΓ«íδ πó¿ñÑΓ∞ ¬á¬ ß«ºñáεΓß∩ ¿
- ¿ß»«½∞ºπεΓß∩ «¬¡á ¿ ¬½áßßδ «¬«¡, ¿ ¬á¬¿Ñ ß««íΘÑ¡¿∩ »«½πτá-
- εΓ «¬¡á ó« óαѼ∩ óδ»«½¡Ñ¡¿∩ »α«úαá¼¼δ.
-
- * ôΓ¿½¿Γá WinSpector. æ »«¼«Θ∞ε WinSpector óδ ¼«ªÑΓÑ »α«óÑ-
- α¿Γ∞ »α¿½«ªÑ¡¿Ñ Windows »«ß½Ñ ºáóÑαΦÑ¡¿∩ Ñú« ß ¡Ñó«ßßΓá-
- ¡áó½¿óáѼ«⌐ «Φ¿í¬«⌐ (Unrecoverable Application Error -
- UAE). ¥Γ« »«¼«ªÑΓ óá¼ »«¡∩Γ∞ »α¿τ¿¡π «Φ¿í¬¿.
-
- Borland Pascal Γá¬ªÑ ó¬½ετáÑΓ ó ßÑí∩ «í¡«ó½Ñ¡¡δÑ óÑαß¿¿ ß½Ñ-
- ñπεΘ¿σ ¿¡ßΓαπ¼Ñ¡Γá½∞¡δσ ßαÑñßΓó:
-
- * Turbo Debugger (Æπαí« «Γ½áñτ¿¬) ó¬½ετáÑΓ «Γ½áñτ¿¬ TDW, ¬«-
- Γ«αδ⌐ ¼«ªÑΓ «Γ½áª¿óáΓ∞ »α¿¬½áñ¡δÑ »α«úαá¼¼δ Windows, ¿
- TDX, ¬«Γ«αδ⌐ ¼«ªÑΓ «Γ½áª¿óáΓ∞ »α¿¬½áñ¡δÑ »α«úαá¼¼δ ºáΘ¿-
- ΘÑ¡¡«ú« αѪ¿¼á DOS.
-
- * Turbo Profiler (Æπαí« »α«Σ¿½¿α«óΘ¿¬), ¬«Γ«αδ⌐ ó¬½ετáÑΓ ó
- ßÑí∩ ñóá »α«Σ¿½¿α«óΘ¿¬á - «ñ¿¡ ñ½∩ »α«úαá¼¼ DOS, á ñαπú«⌐
- ñ½∩ »α«úαá¼¼ Windows.
-
- * Turbo Assembler (Æπαí« áßßѼí½Ñα), ñ«íáó½∩εΘ¿⌐ ¬ ¬«ñπ áß-
- ßѼí½Ñαá «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ.
-
- * Resource Workshop (Åá¬ÑΓ αáºαáí«Γτ¿¬á αÑßπαß«ó), αáí«Γáε-
- Θ¿⌐ ó ßαÑñÑ Windows ¿ ß»«ß«í¡δ⌐ ß«ºñáóáΓ∞ ñ½∩ »α¿½«ªÑ¡¿⌐
- Windows óßÑ αÑßπαßδ (ñ¿á½«ú«óδÑ «¬¡á, ¬παß«αδ, í¿Γ«óδÑ
- ¼áßß¿óδ, »¿¬Γ«úαá¼¼δ ¿ Γ.ñ.).
-
-
-
-
- B.Pascal 7 & Objects /UG - 29 -
-
- ────────────────────────────────────────────────────────────────────────────
- â½áóá 3. Äß¡«óδ ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñδ ñ½∩ DOS
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal »αÑñßΓáó½∩ÑΓ ß«í«⌐ ¡Ñ Γ«½∞¬« íδßΓαδ⌐ ¬«¼»¿½∩-
- Γ«α Åá߬á½∩. ¥Γ« φΣΣÑ¬Γ¿ó¡δ⌐ ¬«¼»¿½∩Γ«α, ¿¡ΓÑúα¿α«óá¡¡πε ¿¡ΓÑαá¬-
- Γ¿ó¡πε ßαÑñ𠬫ëα«ú« «τÑ¡∞ ½Ñú¬« ¿ºπτáΓ∞ ¿ ¿ß»«½∞º«óáΓ∞. Åα¿ αá-
- í«ΓÑ ß Borland Pascal ñ½∩ Γ«ú«, τΓ«íδ ß«ºñáóáΓ∞, «Γ½áª¿óáΓ∞ ¿ ºá-
- »π߬áΓ∞ »α«úαá¼¼δ ¡á Åá߬á½Ñ, óá¼ ¡Ñ ΓαÑíπÑΓß∩ ¿ß»«½∞º«óáΓ∞ «Γ-
- ñѽ∞¡δ⌐ αÑñá¬Γ«α, ¬«¼»«¡«óΘ¿¬, ¬«¼»¿½∩Γ«α ¿ «Γ½áñτ¿¬. éßÑ φΓ¿
- ßαÑñßΓóá óßΓα«Ñ¡δ ó Borland Pascal ¿ ñ«ßΓπ»¡δ ¿º ¿¡ΓÑúα¿α«óá¡¡«⌐
- ¿¡ΓÑαá¬Γ¿ó¡«⌐ ßαÑñδ αáºαáí«Γ¬¿ »α«úαá¼¼ (IDE).
-
- Åα¿¼Ñτá¡¿Ñ: àß½¿ óδ »αÑñ»«τ¿ΓáÑΓÑ ¿ß»«½∞º«óáΓ∞ ¬«¼»¿-
- ½∩Γ«α αѪ¿¼á ¬«¼á¡ñ¡«⌐ ßΓ᫬¿. æ¼. â½áóπ 3 "諼»¿½∩Γ«αδ,
- αáí«ΓáεΘ¿Ñ ó αѪ¿¼Ñ ¬«¼á¡ñ¡«⌐ ßΓ᫬¿" ó "æ»αáó«τ¡«¼ απ¬«-
- ó«ñßΓóÑ »α«úαá¼¼¿ßΓá".
-
- ê¼Ñ∩ »á¬ÑΓ Borland Pascal, óδ ¼«ªÑΓÑ óδíαáΓ∞ «ñ¡π ¿º ΓαÑσ
- ¿¡ΓÑúα¿α«óá¡¡δσ ßαÑñ:
-
- * BP.EXE, ¿¡ΓÑúα¿α«óá¡¡πε ßαÑñπ αáºαáí«Γ¬¿ »α«úαá¼¼, ¬«Γ«αá∩
- αáí«ΓáÑΓ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ DOS ¿ úÑ¡Ñα¿απÑΓ »α¿¬½áñ¡δÑ
- »α«úαá¼¼δ DOS αÑá½∞¡«ú« αѪ¿¼á, DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á ¿
- Windows.
-
- ùΓ«íδ ºá»πßΓ¿Γ∞ BP.EXE, óδ ñ«½ª¡δ ¿¼ÑΓ∞ ¬«¼»∞εΓÑα ß »α«-
- µÑßß«α«¼ 80286 ¿½¿ ßΓáαΦÑ ¿ ¡Ñ ¼Ñ¡ÑÑ 2 ¼Ñúáíá⌐Γ »á¼∩Γ¿.
- ū߬«½∞¬π IDE αáí«ΓáÑΓ ó ºáΘ¿ΘÑ¡¡«¼ αѪ¿¼Ñ, ÑÑ Ñ¼¬«ßΓ∞ «ú-
- αá¡¿τÑ¡á Γ«½∞¬« «íΩѼ«¼ ñ«ßΓπ»¡«⌐ ¡á ¬«¼»∞εΓÑαÑ »á¼∩Γ∞ε.
-
- * TURBO.EXE, ¿¡ΓÑúα¿α«óá¡¡πε ßαÑñπ, ¬«Γ«αá∩ αáí«ΓáÑΓ ó αÑ-
- á½∞¡«¼ αѪ¿¼Ñ DOS ¿ úÑ¡Ñα¿απÑΓ Γ«½∞¬« »α¿¬½áñ¡δÑ »α«úαá¼¼δ
- DOS αÑá½∞¡«ú« αѪ¿¼á.
-
- * BPW.EXE, ¿¡ΓÑúα¿α«óá¡¡πε ßαÑñπ, ¬«Γ«αá∩ αáí«ΓáÑΓ »«ñ
- Windows ¿ úÑ¡Ñα¿απÑΓ »α¿¬½áñ¡δÑ »α«úαá¼¼δ DOS αÑá½∞¡«ú«
- αѪ¿¼á, Windows ¿ DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á.
-
- é φΓ«⌐ ú½áóÑ »«∩ß¡∩εΓß∩ «ß¡«óδ ¿ß»«½∞º«óá¡¿∩ IDE ñ½∩ DOS.
-
- àß½¿ óδ πªÑ ¿¼ÑÑΓÑ «»δΓ αáí«Γδ ó Windows, Γ« óá¼ ¿ºóÑßΓ¡δ
- «ß¡«óδ αáí«Γδ ó IDE Windows, »«ß¬«½∞¬π óδ º¡áÑΓÑ ¬á¬ αáí«ΓáÑΓ
- ßá¼á Windows. àß½¿ óδ ¡Ñ º¡á¬«¼δ ß IDE ñ½∩ Windows Σ¿α¼δ Borland,
- Γ« ß½ÑñπÑΓ »α«ß¼«ΓαÑΓ∞ ß¡áτá½á â½áóπ 4 "Åα«úαá¼¼¿α«óá¡¿Ñ ó ¿¡ΓÑú-
- α¿α«óá¡¡«⌐ ßαÑñÑ ñ½∩ DOS". IDE ñ½∩ DOS ¿ Windows ó« ¼¡«ú«¼ »«σ«-
- ª¿: ó «íÑ¿σ ßαÑñáσ í«½∞Φ¿¡ßΓó« ºáñáτ óδ»«½¡∩εΓß∩ á¡á½«ú¿τ¡«. è«ú-
- ñá óδ »«⌐¼ÑΓÑ, ¬á¬ óδ»«½¡∩Γ∞ ºáñáτ¿ »« »α«úαá¼¼¿α«óá¡¿ε ó IDE,
- »α«τ¿Γá⌐ΓÑ â½áóπ 5 "Åα«úαá¼¼¿α«óá¡¿Ñ ¿ ¿¡ΓÑúα¿α«óá¡¡«⌐ ¿¡ΓÑαá¬-
- Γ¿ó¡«⌐ ßαÑñÑ ñ½∩ Windows", úñÑ αáß߬áºδóáÑΓß∩ « ßαÑñßΓóáσ, ߻ѵ¿-
- Σ¿τÑ߬¿σ ó IDE ñ½∩ Windows ¿ «í «Γ½¿τ¿∩σ IDE ñ½∩ DOS ¿ ñ½∩
- Windows.
-
-
-
- B.Pascal 7 & Objects /UG - 30 -
-
- çá»π߬ IDE
- ─────────────────────────────────────────────────────────────────
-
- ÅÑαÑ⌐ñ¿ΓÑ ó »«ñ¬áΓὫú Borland Pascal, ß«ºñá¡¡δ⌐ »α«úαá¼¼«⌐
- Install. Äíδτ¡« φΓ¿¼ ¬áΓὫú«¼ ∩ó½∩ÑΓß∩ ¬áΓὫú C:\BP\BIN. ùΓ«íδ
- ºá»πßΓ¿Γ∞ IDE ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á, óóÑñ¿ΓÑ ¬«¼á¡ñπ:
-
- BP
-
- Åα¿¼Ñτá¡¿Ñ: Ä »áαá¼ÑΓαáσ ºá»π߬á Borland Pascal αáßß-
- ¬áºδóáÑΓß∩ ó â½áóÑ 4 "Åα«úαá¼¼¿α«óá¡¿Ñ ó ¿¡ΓÑúα¿α«óá¡¡«⌐
- ßαÑñÑ ñ½∩ DOS".
-
- öá⌐½δ DPMI16BI,OVL ¿ RTM.EXE ñ«½ª¡δ ¡áσ«ñ¿Γ∞ß∩ ó ΓѬπΘѼ ¬á-
- ΓὫúÑ ¿½¿ ó ¬áΓὫúÑ, π¬áºá¡¡«¼ ó ¼áαΦαπΓÑ, ¿¡áτÑ BP.EXE ¡Ñ ºá-
- »πßΓ¿Γß∩.
-
- ùΓ«íδ ºá»πßΓ¿Γ∞ IDE, αáí«ΓáεΘπε ó αÑá½∞¡«¼ αѪ¿¼Ñ, óóÑñ¿ΓÑ
- ¬«¼á¡ñπ:
-
- TURBO
-
-
- 諼»«¡Ñ¡Γδ ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñδ
- ─────────────────────────────────────────────────────────────────
-
- ê¡ΓÑúα¿α«óá¡¡á∩ ¿¡ΓÑαá¬Γ¿ó¡á∩ ßαÑñá αáºαáí«Γ¬¿ »α«úαá¼¼ ß«-
- ñÑαª¿Γ Γα¿ ó¿ñ¿¼δσ ¬«¼»«¡Ñ¡Γá: ßΓ᫬π ¼Ñ¡ε ó óÑασ¡Ñ⌐ τáßΓ¿ φ¬αá-
- ¡á, «»ÑαáΓ¿ó¡πε «í½áßΓ∞ ¿ ßΓ᫬π ß«ßΓ«∩¡¿∩ ó ¡¿ª¡Ñ⌐ τáßΓ¿ φ¬αá¡á.
- Åα¿ á¬Γ¿ó¡«⌐ ßΓα«¬Ñ ¼Ñ¡ε óδ πó¿ñ¿ΓÑ »«ñßóÑτÑ¡¡δ⌐ ºáú«½«ó«¬ ¼Ñ¡ε.
- ¥Γ« ΓѬπΘÑÑ óδíαá¡¡«Ñ ¼Ñ¡ε.
-
- éδíαáΓ∞ ¬«¼á¡ñδ ¼Ñ¡ε óδ ¼«ªÑΓÑ ß »«¼«Θ∞ε ¬½áó¿áΓπαδ ¿½¿ "¼δ-
- Φ¿".
-
- éδíαáΓ∞ ¬«¼á¡ñδ ¼Ñ¡ε ß »«¼«Θ∞ε ¬½áó¿áΓπαδ ¼«ª¡« ß½ÑñπεΘ¿¼
- «íαẫ¼:
-
- 1. ì᪼¿ΓÑ ¬½áó¿Φπ F10. ¥Γ« á¬Γ¿ó¿º¿απÑΓ ßΓ᫬π ¼Ñ¡ε.
-
- 2. ä½∩ óδí«αá ¼Ñ¡ε, ¬«Γ«α«Ñ óδ σ«Γ¿ΓÑ óδóÑßΓ¿, ¿ß»«½∞ºπ⌐ΓÑ
- ¬½áó¿Φ¿ ßΓαѽ«¬. çáΓѼ ¡áª¼¿ΓÑ Enter.
-
- Åα¿¼Ñτá¡¿Ñ: ùΓ«íδ «Γ¼Ñ¡¿Γ∞ ñÑ⌐ßΓó¿Ñ, ¡áª¼¿ΓÑ ¬½áó¿Φπ
- Esc.
-
- é ¬áτÑßΓóÑ ß«¬αáΘÑ¡¿∩ φΓ«ú« Φáúá óδ ¼«ªÑΓÑ ¡áªáΓ∞ »«ñßóÑ-
- τÑ¡¡πε íπ¬óπ ºáú«½«ó¬á ¼Ñ¡ε. ìá»α¿¼Ñα, ¡áσ«ñ∩ß∞ ó ßΓ᫬Ñ
- ¼Ñ¡ε, ¡áª¼¿ΓÑ E ñ½∩ íδßΓα«ú« óδó«ñá ¼Ñ¡ε Edit. ï¿í« íѺ
- á¬Γ¿ó¿ºáµ¿¿ ßΓ᫬¿ ¼Ñ¡ε óδ ¼«ªÑΓÑ ¡áªáΓ∞ ñ½∩ óδó«ñá ¡πª-
- ¡«ú« ¼Ñ¡ε ¬½áó¿Φπ Alt ¿ »«ñßóÑτÑ¡¡πε íπ¬óπ.
-
- 3. ä½∩ óδí«αá ¡πª¡«⌐ ¬«¼á¡ñδ ¼Ñ¡ε ¿ß»«½∞ºπ⌐ΓÑ ¬½áó¿Φ¿ ßΓαÑ-
-
- B.Pascal 7 & Objects /UG - 31 -
-
- ½«¬. çáΓѼ ¡áª¼¿ΓÑ ¬½áó¿Φπ Enter.
-
- çñÑß∞ ß¡«óá ó ¬áτÑßΓóÑ á½∞ΓÑα¡áΓ¿ó¡«ú« óáα¿á¡Γá óδ ¼«ªÑΓÑ
- ñ½∩ óδí«αá ¬«¼á¡ñδ »α¿ óδó«ñÑ ¼Ñ¡ε »α«ßΓ« ¡áªáΓ∞ »«ñßóÑ-
- τÑ¡¡πε íπ¬óπ.
-
- Åα¿ φΓ«¼ Borland Pascal ½¿í« óδ»«½¡¿Γ ¬«¼á¡ñπ, ½¿í« óδóÑ-
- ñÑΓ ñ¿á½«ú«ó«Ñ «¬¡« ¿½¿ ñαπú«Ñ ¼Ñ¡ε.
-
- ä½∩ óδí«αá ¬«¼á¡ñ ¼«ª¡« Γá¬ªÑ ¿ß»«½∞º«óáΓ∞ "¼δΦ∞". ä½∩ φΓ«-
- ú«:
-
- 1. ä½∩ óδó«ñá ¡πª¡«ú« ¼Ñ¡ε Θѽ¬¡¿ΓÑ ¬¡«»¬«⌐ "¼δΦ¿", «ßΓá¡«-
- ó¿óΦ¿ß∞ ¡á ¡πª¡«¼ ºáú«½«ó¬Ñ ¼Ñ¡ε.
-
- 2. Öѽ¬¡¿ΓÑ ¬¡«»¬«⌐ "¼δΦ¿" ¡á ¡πª¡«⌐ ¬«¼á¡ñÑ.
-
- Åα¿¼Ñτá¡¿Ñ: éδ ¼«ªÑΓÑ ¡áßΓα«¿Γ∞ ñÑ⌐ßΓó¿Ñ Ctrl+»αáóá∩
- ¬¡«»¬á "¼δΦ¿" ¿ ñáªÑ »«¼Ñ¡∩Γ∞ ñÑ⌐ßΓó¿∩ ¬¡«»«¬ "¼δΦ¿"; óδ-
- íÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Mouse.
-
- éδ ¼«ªÑΓÑ Γá¬ªÑ "óδΓ∩¡πΓ∞" ¼Ñ¡ε ¿º ºáú«½«ó¬á 󡿺 ñ« ¬«¼á¡ñδ
- ¼Ñ¡ε. Äßó«í«ñ¿ΓÑ ¬¡«»¬π "¼δΦ¿" ¡á ¡πª¡«⌐ ¬«¼á¡ñÑ (Ñß½¿ óáΦ¿ ¡á¼Ñ-
- αÑ¡¿∩ ¿º¼Ñ¡∩Γß∩, »α«ßΓ« πíÑñ¿ΓÑ ¼Ñ¡ε «íαáΓ¡« - ¬«¼á¡ñá óδíαá¡á ¡Ñ
- íπñÑΓ).
-
- àß½¿ ºá ¬«¼á¡ñ«⌐ ¼Ñ¡ε ß½ÑñπÑΓ ¼¡«ú«Γ«τ¿Ñ (...), óδí«α ¬«¼á¡-
- ñδ »α¿ó«ñ¿Γ ¬ óδó«ñπ ñ¿á½«ú«ó«ú« «¬¡á. àß½¿ ºá ¬«¼á¡ñ«⌐ π¬áºá¡á
- ºá¬αáΦÑ¡¡á∩ ßΓαѽ¬á (>), Γ« φΓá ¬«¼á¡ñá »α¿ó«ñ¿Γ ¬ ñαπú«¼π ¼Ñ¡ε
- (óß»½δóáεΘѼπ ¼Ñ¡ε). 諼á¡ñá íẠ¼¡«ú«Γ«τ¿∩ ¿½¿ ßΓαѽ¬¿ π¬áºδ-
- óáÑΓ ñÑ⌐ßΓó¿Ñ, óδ»«½¡∩Ѽ«Ñ »α¿ ÑÑ óδí«αÑ.
-
- ê¡«úñá ¬«¼á¡ñδ ¼Ñ¡ε óδó«ñ∩Γß∩ "Γπ߬½δ¼¿", ¿ »α¿ ¿σ óδí«αÑ
- ¡¿τÑú« ¡Ñ »α«¿ßσ«ñ¿Γ. ¥Γ« ß½πτáÑΓß∩, ¬«úñá óδí«α «Γñѽ∞¡«⌐ ¬«¼á¡-
- ñδ ó ñá¡¡«¼ ¬«¡ΓѬßΓÑ ¡Ñ ¿¼ÑÑΓ ß¼δß½á. ìá»α¿¼Ñα, Ñß½¿ ó ΓѬπΘѼ
- «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩ π óáß ¡ÑΓ óδñѽѡ¡«ú« í½«¬á, óδ ¡Ñ ß¼«ªÑΓÑ
- óδαѺáΓ∞, ¬«»¿α«óáΓ∞ ¿½¿ ßΓ¿αáΓ∞ ΓѬßΓ, »«ß¬«½∞¬π ¡Ñ π¬áºá½¿ αÑ-
- ñá¬Γ«απ, ߬«½∞¬« ΓѬßΓá ¡πª¡« óδαѺáΓ∞, ߬«»¿α«óáΓ∞ ¿½¿ ßΓÑαÑΓ∞.
- æ½Ññ«óáΓѽ∞¡«, ß««ΓóÑΓßΓóπεΘ¿Ñ ¬«¼á¡ñδ (Cut, Copy ¿ Clear) íπñπΓ
- ó ¼Ñ¡ε Edit Γπ߬½δ¼¿. Å«ß½Ñ óδñѽѡ¿∩ ΓѬßΓá ó «¬¡Ñ αÑñá¬Γ¿α«óá-
- ¡¿∩ óδ ß¼«ªÑΓÑ óδí¿αáΓ∞ φΓ¿ ¬«¼á¡ñδ.
-
-
- B.Pascal 7 & Objects /UG - 32 -
-
- Ä»ÑαáΓ¿ó¡δÑ ¬½áó¿Φ¿
-
- Éáí«Γá∩ ß ¬½áó¿áΓπα«⌐, ñ½∩ ñ«ßΓπ»á ¬ ßΓα«¬Ñ ¼Ñ¡ε ¿ ¬«¼á¡ñá¼
- óδ Γá¬ªÑ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ¼¡«ªÑßΓó« ß«¬αáΘÑ¡¡δσ óáα¿á¡Γ«ó ¬«-
- ¼á¡ñ («»ÑαáΓ¿ó¡δσ ¬½áó¿Φ). ÅÑαÑ⌐Γ¿ ó «ß¡«ó¡«Ñ ¼Ñ¡ε ¿ á¬Γ¿ó¿º¿α«-
- óáΓ∞ Ñú« φ½Ñ¼Ñ¡Γδ ¼«ª¡« ¡áªáΓ¿Ñ¼ ¬½áó¿Φ¿ Alt ¿ »«ñßóÑτÑ¡¡«⌐ íπ¬-
- óδ. è«úñá óδ ¡áσ«ñ¿ΓÑß∞ ó ¼Ñ¡ε, ¼«ªÑΓÑ ¡áªáΓ∞ »«ñßóÑτÑ¡¡πε íπ¬óπ
- φ½Ñ¼Ñ¡Γá ¿½¿ ß½ÑñπεΘÑÑ ºá ¡Ñ⌐ ß«¬αáΘÑ¡¿Ñ. Ä»ÑαáΓ¿ó¡δÑ ¬½áó¿Φ¿
- ¼«ª¡« ¿ß»«½∞º«óáΓ∞ ó ½εí«¼ ¼ÑßΓÑ IDE - ñ½∩ φΓ«ú« ¡Ñ ΓαÑíπÑΓß∩
- ß¡áτá½á óδó«ñ¿Γ∞ ¼Ñ¡ε.
-
- æΓ᫬á ß«ßΓ«∩¡¿∩ Γá¬ªÑ ß«ñÑαª¿Γ «»ÑαáΓ¿ó¡δÑ ¬½áó¿Φ¿. ä½∩ óδ-
- í«αá ß««ΓóÑΓßΓóπεΘÑ⌐ ¬«¼á¡ñδ ¡áª¼¿ΓÑ «»ÑαáΓ¿ó¡πε ¬½áó¿Φπ ¿½¿
- Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á Σá¬Γ¿τÑ߬«¼ »αÑñßΓáó½Ñ¡¿¿ «»ÑαáΓ¿ó¡«⌐ ¬½áó¿Φ¿
- ó ßΓα«¬Ñ ß«ßΓ«∩¡¿∩.
-
-
-
- B.Pascal 7 & Objects /UG - 33 -
-
- Ĭ¡á IDE
- ─────────────────────────────────────────────────────────────────
-
- ü«½∞Φ¿¡ßΓó« ¿ Γ«ú«, τΓ« óδ ó¿ñ¿ΓÑ ó IDE, »α«¿ßσ«ñ¿Γ ó «¬¡Ñ.
- Ĭ¡« - φΓ« «í½áßΓ∞ φ¬αá¡á, ¬«Γ«απε ¼«ª¡« »ÑαѼÑΘáΓ∞, ¼áßΦΓáí¿α«-
- óáΓ∞, »ÑαѬαδóáΓ∞, óδó«ñ¿Γ∞ íѺ »ÑαѬαδΓ¿∩, ºá¬αδóáΓ∞, «Γ¬αδóáΓ∞
- ¿ ¿º¼Ñ¡∩Γ∞ ÑÑ αẼÑα.
-
- ┌────────────────┐ ┌───────────┐ ┌─────────────────────────┐
- │ ä½∩ íδßΓα«ú« │ │ çáú«½«ó«¬ │ │ è¡«»¬á ¼áßΦΓáí¿α«óá¡¿∩ │
- │ ºá¬αδΓ¿∩ «¬¡á │ │ ß«ñÑαª¿Γ │ │ ß«ñÑαª¿Γ º¡áτ«¬, ¡á │
- │ ¼«ª¡« Θѽ¬¡πΓ∞ │ │ ¡áºóá¡¿Ñ │ │ ¬«Γ«α«¼ ¼«ª¡« Θѽ¬¡πΓ∞ │
- │ "¼δΦ∞ε" ¡á │ │ ñá¡¡«ú« │ │ ¼δΘ∞ε ñ½∩ αáß»áσ¿óá¡¿∩ │
- │ í½«¬Ñ ºá¬αδΓ¿∩ │ │ «¬¡á │ │ ¿½¿ ߪáΓ¿∩ «¬¡á │
- │ «¬¡á │ └────────┬──┘ └───────────────────────┬─┘
- └───┬────────────┘ │ │
- │ │ │
- v v v
- ╔══[█]═════════════════ çáú«½«ó«¬ «¬¡á ══════════════════ 3 ═[^]╗
- ║ ^ ^
- ║ │ ▒
- ║ ┌─────────────────────────┴───┐ ▒
- ║ │ èáªñ«Ñ «Γ¬αδΓ«Ñ «¬¡« ¿¼ÑÑΓ │ ▒
- ║ │ ¡«¼Ñα. êß»«½∞ºπ⌐ΓÑ Alt ¿ # │ █
- ║ │ ñ½∩ «Γ¬αδΓ¿∩ «¬¡á. │ ▒
- ║ └─────────────────────────────┘ ▒
- ║ ▒
- ║ ┌──────────┐ ┌────────────────────────────────┐ ▒
- ║ │ æΓα«¬á ¿ │ │ êß»«½∞ºπ⌐ΓÑ »«½«ßδ »α«¬απΓ¬¿ │ ▒
- ║ │ ßΓ«½íѵ │ │ ß "¼δΦ∞ε" ñ½∩ »ÑαѼÑΘÑ¡¿∩ ├───────>▒
- ║ │ »«º¿µ¿¿ │ │ ß«ñÑন¼«ú« «¬¡á. │ ▒
- ║ │ ¬παc«αá │ └──────────────┬─────────────────┘ ▒
- ║ └───┬──────┘ │ ▒
- ║ │ │ ▒
- ║ v v v
- ╚═*═1:1═══<▒▒▒▒▒▒▒▒▒▒▒▒▒▒█▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒>─┘
- ^ ┌──────────────────────────────┐ ^
- ┌┴────────────┐ │ ùΓ«íδ ßñѽáΓ∞ «¬¡« í«½∞ΦÑ ├───┘
- │ ê¡ñ¿¬áΓ«α │ │ ¿½¿ ¼Ñ¡∞ΦÑ, íπ¬ß¿απ⌐ΓÑ πú«½ │
- │ ¼«ñ¿Σ¿¬áµ¿¿ │ │ ¿º¼Ñ¡Ñ¡¿∩ αẼÑαá. │
- │ Σá⌐½á │ └──────────────────────────────┘
- └─────────────┘
-
- É¿ß. 3.1 Æ¿»¿τ¡«Ñ «¬¡«.
-
- Åα¿ αáí«ΓÑ ó IDE óδ ¼«ªÑΓÑ «Γ¬αδΓ∞ ¿ ¿ß»«½∞º«óáΓ∞ ¼¡«ªÑßΓó«
- «¬«¡, ¡« ó ¬áªñδ⌐ ¼«¼Ñ¡Γ óαѼѡ¿ á¬Γ¿ó¡δ¼ ¼«ªÑΓ íδΓ∞ Γ«½∞¬« «ñ¡«
- «¬¡«. Ç¬Γ¿ó¡«Ñ «¬¡« - φΓ« Γ« «¬¡«, ó ¬«Γ«α«¼ óδ ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ
- αáí«ΓáÑΓÑ. ïεíá∩ ¬«¼á¡ñá, ¬«Γ«απε óδ óδí¿αáÑΓÑ, ¿½¿ ΓѬßΓ, ¬«Γ«-
- αδ⌐ óδ ¡áí¿αáÑΓÑ, «Γ¡«ß¿Γß∩ Γ«½∞¬« ¬ á¬Γ¿ó¡«¼π «¬¡π. Äñ¡á¬«, Ñß-
- ½¿ óδ «Γ¬α뫨 ó ¡Ñ߬«½∞¬¿σ «¬¡áσ «ñ¿¡ ¿ ëà ªÑ Σá⌐½, ½εí«Ñ ñÑ⌐ß-
- Γó¿Ñ, »α¿¼Ñ¡∩Ѽ«Ñ ¬ φΓ«¼π Σá⌐½π, ¼«ªÑΓ «ΓαáªáΓ∞ß∩ ¡á óßÑσ «¬¡áσ,
- ß«ñÑαªáΘ¿σ Ñú«.
-
- B.Pascal 7 & Objects /UG - 34 -
-
-
- æπΘÑßΓóπÑΓ ¡Ñ߬«½∞¬« Γ¿»«ó «¬«¡, ¡« í«½∞Φ¿¡ßΓó« ¿º ¡¿σ ß«-
- ñÑαªáΓ ß½ÑñπεΘ¿Ñ φ½Ñ¼Ñ¡Γδ:
-
- - ßΓ᫬π ºáú«½«ó¬π;
- - φ½Ñ¼Ñ¡Γ ºá¬αδΓ¿∩;
- - »«½«ßδ »α«¬απΓ¬¿;
- - πú«½ ¿º¼Ñ¡Ñ¡¿∩ αẼÑαá;
- - φ½Ñ¼Ñ¡Γ "αáß»áσ¿óá¡¿∩";
- - ¡«¼Ñα «¬¡á.
-
- IDE «Γ¼ÑτáÑΓ á¬Γ¿ó¡«Ñ «¬¡«, «íα¿ß«óδóá∩ Ñú« ñó«⌐¡«⌐ αἬ«⌐,
- í½áú«ñáα∩ τѼπ Ñú« ¼«ª¡« ½Ñú¬« ¿ñÑ¡Γ¿Σ¿µ¿α«óáΓ∞ ¡á φ¬αá¡Ñ. àß½¿
- óáΦ¿ «¬¡á »ÑαѬαδóáεΓß∩, Γ« á¬Γ¿ó¡«Ñ «¬¡« óßÑúñá ¡áσ«ñ¿Γß∩ »ÑαÑñ
- óßѼ¿ ñαπú¿¼¿ ("»ÑαÑñ¡ÑÑ" «¬¡«).
-
- é á¬Γ¿ó¡«¼ «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩ ó ½Ñó«¼ óÑασ¡Ñ¼ πú½π óδó«ñ∩Γ-
- ß∩ Γá¬ªÑ º¡áτÑ¡¿∩ ΓѬπΘÑ⌐ ßΓ᫬¿ ¿ ßΓ«½íµá. àß½¿ óδ ¼«ñ¿Σ¿µ¿α«óá-
- ½¿ Σá⌐½, ß½Ñóá «Γ º¡áτÑ¡¿⌐ ßΓ«½íµá ¿ ßΓ᫬¿ óδó«ñ¿Γß∩ ºóѺñ«τ¬á
- *.
-
- ¥½Ñ¼Ñ¡Γ ºá¬αδΓ¿∩ «¬¡á ¡áσ«ñ¿Γß∩ ó óÑασ¡Ñ¼ ½Ñó«¼ πú½π. Å«º¿-
- µ¿«¡¿α«óáó ¡á φëà φ½Ñ¼Ñ¡Γ "¼δΦ∞" ¿ Θѽ¬¡πó ¬¡«»¬«⌐, óδ ¼«ªÑΓÑ
- íδßΓα« ºá¬αδΓ∞ ñá¡¡«Ñ «¬¡« (ó »α«Γ¿ó¡«¼ ß½πτáÑ ¼«ª¡« óδíαáΓ∞ ¬«-
- ¼á¡ñπ Window│Close). æ»αáó«τ¡«Ñ «¬¡« Help ßτ¿ΓáÑΓß∩ óαѼѡ¡δ¼,
- »«φΓ«¼π ºá¬αδΓ∞ Ñú« ¼«ª¡« »α«ßΓ« ¡áªáó ¬½áó¿Φπ Esc.
-
- éÑασ¡∩∩ ú«α¿º«¡Γá½∞¡á∩ ßΓα«¬á ¼Ñ¡ε, ßΓα«¬á ºáú«½«ó¬á, ß«ñÑα-
- ª¿Γ ¡áºóá¡¿Ñ «¬¡á ¿ Ñú« ¡«¼Ñα. äó«⌐¡«⌐ Θѽτ«¬ ¬¡«»¬«⌐ "¼δΦ¿" ¡á
- ºáú«½«ó¬Ñ «¬¡á »α¿ó«ñ¿Γ ¬ Ñú« "αáß»áσ¿óá¡¿ε" (πóѽ¿τÑ¡¿ε ñ« αáº-
- ¼Ñαá »«½¡«ú« φ¬αá¡á) ¿½¿ ¡á«í«α«Γ, ó«ßßΓá¡«ó½Ñ¡¿ε »αÑñδñπΘÑú«
- αẼÑαá, Ñß½¿ «¡« πªÑ αáß»áσ¡πΓ«. éδ ¼«ªÑΓÑ Γá¬ªÑ »ÑαѼÑΘáΓ∞
- (íπ¬ß¿α«óáΓ∞) ß »«¼«Θ∞ε "¼δΦ¿" ºáú«½«ó«¬, τΓ« »α¿ó«ñ¿Γ ¬ »ÑαѼÑ-
- ΘÑ¡¿ε «¬¡á.
-
- èáªñ«¼π «Γ¬αδóáѼ«¼π óἿ «¬¡π »α¿ßóá¿óáÑΓß∩ ¡«¼Ñα («¡ π¬á-
- ºδóáÑΓß∩ ß»αáóá óóÑασπ). ìáªáΓ¿Ñ ¬½áó¿Φ Alt+0 ñáÑΓ óá¼ ß»¿ß«¬
- óßÑσ «Γ¬αδΓδσ «¬«¡. Ĭ¡« ¼«ª¡« ßñѽáΓ∞ á¬Γ¿ó¡δ¼, ¡áªáó ¬½áó¿Φπ
- Alt ó ß«τÑΓá¡¿¿ ß ¡«¼Ñα«¼ «¬¡á. ìá»α¿¼Ñα, Ñß½¿ ß»αáó«τ¡«Ñ «¬¡«
- Help ¿¼ÑÑΓ ¡«¼Ñα 5, ¡« »ÑαѬαδΓ« ßÑ⌐τáß ñαπú¿¼ «¬¡«¼, ¡áªáΓ¿Ñ
- Alt+5 »ÑαÑó«ñ¿Γ óáß ó φΓ« «¬¡« («¡« ßΓá¡«ó¿Γß∩ »Ñαóδ¼).
-
- Åα¿¼Ñτá¡¿Ñ: Borland Pascal ¡π¼ÑαπÑΓ Γ«½∞¬« »ÑαóδÑ 9
- «Γ¬αδΓδσ óἿ «¬«¡.
-
- é »αáó«¼ óÑασ¡Ñ¼ πú½π «¬¡á óδó«ñ¿Γß∩ φ½Ñ¼Ñ¡Γ αáß»áσ¿óá¡¿∩
- (¼áßΦΓáí¿α«óá¡¿∩) «¬¡á. àß½¿ ß¿¼ó«½ ó φΓ«¼ φ½Ñ¼Ñ¡ΓÑ »αÑñßΓáó½∩ÑΓ
- ß«í«⌐ ßΓαѽ¬π óóÑασ, Γ« Θѽτ«¬ ¬¡«»¬«⌐ "¼δΦ¿" »α¿ »«º¿µ¿«¡¿α«óá-
- ¡¿¿ ó φΓ«¼ φ½Ñ¼Ñ¡Γπ »α¿óÑñÑΓ ¬ ¼á¬ß¿¼á½∞¡«¼π πóѽ¿τÑ¡¿ε Ñú« αáº-
- ¼Ñαá (αáß»áσ¿óá¡¿ε). àß½¿ φΓ« ñó«⌐¡á∩ ßΓαѽ¬á, Γ« «¬¡« πªÑ ¿¼ÑÑΓ
- ¼á¬ß¿¼á½∞¡δ⌐ αẼÑα. é φΓ«¼ ß½πτáÑ Θѽτ«¬ ¬¡«»¬«⌐ "¼δΦ¿" ó«ºóαá-
- ΘáÑΓ «¬¡« ¬ »αÑñδñπΘѼπ αẼÑαπ. ùΓ«íδ "αáß»áσ¡πΓ∞" «¬¡« ß »«-
- ¼«Θ∞ε ¬½áó¿áΓπαδ, óδíÑα¿ΓÑ ¬«¼á¡ñπ Window│Zoom ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿-
-
- B.Pascal 7 & Objects /UG - 35 -
-
- Φπ F5.
-
- Åα¿¼Ñτá¡¿Ñ: äó«⌐¡«⌐ Θѽτ«¬ "¼δΦ∞ε" ¡á ßΓα«¬Ñ ºáú«½«ó¬á
- «¬¡á Γá¬ªÑ »α¿óÑñÑΓ ¬ Ñú« αáß»áσ¿óá¡¿ε ¿½¿ ó«ßßΓá¡«ó½Ñ¡¿ε
- αẼÑαá.
-
- Å«½«ßá »α«¬απΓ¬¿ - φΓ« óÑαΓ¿¬á½∞¡á∩ ¿½¿ ú«α¿º«¡Γá½∞¡á∩
- »«½«ßá, ¬«Γ«αá∩ óδú½∩ñ¿Γ ß½ÑñπεΘ¿¼ «íαẫ¼:
-
- <▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒█▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒>
-
- ¥Γ¿ »«½«ßδ ¼«ª¡« ¿ß»«½∞º«óáΓ∞ »α¿ αáí«ΓÑ ß "¼δΦ∞ε" ñ½∩ »α«¬-
- απΓ¬¿ ß«ñÑন¼«ú« «¬¡á.
-
- * àß½¿ Θѽ¬¡πΓ∞ ¬¡«»¬«⌐ "¼δΦ¿", »«º¿µ¿«¡¿α«óáóΦ¿ß∞ ó ¬«¡µÑ
- »«½«ßδ, φΓ« »α¿óÑñÑΓ ¬ »α«¬απ⪥ ¡á «ñ¡π ßΓ᫬π.
-
- * àß½¿ ¡áªáΓ∞ ¿ ¡Ñ «Γ»π߬áΓ∞ ¬¡«»¬π, »α«¬απΓ¬á íπñÑΓ »α«ñ«½-
- ªáΓ∞ß∩.
-
- * ìáªáΓ¿Ñ ¬¡«»¬¿ "¼δΦ¿" ¡á ºáΓѡѡ¡«⌐ «í½áßΓ¿ ó ¬«¡µÑ »«½«ßδ
- »α«¬απΓ¬¿ (ßΓαѽ¬¿) »α¿óÑñÑΓ ¬ »«ßΓαá¡¿τ¡«¼π "½¿ßΓá¡¿ε".
-
- * àß½¿ óδ ß »«¼«Θ∞ε "¼δΦ¿" íπñÑΓÑ »ÑαѼÑΘáΓ∞ (íπ¬ß¿α«óáΓ∞)
- »« »«½«ßÑ »α«¬απΓ¬¿ ߬«½∞º∩Θ¿⌐ ¼áα¬Ñα (ºñÑß∞ «¡ «Γ¼ÑτÑ¡
- ß¿¼ó«½«¼ █), Γ« ß«ñÑন¼«Ñ «¬¡á ß¼ÑßΓ¿Γß∩ (»α«¬απΓ¿Γß∩) ó
- ß««ΓóÑΓßΓó¿¿ ß «Γ¡«ß¿Γѽ∞¡«⌐ »«º¿µ¿Ñ⌐ »«½«ßδ »α«¬απΓ¬¿.
-
- Åα¿¼Ñτá¡¿Ñ: Å«½«ßδ »α«¬απΓ¬¿ »«ºó«½∩εΓ ½εí«¼π »«½∞º«-
- óáΓѽε (¿ß»«½∞ºπεΘѼπ "¼δΦ∞" ¿½¿ ¬½áó¿áΓπαπ) ó¿ñÑΓ∞, ¬á¬
- ñá½Ñ¬« «¡ »α«ñó¿¡π½ß∩ ó Σá⌐½Ñ.
-
- é »αáó«¼ ¡¿ª¡Ñ¼ πú½π «¬¡á ¡áσ«ñ¿Γß∩ φ½Ñ¼Ñ¡Γ ¿º¼Ñ¡Ñ¡¿∩ αẼÑ-
- αá. éδ ¼«ªÑΓÑ íπ¬ß¿α«óáΓ∞ φëà πú«½ ß »«¼«Θ∞ε "¼δΦ¿", πóѽ¿τ¿óá∩
- ¿½¿ π¼Ñ¡∞Φá∩ αẼÑαδ «¬¡á. ô¬áºá¡¡δ⌐ πú«½ «Γ¼ÑτÑ¡ «ñ¿¡áα¡«⌐, á ¡Ñ
- ñó«⌐¡«⌐ ½¿¡¿Ñ⌐, ¬á¬ «ßΓá½∞¡á∩ úαá¡¿µá «¬¡á.
-
- ùΓ«íδ ¿º¼Ñ¡¿Γ∞ αẼÑα «¬¡á ß »«¼«Θ∞ε ¬½áó¿áΓπαδ, ßñѽá⌐ΓÑ
- ß½ÑñπεΘÑÑ:
-
- 1. êß»«½∞ºπ⌐ΓÑ ¬«¼á¡ñπ Size/Move ¼Ñ¡ε Window, ¿½¿ ¡áª¼¿ΓÑ
- ¬½áó¿Φ¿ Ctrl+F5.
-
- 2. ôñÑনóá∩ ¡áªáΓ«⌐ ¬½áó¿Φπ Shift, ñ½∩ ¿º¼Ñ¡Ñ¡¿∩ αẼÑαá
- «¬¡á ¿ß»«½∞ºπ⌐ΓÑ ¬½áó¿Φ¿ ßΓαѽ«¬.
-
- ùΓ«íδ »ÑαѼÑßΓ¿Γ∞ «¬¡« ß »«¼«Θ∞ε ¬½áó¿áΓπαδ, ßñѽá⌐ΓÑ ß½Ññπ-
- εΘÑÑ:
-
- 1. êß»«½∞ºπ⌐ΓÑ ¬«¼á¡ñπ Size/Move ¼Ñ¡ε Window, ¿½¿ ¡áª¼¿ΓÑ
- ¬½áó¿Φ¿ Ctrl+F5.
-
- 2. ä½∩ »ÑαѼÑΘÑ¡¿∩ «¬¡á ¿ß»«½∞ºπ⌐ΓÑ ¬½áó¿Φ¿ ßΓαѽ«¬.
-
- B.Pascal 7 & Objects /UG - 36 -
-
- ô»αáó½Ñ¡¿Ñ «¬¡«¼
-
- é Æáí½¿µÑ 3.1 ¬αáΓ¬« »ÑαÑτ¿ß½Ñ¡«, ¬á¬ ¼«ª¡« π»αáó½∩Γ∞ «¬¡á¼¿
- ó Borland Pascal. çá¼ÑΓ¿¼, τΓ« ñ½∩ óδ»«½¡Ñ¡¿∩ φΓ¿σ ñÑ⌐ßΓó¿⌐ óá¼
- ¡Ñ ΓαÑíπÑΓß∩ "¼δΦ∞" - ¼«ª¡« »αѬαáß¡« «í«⌐Γ¿ß∞ ¿ ¬½áó¿áΓπα«⌐.
-
- Éáí«Γá ß «¬¡á¼¿ Æáí½¿µá 3.1
- ┌─────────────────────┬────────────────────────────────────────┐
- │ùΓ«íδ: │ êß»«½∞ºπ⌐ΓÑ ß½ÑñπεΘ¿Ñ ¼ÑΓ«ñδ: │
- ├─────────────────────┼────────────────────────────────────────┤
- │ÄΓ¬αδΓ∞ «¬¡« │ 諼á¡ñπ Choose File│Open ñ½∩ «Γ¬αδΓ¿∩│
- │αÑñá¬Γ«αá │ Σá⌐½á ¿ óδó«ñá Ñú« ¡á φ¬αá¡, ¿½¿ ¬½áó¿-│
- │ │ Φπ F3. │
- ├─────────────────────┼────────────────────────────────────────┤
- │ÄΓ¬αδΓ∞ ñαπú¿Ñ «¬¡á │ éδíÑα¿ΓÑ ¡πª¡«Ñ «¬¡« ¿º ¼Ñ¡ε Window ó│
- │ │ ¼Ñ¡ε Tools ¿½¿ Debug. │
- ├─────────────────────┼────────────────────────────────────────┤
- │çá¬αδΓ∞ «¬¡« │ 諼á¡ñπ Close ¼Ñ¡ε Window (¿½¿ ¬½áó¿-│
- │ │ Φ¿ Alt+F3), ½¿í« Θѽ¬¡¿ΓÑ ¬¡«»¬«⌐ "¼δ-│
- │ │ Φ¿" ¡á φ½Ñ¼Ñ¡ΓÑ ºá¬αδΓ¿∩ «¬¡á. │
- ├─────────────────────┼────────────────────────────────────────┤
- │ôó¿ñÑΓ∞ »αÑñδñπΘÑÑ │ éδíÑα¿ΓÑ ¬«¼á¡ñπ Window│Previous ¿½¿ │
- │«¬¡« │ ¿ß»«½∞ºπ⌐ΓÑ ¬½áó¿Φ¿ Shift+F6. │
- ├─────────────────────┼────────────────────────────────────────┤
- │Ç¬Γ¿ó¿º¿α«óáΓ∞ «¬¡« │ Öѽ¬¡¿ΓÑ ¬¡«»¬«⌐ ó ½εí«¼ ¼ÑßΓÑ «¬¡á,│
- │ │ ¿½¿ │
- │ │ │
- │ │ ì᪼¿ΓÑ ¬½áó¿Φπ Alt, »½εß ¡«¼Ñα «¬¡á (ó│
- │ │ óÑασ¡Ñ¼ »αáó«¼ πú½π «¬¡á), ¿½¿ │
- │ │ │
- │ │ êß»«½∞ºπ⌐ΓÑ ¬«¼á¡ñπ Choose Window│List│
- │ │ (éδí«α «¬¡á│滿߫¬), ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿-│
- │ │ Φ¿ Alt+0 ¿ óδñѽ¿ΓÑ «¬¡« ¿º ß»¿ß¬á, ¿½¿│
- │ │ │
- │ │ êß»«½∞ºπ⌐ΓÑ ¬«¼á¡ñπ Choose Window│Next│
- │ │ ¿½¿ F6, τΓ«íδ ßñѽáΓ∞ á¬Γ¿ó¡δ¼ ß½Ññπε-│
- │ │ ΘÑÑ (ó Γ«¼ »«α∩ñ¬Ñ, ¬á¬ óδ ¿σ «Γ¬αδóá-│
- │ │ ½¿) «¬¡«. ï¿í« ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Alt+F6,│
- │ │ τΓ«íδ ßñѽáΓ∞ á¬Γ¿ó¡δ¼ »αÑñδñπΘÑÑ «¬¡«.│
- ├─────────────────────┼────────────────────────────────────────┤
- │ÅÑαѼÑßΓ¿Γ∞ á¬Γ¿ó¡«Ñ │ ÅÑαѼÑßΓ¿ΓÑ ß »«¼«Θ∞ε "¼δΦ¿" ßΓ᫬π│
- │«¬¡« │ ºáú«½«ó¬á ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+F5│
- │ │ (Window│Size/Move - Ĭ¡«│ÉẼÑα/ÅÑαѼÑ-│
- │ │ ΘÑ¡¿Ñ) ¿ ¿ß»«½∞ºπ⌐ΓÑ ñ½∩ »«º¿µ¿«¡¿α«óá-│
- │ │ ¡¿∩ «¬¡á ó ¡πª¡«Ñ ¼ÑßΓ« ¬½áó¿Φ¿ π»αáó-│
- │ │ ½Ñ¡¿∩ ¬παß«α«¼, »«ß½Ñ τÑú« ¡áª¼¿ΓÑ ¬½á-│
- │ │ ó¿Φπ Enter. │
-
- B.Pascal 7 & Objects /UG - 37 -
-
- ┌──────────────────────┬────────────────────────────────────────┐
- │ ùΓ«íδ: │ êß»«½∞ºπ⌐ΓÑ ß½ÑñπεΘ¿Ñ ¼ÑΓ«ñδ: │
- ├──────────────────────┼────────────────────────────────────────┤
- │꺼ѡ¿Γ∞ αẼÑα │ ÅÑαѼÑßΓ¿ΓÑ ß »«¼«Θ∞ε "¼δΦ¿" πú«½ ¿º-│
- │á¬Γ¿ó¡«ú« «¬¡á │ ¼Ñ¡Ñ¡¿∩ αẼÑαá (¿½¿ ½εí«⌐ ñαπú«⌐│
- │ │ πú«½). ï¿í« óδíÑα¿ΓÑ ¬«¼á¡ñπ Window││
- │ │ Size/Move ¿ ¡áª¼¿ΓÑ ¬½áó¿Φπ Shift, Ñß½¿│
- │ │ óδ ¿ß»«½∞ºπÑΓÑ ñ½∩ ¿º¼Ñ¡Ñ¡¿∩ αẼÑαá│
- │ │ «¬¡á ¬½áó¿Φ¿ π»αáó½Ñ¡¿∩ ¬παß«α«¼. ū߽Ñ│
- │ │ φΓ«ú« ¡áª¼¿ΓÑ ¬½áó¿Φπ Enter. ¡« ¿ß-│
- │ │ »«½∞º«óáΓ∞ ß«¬αáΘÑ¡¡δ⌐ óáα¿á¡Γ - ¡áªáΓ∞│
- │ │ Ctrl+F5 ¿ ¿ß»«½∞º«óáΓ∞ ¬½áó¿Φπ Shift│
- │ │ ß«ó¼ÑßΓ¡« ß ¬½áó¿ΦἿ π»αáó½Ñ¡¿∩ ¬παß«-│
- │ │ α«¼ (ßΓαѽ¬¿). │
- ├─────────────────────┼────────────────────────────────────────┤
- │îáßΦΓáí¿α«óáΓ∞ │ ì᪼¿ΓÑ ¬¡«»¬π "¼δΦ¿", »«º¿µ¿«¡¿α«óáó-│
- │á¬Γ¿ó¡«Ñ «¬¡« │ Φ¿ß∞ ¡á φ½Ñ¼Ñ¡ΓÑ ó »αáó«¼ óÑασ¡Ñ¼ πú-│
- │ │ ½π «¬¡á, ¿½¿ │
- │ │ │
- │ │ äóáªñδ Θѽ¬¡¿ΓÑ ¬¡«»¬«⌐, »«º¿µ¿«¡¿α«-│
- │ │ óáóΦ¿ß∞ ó ßΓα«¬Ñ ºáú«½«ó¬á, ¿½¿ │
- │ │ │
- │ │ êß»«½∞ºπ⌐ΓÑ ¬«¼á¡ñπ Choose│Window│Zoom,│
- │ │ ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φπ F5. │
- └─────────────────────┴────────────────────────────────────────┘
-
-
- B.Pascal 7 & Objects /UG - 38 -
-
- æΓ᫬á ß«ßΓ«∩¡¿∩
- ─────────────────────────────────────────────────────────────────
-
- æΓ᫬á ß«ßΓ«∩¡¿∩ óδó«ñ¿Γß∩ ó ¡¿ª¡Ñ⌐ τáßΓ¿ φ¬αá¡á. Ä¡á óδ»«½-
- ¡∩ÑΓ ß½ÑñπεΘ¿Ñ τÑΓδαÑ Σπ¡¬µ¿¿:
-
- - ¡á»«¼¿¡áÑΓ óá¼ «í «ß¡«ó¡δσ ¿ «»ÑαáΓ¿ó¡δσ ¬½áó¿Φáσ, »α¿¼Ñ-
- ¡¿¼δσ ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ ¬ á¬Γ¿ó¡«¼π «¬¡π;
-
- - ß««íΘáÑΓ, ¬á¬¿Ñ ¼«ª¡« ó¼ÑßΓ« óδí«αá ¬«¼á¡ñ ¼Ñ¡ε ¿ ¡áªáΓ¿∩
- «»ÑαáΓ¿ó¡δσ ¬½áó¿Φ ¿ß»«½∞º«óáΓ∞ ¬¡«»¬¿ "¼δΦ¿";
-
- - ß««íΘáÑΓ, τΓ« ñѽáÑΓ »α«úαá¼¼á, ¡á»α¿¼Ñα, óδó«ñ¿Γ ß««íΘÑ-
- ¡¿Ñ "Saving ¿¼∩_Σá⌐½á" »α¿ ß«σαá¡Ñ¡¿¿ Σá⌐½á αÑñá¬Γ«α«¼;
-
- - »αÑñ½áúáÑΓ ¬αáΓ¬¿Ñ »«∩ߡѡ¿∩ »« ¡Ñ¬«Γ«αδ¼ ¬«¼á¡ñá¼ ¼Ñ¡ε ¿
- φ½Ñ¼Ñ¡Γá¼ ñ¿á½«ú«óδσ «¬«¡.
-
- Åα¿ »ÑαѬ½ετÑ¡¿¿ «¬«¡ ¿½¿ ¿º¼Ñ¡Ñ¡¿¿ óδ»«½¡∩Ѽδσ ñÑ⌐ßΓó¿⌐
- ßΓ᫬á ß«ßΓ«∩¡¿∩ ¿º¼Ñ¡∩ÑΓß∩. ìá¿í«½ÑÑ «íΘ¿⌐ ó¿ñ ßΓ᫬á ß«ßΓ«∩¡¿∩
- ¿¼ÑÑΓ, ¬«úñá óδ ºá»¿ßδóáÑΓÑ ¿½¿ αÑñá¬Γ¿απÑΓÑ »α«úαá¼¼δ ó «¬¡Ñ
- Edit. ¥Γ« »«¬áºá¡« ¡¿ªÑ:
-
- ┌───────────────────────────────────────────────────────────────┐
- │F1 Help F2 Save F3 Open Alt+F9 Compile F9 Make F10 Menu│
- └───────────────────────────────────────────────────────────────┘
- ^ ^ ^ ^ ^ ^
- │ │ │ │ │ │
- æ»αáó¬á æ«σαá¡Ñ¡¿Ñ ÄΓ¬αδΓ¿Ñ è«¼»¿½∩µ¿∩ ö«α¼¿α«óá¡¿Ñ îÑ¡ε
-
- É¿ß. 3.2 Æ¿»¿τ¡á∩ ßΓ᫬á ß«ßΓ«∩¡¿∩.
-
-
-
- B.Pascal 7 & Objects /UG - 39 -
-
- ä¿á½«ú«óδÑ «¬¡á
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ »«ß½Ñ ¬«¼á¡ñδ ¼Ñ¡ε π¬áºá¡« ¼¡«ú«Γ«τ¿Ñ (...), Γ« »« φΓ«⌐
- ¬«¼á¡ñÑ «Γ¬αδóáÑΓß∩ ñ¿á½«ú«ó«Ñ «¬¡«. ä¿á½«ú«ó«Ñ «¬¡« »αÑñ«ßΓáó½∩-
- ÑΓ πñ«í¡δ⌐ ß»«ß«í »α«ß¼«Γαá ¿ πßΓá¡«ó¬¿ ¡áí«αá »áαá¼ÑΓα«ó.
-
- ä½∩ πßΓá¡«ó«¬ º¡áτÑ¡¿⌐ ó ñ¿á½«ú«ó«¼ «¬¡Ñ ¿ß»«½∞ºπÑΓß∩ »∩Γ∞
- «ß¡«ó¡δσ ß»«ß«í«ó π»αáó½Ñ¡¿∩ φ¬αá¡«¼: ¬¡«»¬¿ ß ºáó¿ß¿¼«⌐ Σ¿¬ßᵿ-
- Ñ⌐, ¬«¼á¡ñ¡δÑ ¬¡«»¬¿, ¬¡«»¬¿ ß ¡Ñºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ (»áαá¼ÑΓαδ),
- φ½Ñ¼Ñ¡Γδ (í½«¬¿) óó«ñá ¿ í½«¬¿ ß»¿ß¬á. Åα¿óÑñѼ »α¿¼Ñα Γ¿»¿τ¡«ú«
- ñ¿á½«ú«ó«ú« «¬¡á, ¡á ¬«Γ«α«¼ ¿½½εßΓα¿απεΓß∩ ¡Ñ¬«Γ«αδÑ ¿º φΓ¿σ
- φ½Ñ¼Ñ¡Γ«ó:
-
- ╔═[█]══════════ Æ¿»¿τ¡«Ñ ñ¿á½«ú«ó«Ñ «¬¡« ════════════════════╗
- ║ ║
- ║ ║
- ║ ü½«¬ óó«ñá ü½«¬ ß»¿ß¬á >[▒▒▒OK▒▒▒]<║
- ║ ┌──────────────────────┐ ┌───────────────┐ ║
- ║ │▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒││v│ │¥½Ñ¼Ñ¡Γ 1 ^│ ║
- ║ └──────────────────────┘ │¥½Ñ¼Ñ¡Γ 2 █│ [▒Cancel▒] ║
- ║ │¥½Ñ¼Ñ¡Γ 3 █│ ║
- ║ è¡«»¬¿ ß è¡«»¬¿ ß │¥½Ñ¼Ñ¡Γ 4 █│ ║
- ║ ¡Ñºáó¿ß¿¼«⌐ ºáó¿ß¿¼«⌐ │¥½Ñ¼Ñ¡Γ 5 █│ ║
- ║ Σ¿¬ßᵿÑ⌐ Σ¿¬ßᵿÑ⌐ │¥½Ñ¼Ñ¡Γ 6 █│ ║
- ║ │¥½Ñ¼Ñ¡Γ 7 ▓│ ║
- ║ [X] Åáαá¼. 1 ( ) Åáαá¼. A │¥½Ñ¼Ñ¡Γ 8 █│ ║
- ║ [ ] Åáαá¼. 2 (.) Åáαá¼. B │¥½Ñ¼Ñ¡Γ 9 v│ [▒▒Help▒▒] ║
- ║ [X] Åáαá¼. 3 ( ) Åáαá¼. C └───────────────┘ ║
- ║ [ ] Åáαá¼. 4 ( ) Åáαá¼. D ║
- ║ [ ] Åáαá¼. 5 ║
- ║ ║
- ╚════════════════════════════════════════════════════════════╝
-
- É¿ß. 3.3 Æ¿»¿τ¡«Ñ ñ¿á½«ú«ó«Ñ «¬¡«.
-
- 諼á¡ñ¡δÑ ¬¡«»¬¿
-
- äá¡¡«Ñ ñ¿á½«ú«ó«Ñ «¬¡« ß«ñÑαª¿Γ Γα¿ ßΓá¡ñáαΓ¡δσ ¬«¼á¡ñ¡δσ
- ¬¡«»¬¿: OK, Cancel ¿ Help.
-
- * àß½¿ óδ óδíÑα¿ΓÑ OK (Å«ñΓóÑαªñÑ¡¿Ñ), Γ« óδí«α, ºáñá¡¡δ⌐ ó
- ñ¿á½«ú«ó«¼ «¬¡Ñ, íπñÑΓ ºáΣ¿¬ß¿α«óá¡ ó Borland Pascal.
-
- * àß½¿ óδ óδí¿αáÑΓÑ Cancel (ÄΓ¼Ñ¡á), Γ« ó¡ÑßÑ¡¡δÑ ¿º¼Ñ¡Ñ¡¿∩
- ¿ú¡«α¿απεΓß∩, á ñ¿á½«ú«ó«Ñ «¬¡« «ßΓáÑΓß∩ ¡á φ¬αá¡Ñ.
-
- * éδí«α Help (æ»αáó¬á) »α¿ó«ñ¿Γ ¬ óδó«ñπ ó IDE ß»αáó«τ¡«⌐
- ¿¡Σ«α¼áµ¿¿ »« ñá¡¡«¼π ñ¿á½«ú«ó«¼π «¬¡π. è½áó¿áΓπα¡δ¼ φ¬ó¿-
- óá½Ñ¡Γ«¼ ñ½∩ ¬¡«»¬¿ Cancel óßÑúñá ∩ó½∩ÑΓß∩ ¬½áó¿Φá Esc
- (ñáªÑ Ñß½¿ Cancel ¡Ñ óδó«ñ¿Γß∩).
-
- àß½¿ óδ αáí«ΓáÑΓÑ ß "¼δΦ∞ε", Γ« ¼«ªÑΓÑ »α«ßΓ« Θѽ¬¡πΓ∞ ¬¡«»-
-
- B.Pascal 7 & Objects /UG - 40 -
-
- ¬«⌐, »«º¿µ¿«¡¿α«óáóΦ¿ß∞ ¡á ¡πª¡«⌐ ¬«¼á¡ñ¡«⌐ ¬¡«»¬Ñ. Åα¿ ¿ß»«½∞º«-
- óá¡¿¿ ¬½áó¿áΓπαδ ñ½∩ á¬Γ¿ó¿ºáµ¿¿ φ½Ñ¼Ñ¡Γá (¬¡«»¬¿) ¼«ª¡« ¡áª¿¼áΓ∞
- »«ñßóÑτÑ¡¡δÑ ó ¡Ñ¼ íπ¬óδ. ìá»α¿¼Ñα, ¡áªáΓ¿Ñ íπ¬óδ K »α¿ó«ñ¿Γ ¬
- óδí«απ Σπ¡¬µ¿«¡á½∞¡«⌐ ¬¡«»¬¿ OK. ìáªáΓ¿Ñ Tab ¿½¿ Shift+Tab »α¿ó«-
- ñ¿Γ ¬ »ÑαѼÑΘÑ¡¿ε ó ñ¿á½«ú«ó«¼ «¬¡Ñ ó»ÑαÑñ ¿½¿ ¡áºáñ «Γ «ñ¡«ú«
- π»αáó½∩εΘÑú« φ½Ñ¼Ñ¡Γá ¬ ñαπú«¼π. è«úñá φ½Ñ¼Ñ¡Γ ßΓá¡«ó¿Γß∩ á¬Γ¿ó-
- ¡δ¼, «¡ »«ñßóÑτ¿óáÑΓß∩. àß½¿ ¬¡«»¬á óδíαá¡á, τΓ«íδ ºáñÑ⌐ßΓó«óáΓ∞
- ÑÑ, »α«ßΓ« ¡áª¼¿ΓÑ Enter.
-
- 諼á¡ñ¡á∩ ¬¡«»¬á OK ñ¿á½«ú«ó«ú« «¬¡á ∩ó½∩ÑΓß∩ ¿ß»«½∞ºπѼ«⌐
- »« π¼«½τá¡¿ε. ¥Γ« «º¡áτáÑΓ, τΓ« ñ½∩ óδí«αá ñá¡¡«⌐ ¬¡«»¬¿ ¡πª¡«
- Γ«½∞¬« ¡áªáΓ∞ ¬½áó¿Φπ Enter. (é ß¿ßΓѼáσ ß ¼«¡«σα«¼¡δ¼ ñ¿ß»½ÑѼ
- ¿ß»«½∞ºπѼδÑ »« π¼«½τá¡¿ε ¬¡«»¬¿ π¬áºδóáεΓß∩ ßΓαѽ¬á¼¿, ó ß¿ßΓÑ-
- ¼áσ ß µóÑΓ¡δ¼ ñ¿ß»½ÑѼ «¡¿ »«ñßóÑτ¿óáεΓß∩.) ìπª¡« »«¼¡¿Γ∞ « Γ«¼,
- τΓ« »ÑαÑσ«ñ ¬ ¬«¼á¡ñ¡«⌐ ¬¡«»¬Ñ ß »«¼«Θ∞ε ¬½áó¿Φ¿ Tab ñѽáÑΓ ÑÑ
- ¿ß»«½∞ºπѼ«⌐ »« π¼«½τá¡¿ε.
-
- Åα¿¼Ñτá¡¿Ñ: æ »«¼«Θ∞ε ¬½áó¿Φ¿ Tab óδ ¼«ªÑΓÑ óδíαáΓ∞
- ñαπúπε ¬¡«»¬π. ä½∩ óδí«αá φΓ«⌐ ¬¡«»¬¿ ¡áª¼¿ΓÑ ¬½áó¿Φπ
- Enter.
-
- è¡«»¬¿ ß ºáó¿ß¿¼«⌐ ¿ ¡Ñºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐
-
- é ½εí«⌐ ¼«¼Ñ¡Γ óδ ¼«ªÑΓÑ πßΓá¡«ó¿Γ∞ ½εí«Ñ τ¿ß½« ¬¡«»«¬ ß ¡Ñ-
- ºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐. è«úñá óδ óδí¿αáÑΓÑ ¬¡«»¬π ß ¡Ñºáó¿ß¿¼«⌐ Σ¿¬-
- ßᵿÑ⌐, ó ¡Ñ⌐ »«∩ó½∩ÑΓß∩ ß¿¼ó«½ X, »«¬áºδóáεΘ¿⌐, τΓ« «¡á πßΓá¡«ó-
- ½Ñ¡á. ÅπßΓ«⌐ φ½Ñ¼Ñ¡Γ »«¬áºδóáÑΓ, τΓ« «¡ ¡Ñ πßΓá¡«ó½Ñ¡ (ó䬽ετÑ¡).
-
- éδ ¼«ªÑΓÑ πßΓá¡«ó¿Γ∞ (ó¬½ετ¿Γ∞) ¬¡«»¬π ß ¡Ñºáó¿ß¿¼«⌐ Σ¿¬ßá-
- µ¿Ñ⌐ ΓαѼ∩ ß»«ß«íἿ:
-
- * »«º¿µ¿«¡¿α«óáó ¡á ¡Ñ⌐ ¿½¿ ¡á ÑÑ ΓѬßΓÑ "¼δΦ∞" ¿ Θѽ¬¡πó
- ¬¡«»¬«⌐;
-
- * ¡áª¿¼á∩ ¬½áó¿Φπ Tab (¿ ¬½áó¿Φ¿ ßΓαѽ«¬), »«¬á ¡Ñ íπñÑΓ
- »«ñßóÑτÑ¡á ¡πª¡á∩ ¬¡«»¬á ß ¡Ñºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ (¿½¿ ÑÑ
- úαπ»»á), á ºáΓѼ ¡áªáó ¬½áó¿Φπ »α«íѽá.
-
- * ¡áªáó »«ñßóÑτÑ¡¡πε ó ΓѬßΓÑ íπ¬óπ.
-
- ìá ¼«¡«σα«¼¡δσ ¼«¡¿Γ«αáσ IDE «Γ¼ÑτáÑΓ á¬Γ¿ó¡πε ¬¡«»¬π ß ¡Ñ-
- ºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ ß¿¼ó«½«¼ >> »«ß½Ñ φΓ«⌐ ¬¡«»¬¿. Åα¿ ¡áªáΓ¿¿
- ¬½áó¿Φ¿ Tab ß¿¼ó«½ >> »ÑαѼÑΘáÑΓß∩ ¬ ß½ÑñπεΘÑ⌐ úαπ»»Ñ ¬¡«»«¬ ß
- ºáó¿ß¿¼«⌐ ¿½¿ ¡Ñºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐.
-
- Åα¿¼Ñτá¡¿Ñ: è¡«»¬¿ ß ºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ ¡áºδóáεΓß∩ Γá¬
- »«Γ«¼π, τΓ« «¡¿ ñÑ⌐ßΓóπεΓ, ¬á¬ úαπ»»á ¬¡«»«¬, úñÑ ¡áªáΓ∞ ó
- ¬áªñδ⌐ ¼«¼Ñ¡Γ ¼«ª¡« Γ«½∞¬« «ñ¡π ¬¡«»¬π (¬á¬ »α¿ óδí«αÑ ΓÑ-
- ½Ñ¬á¡á½á). Åα¿ ¡áªáΓ¿¿ ¬¡«»¬¿ »αѪ¡∩∩ ¡áªáΓá∩ ¬¡«»¬á ó«ºó-
- αáΘáÑΓß∩ ó ¿ßσ«ñ¡«Ñ »«½«ªÑ¡¿Ñ.
-
- è¡«»¬¿ ß ºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ «Γ½¿τáεΓß∩ «Γ ¬¡«»«¬ ß ¡Ñºáó¿-
- ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ ΓѼ, τΓ« «¡¿ »αÑñßΓáó½∩εΓ óºá¿¼«¿ß¬½ετáεΘ¿Ñ ó«º-
-
- B.Pascal 7 & Objects /UG - 41 -
-
- ¼«ª¡«ßΓ¿ óδí«αá. Å« φΓ«⌐ »α¿τ¿¡Ñ ¬¡«»¬¿ ß ºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐
- óßÑúñá óδó«ñ∩Γß∩ ó ó¿ñÑ úαπ»»δ, ¿ ó ½εí«⌐ úαπ»»Ñ ó ¬áªñδ⌐ ¼«¼Ñ¡Γ
- ¼«ª¡« óδíαáΓ∞ Γ«½∞¬« «ñ¡π ¬¡«»¬π.
-
- æπΘÑßΓóπÑΓ Γα¿ ß»«ß«íá óδí«αá ¬¡«»«¬ ß ºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐:
-
- * Θѽ¬¡¿ΓÑ ¡á ¡Ñ⌐ ¿½¿ ÑÑ ΓѬßΓÑ ¬¡«»¬«⌐ "¼δΦ¿";
-
- * ¡áíÑα¿ΓÑ »«ñßóÑτÑ¡¡πε ó ß««ΓóÑΓßΓóπεΘѼ ΓѬßΓÑ íπ¬óπ;
-
- * ¡áª¿¼á⌐ΓÑ ¬½áó¿Φπ Tab, »«¬á úαπ»»á ¡Ñ íπñÑΓ »«ñßóÑτÑ¡á, á
- ºáΓѼ ñ½∩ óδí«αá ¬«¡¬αÑΓ¡«⌐ ¬¡«»¬¿ ¿ß»«½∞ºπ⌐ΓÑ ¬½áó¿Φ¿ π»-
- αáó½Ñ¡¿∩ ¬παß«α«¼: ñ½∩ óδσ«ñá ¿º úαπ»»δ ß ¡«óδ¼ óδíαá¡¡δ¼
- Σπ¡¬µ¿«¡á½∞¡δ¼ »ÑαѬ½ετáΓѽѼ ¡áª¼¿ΓÑ ¬½áó¿Φπ Tab ¿½¿
- Shift+Tab.
-
- ü½«¬¿ óó«ñá
-
- ü½«¬ óó«ñá - φΓ« ëà φ½Ñ¼Ñ¡Γ, ó ¬«Γ«α«¼ óδ ¼«ªÑΓÑ óó«ñ¿Γ∞ ó
- ßó«ε »α¿¬½áñ¡πε »α«úαá¼¼π ΓѬßΓ. é φ½Ñ¼Ñ¡Γáσ (»«½∩σ) óó«ñá ¼«ª¡«
- ¿ß»«½∞º«óáΓ∞ í«½∞Φ¿¡ßΓó« «ß¡«ó¡δσ ¬½áó¿Φ αÑñá¬Γ¿α«óá¡¿∩, ¡á»α¿-
- ¼Ñα, ¬½áó¿Φ¿ ßΓαѽ«¬, Home, End ¿ »ÑαѬ½ετáΓѽ∞ óßΓáó¬¿/ºá¼Ñ¡δ
- Ins. àß½¿ óδ »α«ñ«½ªáÑΓÑ ¡áí¿αáΓ∞ ΓѬßΓ »α¿ ñ«ßΓ¿ªÑ¡¿¿ ¬«¡µá φ½Ñ-
- ¼Ñ¡Γá óó«ñá, Ñú« ß«ñÑন¼«Ñ íπñÑΓ áóΓ«¼áΓ¿τÑ߬¿ »α«¬απτ¿óáΓ∞ß∩.
- àß½¿ ó φ½Ñ¼Ñ¡ΓÑ ¿¼ÑÑΓß∩ í«½∞ΦÑ ΓѬßΓá, τѼ »«¬áºá¡«, Γ« ¡á ¬«¡µáσ
- Ñú« óδó«ñ∩Γß∩ ºá¬αáΦÑ¡¡δÑ ßΓαѽ¬¿ (< ¿ >). ä½∩ »α«¬απΓ¬¿ ΓѬßΓá
- óδ ¼«ªÑΓÑ »«º¿µ¿«¡¿α«óáΓ∞ß∩ ¡á φΓ¿σ ßΓαѽ¬áσ ¿ Θѽ¬¡πΓ∞ ¬¡«»¬«⌐
- "¼δΦ¿".
-
- àß½¿ óá¼ ΓαÑíπÑΓß∩ óóÑßΓ¿ ó í½«¬Ñ óó«ñá π»αáó½∩εΘ¿Ñ ß¿¼ó«½δ
- (ΓᬿÑ, ¬á¬ ^L ¿½¿ ^M), Γ« »ÑαÑñ φΓ¿¼¿ ß¿¼ó«½á¼¿ ¡πª¡« π¬áºáΓ∞
- »αÑΣ¿¬ß¡δ⌐ ß¿¼ó«½ ^P. Å«φΓ«¼π, ¡á»α¿¼Ñα, ñ½∩ óó«ñá ^L ó »«½Ñ óó«-
- ñá ¡πª¡« ¿ß»«½∞º«óáΓ∞ »«ß½Ññ«óáΓѽ∞¡«ßΓ∞ ^P^L. ¥Γ« »«½Ñº¡« »α¿¼Ñ-
- ¡∩Γ∞ »α¿ óó«ñÑ ßΓ᫬.
-
- àß½¿ ß»αáóá «Γ í½«¬á óó«ñá π¬áºδóáÑΓß∩ ß¿¼ó«½ ßΓαѽ¬¿ 󡿺,
- Γ« ß φΓ¿¼ φ½Ñ¼Ñ¡Γ«¼ ßó∩ºá¡ »α«Γ«¬«½ óó«ñá. ä½∩ »α«ß¼«Γαá »α«Γ«¬«-
- ½á ¿ß»«½∞ºπ⌐ΓÑ ¬½áó¿Φπ ß« ßΓαѽ¬«⌐ 󡿺, á óδíαáó ¡πª¡δ⌐ φ½Ñ¼Ñ¡Γ
- ¿º ß»¿ß¬á, ¡áª¼¿ΓÑ Enter. é ß»¿ß¬Ñ (»α«Γ«¬«½Ñ) óδó«ñ¿Γß∩ óÑß∞
- ΓѬßΓ, ¬«Γ«αδ⌐ óδ ¡áí¿α὿ ó φ½Ñ¼Ñ¡ΓÑ óó«ñá αá¡ÑÑ. àß½¿ óδ σ«Γ¿ΓÑ
- ºá¡«ó« ¡áíαáΓ∞ ΓѬßΓ, ¬«Γ«αδ⌐ πªÑ íδ½ óóÑñÑ¡, ¡áª¼¿ΓÑ ¬½áó¿Φπ
- ßΓαѽ¬¿ 󡿺 ¿½¿ Θѽ¬¡¿ΓÑ ¬¡«»¬«⌐ "¼δΦ¿" ¡á ß¿¼ó«½Ñ "ßΓαѽ¬á
- 󡿺". ¡« Γá¬ªÑ αÑñá¬Γ¿α«óáΓ∞ ºá»¿ß∞ ¿º »α«Γ«¬«½á. ä½∩ óδσ«ñá
- ¿º ß»¿ß¬á »α«Γ«¬«½á íѺ óδí«αá ¡áª¼¿ΓÑ ¬½áó¿Φπ Esc.
-
- Åα¿óÑñѼ »α¿¼Ñα »α«Γ«¬«½á ñ½∩ φ½Ñ¼Ñ¡Γá Find text (Å«¿ß¬
- ΓѬßΓá). àß½¿ óδ αá¡ÑÑ ¿ß»«½∞º«ó὿ Ñú« ßѼ∞ αáº, «¡ ¼«ªÑΓ óδú½∩-
- ñÑΓ∞ ß½ÑñπεΘ¿¼ «íαẫ¼:
-
-
- B.Pascal 7 & Objects /UG - 42 -
-
- ┌─────────────────────┐┌───┐
- Text to find │▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒││ v │
- └─────────────────────┘└───┘
- ╔═════════════════════════╗
- ║ date = record ^
- ║ Writeln(' ▒
- ║ string[7] ▒
- ║ { █
- ║ AbortCode v
- ╚═════════════════════════╝
-
- É¿ß. 3.4 Åα¿¼Ñα »α«Γ«¬«½á ó ñ¿á½«ú«ó«¼ í½«¬Ñ.
-
- ü½«¬¿ ß»¿ß¬á
-
- é« ¼¡«ú¿σ ñ¿á½«ú«óδσ «¬¡áσ »α¿ßπΓßΓóπÑΓ ÑΘÑ «ñ¿¡ ¬«¼»«¡Ñ¡Γ -
- í½«¬ ß»¿ß¬á. ¥Γ«Γ ß»¿ß«¬ »«ºó«½∩ÑΓ óá¼ »α«ß¼áΓα¿óáΓ∞ ¿ óδí¿αáΓ∞
- ºá»¿ß∞ ¿º ß»¿ß¬á »ÑαѼѡ¡«⌐ ñ½¿¡δ, ¡Ñ óδσ«ñ∩ ¿º ñ¿á½«ú«ó«ú« «¬¡á.
- àß½¿ ó ß»¿ß¬Ñ »«∩ó½∩ÑΓß∩ ¼ÑαµáεΘ¿⌐ ¬παß«α ¿ óδ σ«Γ¿ΓÑ τΓ«-Γ« ¡á⌐-
- Γ¿, ¼«ª¡« óóÑßΓ¿ ß½«ó« (¿½¿ Ñú« »ÑαóδÑ íπ¬óδ), »«ß½Ñ τÑú« IDE óδ-
- »«½¡¿Γ Ñú« »«¿ß¬.
-
- Ç¬Γ¿ó¿º¿α«óáΓ∞ í½«¬ ß»¿ß¬á ¼«ª¡« Θѽ¬¡πó ¡á ¡Ñ¼ ¬¡«»¬«⌐ "¼δ-
- Φ¿" ¿½¿ óδíαáó »«ñßóÑτÑ¡¡πε íπ¬óπ ºáú«½«ó¬á ß»¿ß¬á (½¿í« ¡áªáΓ∞
- ¬½áó¿Φπ Tab ¿½¿ ¬½áó¿Φ¿ π»αáó½Ñ¡¿∩ ¬παß«α«¼, »«¬á «¡ ¡Ñ íπñÑΓ
- »«ñßóÑτÑ¡). Å«ß½Ñ óδó«ñá ß»¿ß¬á ñ½∩ Ñú« »α«ß¼«Γαá ¼«ª¡« ¿ß»«½∞º«-
- óáΓ∞ »«½«ßπ »α«¬απΓ¬¿ ¿½¿ ¬½áó¿Φ¿ ßΓαѽ«¬ (óóÑασ ¿ ó¡¿º) ¡á ¬½á-
- ó¿áΓπαÑ.
-
- ÆÑ»Ñα∞ óδ »«º¡á¬«¼¿½¿ß∞ ß «ß¡«ó¡δ¼¿ »«¡∩Γ¿∩¼¿ ¿ß»«½∞º«óá¡¿∩
- IDE ¿ ú«Γ«óδ ¿ß»«½∞º«óáΓ∞ ¿¡ΓÑúα¿α«óá¡¡πε ßαÑñπ ñ½∩ αáºαáí«Γ¬¿
- »α¿¬½áñ¡δσ »α«úαá¼¼. æ¼. ß½ÑñπεΘπε ú½áóπ - "Åα«úαá¼¼¿α«óá¡¿Ñ ó
- ¿¡ΓÑúα¿α«óá¡¡«⌐ ¿¡ΓÑαá¬Γ¿ó¡«⌐ ßαÑñÑ ñ½∩ DOS".
-
- B.Pascal 7 & Objects /UG - 43 -
-
- ────────────────────────────────────────────────────────────────────────────
- â½áóá 4. Åα«úαá¼¼¿α«óá¡¿Ñ ó
- ¿¡ΓÑúα¿α«óá¡¡«⌐ ¿¡ΓÑαá¬Γ¿ó¡«⌐ ßαÑñÑ ñ½∩ DOS
- ─────────────────────────────────────────────────────────────────
-
- Åα¿ αáºαáí«Γ¬Ñ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñÑ
- IDE óδ ¼«ªÑΓÑ óδ»«½¡∩Γ∞ ß½ÑñπεΘ¿Ñ «ß¡«ó¡δÑ ºáñáτ¿:
-
- * ºá»π߬áΓ∞ IDE ¿ óδσ«ñ¿Γ∞ ¿º ¡ÑÑ;
- * ºá»¿ßδóáΓ∞ ¿ αÑñá¬Γ¿α«óáΓ∞ ßó«⌐ ¿ßσ«ñ¡δ⌐ ¬«ñ;
- * αáí«ΓáΓ∞ ß Σá⌐½á¼¿ («Γ¬αδóáΓ∞, ºá¬αδóáΓ∞ ¿ ß«σαá¡∩Γ∞ ¿σ);
- * ¬«¼»¿½¿α«óáΓ∞ ¿ óδ»«½¡∩Γ∞ ßó«¿ »α«úαá¼¼δ;
- * «Γ½áª¿óáΓ∞ »α«úαá¼¼δ;
- * »α«ß¼áΓα¿óáΓ∞ ¿ßσ«ñ¡δ⌐ ¬«ñ;
- * ¡áßΓαá¿óáΓ∞ »« ßó«Ñ¼π πß¼«ΓαÑ¡¿ε ¬«¡Σ¿úπαᵿε IDE;
- * π»αáó½∩Γ∞ »α«úαá¼¼¡δ¼¿ »α«Ñ¬ΓἿ.
-
- äá¡¡á∩ ú½áóá ñáÑΓ «ß¡«ó¡δÑ »«¡∩Γ¿∩ »« ¬áªñ«⌐ ¿º »ÑαÑτ¿ß½Ñ¡-
- ¡δσ ΓѼ, ºá ¿ß¬½ετÑ¡¿Ñ¼ «Γ½áñ¬¿ »α«úαá¼¼δ (« ¬«Γ«α«⌐ αáß߬áºδóá-
- ÑΓß∩ ó â½áóÑ 6 "ÄΓ½áñ¬á ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñÑ").
-
-
- çá»π߬ IDE ¿ óδσ«ñ ¿º ¡ÑÑ
- ─────────────────────────────────────────────────────────────────
-
- ÅÑαÑ⌐ñ¿ΓÑ ó »«ñ¬áΓὫú Borland Pascal, ß«ºñá¡¡δ⌐ óἿ ß »«-
- ¼«Θ∞ε »α«úαá¼¼δ Install. Äíδτ¡« φΓ¿¼ ¬áΓὫú«¼ ∩ó½∩ÑΓß∩ ¬áΓὫú
- C:\BP\BIN. ùΓ«íδ ºá»πßΓ¿Γ∞ IDE ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á, óóÑñ¿ΓÑ ¬«¼á¡-
- ñπ:
-
- BP
-
- öá⌐½δ DPMI16BI.OVL ¿ RTM.EXE ñ«½ª¡δ ¡áσ«ñ¿Γ∞ß∩ ó ΓѬπΘѼ ¬á-
- ΓὫúÑ »« óáΦѼπ ¼áαΦαπΓπ, ¿¡áτÑ BP.EXE ¡Ñ ºá»πßΓ¿Γß∩.
-
- ùΓ«íδ ºá»πßΓ¿Γ∞ IDE, αáí«ΓáεΘπε ó αÑá½∞¡«¼ αѪ¿¼Ñ, óóÑñ¿ΓÑ
- ¬«¼á¡ñπ:
-
- TURBO
-
- é¼ÑßΓÑ ß ¬«¼á¡ñἿ ñ½∩ ºá»π߬á IDE óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞
- «ñ¿¡ ¿½¿ í«½ÑÑ »áαá¼ÑΓα«ó ¿ ¿¼Ñ¡ Σá⌐½«ó.
-
-
- Åáαá¼ÑΓαδ ºá»π߬á
- ─────────────────────────────────────────────────────────────────
-
- Åα¿ ºá»π᪥ IDE óδ ¼«ªÑΓÑ π¬áºδóáΓ∞ »áαá¼ÑΓαδ ºá»π߬á. ¥Γ¿
-
- B.Pascal 7 & Objects /UG - 44 -
-
- »áαá¼ÑΓαδ ºá»πß¬á ¿¼ÑεΓ ß½ÑñπεΘ¿⌐ ß¿¡Γá¬ß¿ß:
-
- BP[/»áαá¼ÑΓαδ][Σá⌐½δ]
- ¿½¿
- TURBO[/»áαá¼ÑΓαδ][Σá⌐½δ]
-
- ô¬áºá¡¿Ñ »«ß½Ñ »áαá¼ÑΓαá ß¿¼ó«½á + ¿½¿ »α«íѽá ó¬½ετáÑΓ Ñú«,
- π¬áºá¡¿Ñ ß¿¼ó«½á - «Γ¬½ετáÑΓ. ìá»α¿¼Ñα:
-
- BP /G /P- myfile
-
- ºá»π߬áÑΓ IDE, «Γ¬αδóáÑΓ «¬¡« αÑñá¬Γ¿α«óá¡¿∩, óδó«ñ∩ ó ¡Ñ¼ Σá⌐½
- MYFILE, αáºαÑΦáÑΓ ß«σαá¡Ñ¡¿Ñ úαáΣ¿τÑ߬«⌐ »á¼∩Γ¿ ¿ ºá»αÑΘáÑΓ »Ñ-
- αѬ½ετÑ¡¿⌐ »á½¿Γα.
-
- é¼ÑßΓ« ß¿¼ó«½á ¬«ß«⌐ τÑαΓδ (/) »ÑαÑñ »áαá¼ÑΓα«¼ óδ ¼«ªÑΓÑ
- ¿ß»«½∞º«óáΓ∞ ¼¿¡πß (-). ìá»α¿¼Ñα:
-
- BP -G -P- myfile
-
- ìѬ«Γ«αδÑ »áαá¼ÑΓαδ ºá»πß¬á »α¿¼Ñ¡∩εΓß∩ Γ«½∞¬« ¬ IDE αÑá½∞-
- ¡«ú« αѪ¿¼á - TURBO.EXE. é φΓ«¼ ß½πτáÑ »áαá¼ÑΓα »«¼ÑτÑ¡ ß½«óἿ
- "(Γ«½∞¬« TURBO)". äóá »áαá¼ÑΓαá »α¿¼Ñ¡∩εΓß∩ ¬ IDE ºáΘ¿ΘÑ¡¡«ú« αÑ-
- ª¿¼á - BP.EXE. é φΓ«¼ ß½πτáÑ »áαá¼ÑΓα »«¼ÑτÑ¡ ß½«óἿ (Γ«½∞¬«
- BP).
-
- Åáαá¼ÑΓα /C
-
- àß½¿ óδ ¿ß»«½∞ºπÑΓÑ »áαá¼ÑΓα /C, ºá ¬«Γ«αδ¼ íѺ »α«íѽá ß½Ñ-
- ñπÑΓ ¿¼∩ Σá⌐½á ¬«¡Σ¿úπαᵿ¿, Γ« IDE »α¿ ºá»π᪥ ºáúαπªáÑΓ φΓ«Γ
- Σá⌐½ ¬«¡Σ¿úπαᵿ¿. ìá»α¿¼Ñα:
-
- TURBO /Cmyconfig
-
- Ä Σá⌐½áσ ¬«¡Σ¿úπαᵿ¿ αáß߬áºδóáÑΓß∩ ¡¿ªÑ.
-
- Åáαá¼ÑΓα /D
-
- àß½¿ óδ π¬áªÑΓÑ »áαá¼ÑΓα /D, IDE ß¼«ªÑΓ «ñ¡«óαѼѡ¡« αáí«-
- ΓáΓ∞ ß ñóπ¼∩ ¼«¡¿Γ«αἿ. IDE »α«óÑα∩ÑΓ, ¿¼ÑÑΓß∩ ½¿ ¡á óáΦѼ
- ¬«¼»∞εΓÑαÑ ß««ΓóÑΓßΓóπεΘÑÑ «í«απñ«óá¡¿Ñ, ¡á»α¿¼Ñα, ¼«¡«σα«¼¡á∩ ¿
- µóÑΓ¡á∩ »½áΓá. àß½¿ φΓ« ¡Ñ Γá¬, Γ« IDE ¿ú¡«α¿απÑΓ ñá¡¡δ⌐ »áαá-
- ¼ÑΓα. ÉѪ¿¼ ß ñóπ¼∩ ¼«¡¿Γ«αἿ »«½Ñº¡« ¿ß»«½∞º«óáΓ∞ »α¿ «Γ½áñ¬Ñ
- »α«úαá¼¼δ. Äñ¿¡ ¼«¡¿Γ«α óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ¬á¬ φ¬αá¡ óδó«ñ¿-
- ¼δσ »α«úαá¼¼«⌐ ñá¡¡δσ, á ñαπú«⌐ - ñ½∩ αáí«Γδ ß «Γ½áñτ¿¬«¼. êß-
- »«½∞ºπ∩ ñóá ¼«¡¿Γ«αá, óδ ¼«ªÑΓÑ Γá¬ªÑ óδ⌐Γ¿ ó ¬«¼á¡ñ¡δ⌐ »α«µÑßß«α
- DOS (File│Shell to DOS), ΓᬠτΓ« ¡á «ñ¡«¼ φ¬αá¡Ñ íπñÑΓ óδó«ñ¿Γ∞ß∩
- IDE, á ñαπú«⌐ ñáÑΓ óá¼ ñ«ßΓπ» ¬ ¬«¼á¡ñ¡«⌐ ßΓα«¬Ñ DOS.
-
- àß½¿ ß¿ßΓÑ¼á ¿¼ÑÑΓ ñóá ¼«¡¿Γ«αá, DOS ¿¡ΓÑα»αÑΓ¿απÑΓ «ñ¿¡ ¼«-
- ¡¿Γ«α ¬á¬ á¬Γ¿ó¡δ⌐ ¼«¡¿Γ«α. ä½∩ »ÑαѬ½ετÑ¡¿∩ ¼Ñªñπ ñóπ¼∩ ¼«¡¿Γ«-
- αἿ ¼«ª¡« ¿ß»«½∞º«óáΓ∞ ¬«¼á¡ñπ DOS MODE. ìá»α¿¼Ñα, MODE CJ80 á¬-
-
- B.Pascal 7 & Objects /UG - 45 -
-
- Γ¿ó¿º¿απÑΓ µóÑΓ¡«⌐ ¼«¡¿Γ«α, á MODE MONO á¬Γ¿ó¿º¿απÑΓ ¼«¡«σα«¼¡δ⌐
- ¼«¡¿Γ«α. é αѪ¿¼Ñ ß ñóπ¼∩ ¼«¡¿Γ«αἿ «íδτ¡δ⌐ φ¬αá¡ IDE óδó«ñ¿Γß∩
- ¡á ¡Ñá¬Γ¿ó¡«¼ ¼«¡¿Γ«αÑ, á óδó«ñ »α«úαá¼¼δ »«ßΓπ»áÑΓ ¡á á¬Γ¿ó¡δ⌐
- ¼«¡¿Γ«α.
-
- Å«φΓ«¼π ¬«úñá óδ ¡á «ñ¡«¼ ¼«¡¿Γ«αÑ ¡áí¿αáÑΓÑ ó «ΓóÑΓ ¡á
- »«ñ߬Ậπ DOS BP /D ¿½¿ TURBO /D, IDE óδó«ñ¿Γß∩ ¡á ñαπú«¼ ¼«¡¿Γ«-
- αÑ. è«úñá óδ σ«Γ¿ΓÑ »α«óÑα¿Γ∞ »α«úαá¼¼π ¡á ¬«¡¬αÑΓ¡«¼ ¼«¡¿Γ«αÑ,
- óδ⌐ñ¿ΓÑ ¿º IDE, »ÑαѬ½ετ¿ΓÑ á¬Γ¿ó¡δ⌐ ¼«¡¿Γ«α ¡á Γ«Γ, ¡á ¬«Γ«α«¼
- óδ σ«Γ¿ΓÑ ÑÑ »α«óÑα¿Γ∞, á ºáΓѼ ß¡«óá ñá⌐ΓÑ ¬«¼á¡ñπ BP /D ¿½¿
- TURBO /D. éδó«ñ »α«úαá¼¼δ ºáΓѼ íπñÑΓ »«ßΓπ»áΓ∞ ¡á ëà ¼«¡¿Γ«α,
- úñÑ óδ ¡áíα὿ ¬«¼á¡ñπ.
-
- Åα¿ ¿ß»«½∞º«óá¡¿¿ ¬«¼á¡ñδ /D ß½ÑñπÑΓ ¿¼ÑΓ∞ ó ó¿ñπ ß½ÑñπεΘÑÑ:
-
- * ìÑ ¿º¼Ñ¡∩⌐ΓÑ á¬Γ¿ó¡δ⌐ ¼«¡¿Γ«α (¿ß»«½∞ºπ∩, ¡á»α¿¼Ñα, ¬«¼á¡-
- ñπ DOS MODE), ¬«úñá óδ ¡áσ«ñ¿ΓÑß∞ ó ¬«¼á¡ñ¡«¼ »α«µÑßß«αÑ
- DOS (File│DOS Shell).
-
- * Å«½∞º«óáΓѽ∞߬¿Ñ »α«úαá¼¼δ, ¿ß»«½∞ºπεΘ¿Ñ »α∩¼«⌐ ñ«ßΓπ» ¬
- »«αΓá¼ ó¿ñÑ«»½áΓδ ¡Ñá¬Γ¿ó¡«ú« ¼«¡¿Γ«αá, ¡Ñ »«ññÑনóáεΓß∩
- ¿ ¼«úπΓ ñáΓ∞ ¡Ñ»αÑñ߬áºπѼδÑ αѺπ½∞ΓáΓδ.
-
- * è«úñá óδ óδ»«½¡∩ÑΓÑ ¿½¿ «Γ½áª¿óáÑΓÑ »α«úαá¼¼δ, ¬«Γ«αδÑ ∩ó-
- ¡δ¼ «íαẫ¼ ¿ß»«½∞ºπεΓ ñóá ¼«¡¿Γ«αá, ¡Ñ π¬áºδóá⌐ΓÑ »áαá-
- ¼ÑΓα /D.
-
- Åáαá¼ÑΓα /E (Γ«½∞¬« TURBO)
-
- êß»«½∞ºπ⌐ΓÑ »áαá¼ÑΓα /E ñ½∩ ¿º¼Ñ¡Ñ¡¿∩ αẼÑαá ñ¿¡á¼¿τÑ߬¿
- αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿ »á¼∩Γ¿ αÑñá¬Γ«αá. Å« π¼«½τá¡¿ε ÑÑ αẼÑα
- αáóÑ¡ 28è (¼¿¡¿¼á½∞¡á∩ πßΓá¡«ó¬á). îá¬ß¿¼á½∞¡«Ñ º¡áτÑ¡¿Ñ - 128è.
- ÉẼÑα ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿ »á¼∩Γ¿, »αÑóδΦáεΘ¿⌐
- 28è, π½πτΦáÑΓ »α«¿ºó«ñ¿Γѽ∞¡«ßΓ∞ IDE Γ«½∞¬« ó Γ«¼ ß½πτáÑ, Ñß½¿ óδ
- ¿ß»«½∞ºπÑΓÑ ó ¬áτÑßΓóÑ πßΓα«⌐ßΓóá ßó«»¿¡úá ¼Ññ½Ñ¡¡δ⌐ ñ¿ß¬. àß½¿ π
- óáß ÑßΓ∞ »á¼∩Γ∞ EMS ¿½¿ óδ αẼÑßΓ¿½¿ Σá⌐½ ßó«»¿¡úá ¡á ó¿αΓπá½∞-
- ¡«¼ ñ¿ß¬Ñ (ß¼. »áαá¼ÑΓα /S), ¡Ñ ¿º¼Ñ¡∩⌐ΓÑ ¿ß»«½∞ºπѼδ⌐ »« π¼«½τá-
- ¡¿ε »áαá¼ÑΓα.
-
- Åáαá¼ÑΓα /F (Γ«½∞¬« BP)
-
- æ »«¼«Θ∞ε »áαá¼ÑΓαá /F óδ ¼«ªÑΓÑ ºáñáΓ∞ Σá⌐½ ßó«»¿¡úá ñ½∩
- áñ¼¿¡¿ßΓαáΓ«αá Borland Pascal φΓá»á óδ»«½¡Ñ¡¿∩ (RTM.EXE). ìá»α¿-
- ¼Ñα, Ñß½¿ óδ ¬«¼»¿½¿απÑΓÑ »α¿¬½áñ¡πε »α«úαá¼¼π, ¬«Γ«αá∩ ΓαÑíπÑΓ 4
- ¼Ñúáíá⌐Γá »á¼∩Γ¿, ¡« ¡á óáΦѼ ¬«¼»∞εΓÑαÑ ñ«ßΓπ»¡« Γ«½∞¬« ñóá ¼Ñ-
- úáíá⌐Γá, Γ« óδ ¼«ªÑΓÑ ºáñáΓ∞ Σá⌐½ ßó«»¿¡úá 4-¼Ñúáíá⌐Γ¡«⌐ ó¿αΓπ-
- á½∞¡«⌐ »á¼∩Γ¿; óáΦá »α¿¬½áñ¡á∩ »α«úαá¼¼á »«½πτ¿Γ ¡Ñ«íσ«ñ¿¼πε Ñ⌐
- ñ½∩ ¬«¼»¿½∩µ¿¿ »á¼∩Γ∞. ä½∩ Σá⌐½á ßó«»¿¡úá ñ«»πßΓ¿¼δ αẼÑαδ «Γ
- 1024è ñ« 16384è. é ß½ÑñπεΘѼ »α¿¼ÑαÑ ºáñáÑΓß∩ Σá⌐½ ßó«»¿¡úá ó 2
- ¼Ñúáíá⌐Γá:
-
- BP /F2048
-
-
- B.Pascal 7 & Objects /UG - 46 -
-
- è«úñá óá¼ í«½∞ΦÑ ¡Ñ ¡πªÑ¡ íπñÑΓ Σá⌐½ ßó«»¿¡úá ó¿αΓπá½∞¡«⌐
- »á¼∩Γ¿, ó䬽ετ¿ΓÑ φΓ« »áαá¼ÑΓα, ºáñáó Σá⌐½ ¡π½Ñó«ú« αẼÑαá:
-
- BP /F0
-
- Åáαá¼ÑΓα /G
-
- êß»«½∞ºπ⌐ΓÑ »áαá¼ÑΓα /G ñ½∩ αáºαÑΦÑ¡¿∩ »«½¡«ú« ß«σαá¡Ñ¡¿∩
- úαáΣ¿τÑ߬«⌐ »á¼∩Γ¿, »α¿ «Γ½áñ¬Ñ úαáΣ¿τÑ߬¿σ »α«úαá¼¼ ó ß¿ßΓѼáσ ß
- EGA, VGA ¿½¿ MCGA. Åα¿ ó¬½ετÑ¡¿¿ ß«σαá¡Ñ¡¿∩ úαáΣ¿τÑ߬«ú« φ¬αá¡á
- (Graphics Screen Save) IDE αѺÑαó¿απÑΓ ñ«»«½¡¿Γѽ∞¡δÑ 8 ¬¿½«íá⌐Γ
- ñ½∩ íπΣÑαá, ¬«Γ«αδ⌐ αẼÑΘáÑΓß∩ ó EMS (»α¿ ÑÑ ñ«ßΓπ»¡«ßΓ¿).
-
- Åáαá¼ÑΓα /L
-
- êß»«½∞ºπ⌐ΓÑ »áαá¼ÑΓα /L, Ñß½¿ óδ αáí«ΓáÑΓÑ ß IDE ¡á ª¿ñ¬«¬-
- α¿ßΓá½½¿τÑ߬«¼ ¿½¿ »½áº¼Ñ¡¡«¼ φ¬αá¡Ñ.
-
- Åáαá¼ÑΓα /N
-
- êß»«½∞ºπ⌐ΓÑ »áαá¼ÑΓα /N ñ½∩ αáºαÑΦÑ¡¿∩ ¿½¿ ºá»αÑΓá »α«óÑન
- ¡á »«¼Ñσ¿ ¡á áñá»ΓÑαÑ CGA. àß½¿ óδ αáí«ΓáÑΓÑ ß áñá»ΓÑα«¼ CGA, ¬«-
- Γ«αδ⌐ ¡Ñ ñáÑΓ ¡á φ¬αá¡Ñ »«¼Ñσ¿ ("ß¡Ñú") »α¿ «í¡«ó½Ñ¡¿¿ ¿º«íαáªÑ-
- ¡¿∩, ºá»αÑΓ¿ΓÑ ñá¡¡δ⌐ »áαá¼ÑΓα. àß½¿ óδ ¡Ñ αáí«ΓáÑΓÑ ß CGA, φΓ«Γ
- »áαá¼ÑΓα ¡Ñ ñÑ⌐ßΓóπÑΓ.
-
- Åáαá¼ÑΓα /O (Γ«½∞¬« TURBO)
-
- êß»«½∞ºπ⌐ΓÑ »áαá¼ÑΓα /O ñ½∩ ¿º¼Ñ¡Ñ¡¿∩ αẼÑαá «óÑα½Ñ⌐¡«⌐ ñ¿-
- ¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿ IDE. Å« π¼«½τá¡¿ε ¡áº¡áτáÑΓß∩
- αẼÑα 90è. àß½¿ π óáß ÑßΓ∞ EMS, Γ« óδ ¼«ªÑΓÑ π¼Ñ¡∞Φ¿Γ∞ αẼÑα
- «óÑα½Ñ⌐¡«⌐ ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿, ¡Ñ πσπñΦá∩ »α«¿ºó«-
- ñ¿Γѽ∞¡«ßΓ¿ IDE ¿ «ßó«í«ñ¿ó ñ«»«½¡¿Γѽ∞¡πε »á¼∩Γ¿ ñ½∩ ¬«¼»¿½∩µ¿¿
- ¿ «Γ½áñ¬¿ »α«úαá¼¼.
-
- Åáαá¼ÑΓα /P
-
- êß»«½∞ºπ⌐ΓÑ »áαá¼ÑΓα /P, π»αáó½∩εΘ¿⌐ »ÑαѬ½ετÑ¡¿Ñ¼ »á½¿Γα ¡á
- ó¿ñÑ«áñá»ΓÑαÑ EGA, ¬«úñá óáΦá »α«úαá¼¼á ¼«ñ¿Σ¿µ¿απÑΓ αÑú¿ßΓαδ »á-
- ½¿Γαδ. Å὿Γαá EGA íπñÑΓ ó«ßßΓá¡áó½¿óáΓ∞ß∩ »α¿ ¬áªñ«¼ »ÑαѬ½ετÑ-
- ¡¿¿ φ¬αá¡á.
-
- é «íΘѼ ß½πτáÑ óá¼ ¡Ñ ¡πª¡« ¿ß»«½∞º«óáΓ∞ ñá¡¡δ⌐ »áαá¼ÑΓα,
- »«¬á óáΦá »α«úαá¼¼á ¡Ñ ¼«ñ¿Σ¿µ¿απÑΓ αÑú¿ßΓαδ »á½¿Γαδ EGA ¿½¿ ¡Ñ
- ¿ß»«½∞ºπÑΓ ñ½∩ »ÑαѬ½ετÑ¡¿∩ »á½¿Γαδ BGI.
-
- Åáαá¼ÑΓα /R
-
- àß½¿ »áαá¼ÑΓα /R ó¬½ετÑ¡ »α¿ ºá»π᪥ IDE, Γ« ΓѬπΘ¿¼ ßΓá¡«-
- ó¿Γß∩ ëà ¬áΓὫú, ó ¬«Γ«α«¼ óδ ¡áσ«ñ¿½¿ß∞ ó« óαѼ∩ »«ß½Ññ¡Ñú«
- óδσ«ñá ¿º IDE. Å« π¼«½τá¡¿ε φëà »áαá¼ÑΓα ó¬½ετÑ¡. ùΓ«íδ φëà »á-
- αá¼ÑΓα ¡áτá½ ñÑ⌐ßΓó«óáΓ∞, ¡πª¡« Γá¬ªÑ óδíαáΓ∞ »áαá¼ÑΓα IDE
- Options│Enviroment│Preferences ¿ πßΓá¡«ó¿Γ∞ »áαá¼ÑΓα Desktop Auto
-
- B.Pascal 7 & Objects /UG - 47 -
-
- Save. àß½¿ óδ ¡Ñ σ«Γ¿ΓÑ, τΓ«íδ IDE ºá»«¼¿¡á½á »«ß½Ññ¡¿⌐ ¬áΓὫú,
- ó䬽ετ¿ΓÑ »áαá¼ÑΓα /R.
-
- Åáαá¼ÑΓα /S
-
- àß½¿ óáΦá ß¿ßΓÑ¼á ¡Ñ ¿¼ÑÑΓ ñ«»«½¡¿Γѽ∞¡«⌐ »á¼∩Γ¿, ¿ß»«½∞ºπ⌐-
- ΓÑ »áαá¼ÑΓα /S ñ½∩ ºáñá¡¿∩ ñ¿ß¬á ¿ ¼áαΦαπΓá ñ«ßΓπ»á ¬ "íδßΓα«⌐"
- «í½áßΓ¿ ßó«»¿¡úá, Γᬫ⌐ ¬á¬ ó¿αΓπá½∞¡δ⌐ ñ¿ß¬ (¡á»α¿¼Ñα, /Sd:\,
- úñÑ d - ñ¿ß¬«ó«ñ). àß½¿ ¬áΓὫú ßó«»¿¡úá ¡Ñ ºáñá¡, Γ« Σá⌐½ ßó«-
- »¿¡úá ß«ºñáÑΓß∩ ó ΓѬπΘѼ ¬áΓὫúÑ.
-
- Åáαá¼ÑΓα /T
-
- àß½¿ óδ ¡Ñ σ«Γ¿ΓÑ, τΓ«íδ IDE ºáúαπªá½á í¿í½¿«ΓѬπ ¿ß»«½¡∩ε-
- ΘÑ⌐ ß¿ßΓѼδ, ºá»αÑΓ¿ΓÑ »áαá¼ÑΓα /T. ä½∩ TURBO.EXE í¿í½¿«ΓѬ«⌐ ¿ß-
- »«½¡∩εΘÑ⌐ ß¿ßΓѼδ ∩ó½∩ÑΓß∩ TURBO.TPL. é ºáó¿ß¿¼«ßΓ¿ «Γ µÑ½Ñó«⌐
- »½áΓΣ«α¼δ ñ½∩ BP.EXE í¿í½¿«ΓѬ«⌐ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓÑ¼δ ¼«ªÑΓ íδΓ∞
- TURBO.TPL (αÑá½∞¡δ⌐ αѪ¿¼), TPW.TPL (Windows) ¿½¿ TPP.TPL (ºáΘ¿-
- ΘÑ¡¡δ⌐ αѪ¿¼). àß½¿ í¿í½¿«ΓÑ¬á ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓÑ¼δ ¡Ñ ºáúαπªÑ¡á,
- »ÑαÑñ ¬«¼»¿½∩µ¿Ñ⌐ ¿½¿ «Γ½áñ¬«⌐ »α«úαá¼¼ óá¼ »«ΓαÑíπÑΓß∩ ¼«ñπ½∞
- System. çá»αÑΓ¿ó »áαá¼ÑΓα /N ¿ óδñѽ¿ó SYSTEM.TPU ¿º í¿í½¿«ΓѬ¿
- ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ ß »«¼«Θ∞ε TPUMOVER, óδ ¼«ªÑΓÑ πóѽ¿τ¿Γ∞ Ѽ-
- ¬«ßΓ∞ IDE αÑá½∞¡«ú« αѪ¿¼á. àß½¿ óδ ¿ß»«½∞ºπÑΓÑ IDE ºáΘ¿ΘÑ¡¡«ú«
- αѪ¿¼á, Γ« ¼«ªÑΓ ßñѽáΓ∞ Γ«ªÑ ßἫÑ, óδñѽ¿ó ó ºáó¿ß¿¼«ßΓ¿ «Γ µÑ-
- ½Ñó«⌐ »½áΓΣ«α¼δ ¼«ñπ½∞ SYSTEM.TPU, SYSTEM.TPW ¿½¿ SYSTEM.TPP. Ä
- óδí«αÑ µÑ½Ñó«⌐ »½áΓΣ«α¼δ αáß߬áºδóáÑΓß∩ ¡¿ªÑ.
-
- Åα¿¼Ñτá¡¿Ñ: Äí πΓ¿½¿ΓÑ TPUMOVER αáß߬áºδóáÑΓß∩ ó â½áóÑ
- 1 "ÅÑαѼÑΘÑ¡¿Ñ ¼«ñπ½Ñ⌐" ó "Éπ¬«ó«ñßΓóÑ »« ¿¡ßΓαπ¼Ñ¡Γá½∞¡δ¼
- ßαÑñßΓóá¼ ¿ πΓ¿½¿Γá¼".
-
- Åáαá¼ÑΓα /W (Γ«½∞¬« TURBO)
-
- êß»«½∞ºπ⌐ΓÑ »áαá¼ÑΓα /W, Ñß½¿ óδ σ«Γ¿ΓÑ ¿º¼Ñ¡¿Γ∞ αẼÑα ñ¿-
- ¡á¼¿τÑ߬«⌐ »á¼∩Γ¿ «¬¡á. Å« π¼«½τá¡¿ε φëà αẼÑα πßΓá¡áó½¿óáÑΓß∩
- ó 32è. î¿¡¿¼á½∞¡á∩ πßΓá¡«ó¬á - 24è; ¼á¬ß¿¼á½∞¡á∩ - 64è. àß½¿ óá¼
- ¡Ñ ΓαÑíπÑΓß∩ «Γ¬αδóáΓ∞ ó «»ÑαáΓ¿ó¡«⌐ »á¼∩Γ¿ ¼¡«ú« «¬«¡, π¼Ñ¡∞Φ¿ΓÑ
- αẼÑα ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿ «¬¡á. ÉẼÑα »« π¼«½τá¡¿ε ñáÑΓ IDE σ«-
- α«Φπε Ѽ¬«ßΓ∞ ¿ ñ«ßΓáΓ«τ¡«Ñ «¬«¡¡«Ñ »α«ßΓαá¡ßΓó«.
-
- Åáαá¼ÑΓα /X (Γ«½∞¬« TURBO)
-
- êß»«½∞ºπ⌐ΓÑ »áαá¼ÑΓα /X, Ñß½¿ óδ σ«Γ¿ΓÑ, τΓ«íδ IDE ¿ß»«½∞º«-
- óá½á ñ«»«½¡¿Γѽ∞¡πε »á¼∩Γ∞ (EMS). Å« π¼«½τá¡¿ε φëà »áαá¼ÑΓα
- ó¬½ετÑ¡. Åα¿ αáºαÑΦÑ¡¿¿ ñá¡¡«ú« »áαá¼ÑΓαá IDE π½πτΦáÑΓ »α«¿ºó«ñ¿-
- Γѽ∞¡«ßΓ∞Ñ, αẼÑΘá∩ ó ñ«»«½¡¿Γѽ∞¡«⌐ »á¼∩Γ¿ »ÑαѬαδóáѼδ⌐ ¬«ñ,
- ñá¡¡δÑ αÑñá¬Γ«αá ¿ ñαπú¿Ñ ß¿ßΓѼ¡δÑ αÑßπαßδ.
-
- Åáαá¼ÑΓα /Y (Γ«½∞¬« BP)
-
- æ »«¼«Θ∞ε φΓ«ú« »áαá¼ÑΓαá óδ ¼«ªÑΓÑ ßñѽáΓ∞ Γá¬, τΓ«íδ ¬«¼-
- »¿½∩Γ«α "ºá»«¼¿¡á½" ¿¡Σ«α¼áµ¿ε «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ ¼Ñªñ𠬫¼»¿½∩-
- µ¿∩¼¿. àß½¿ ñá¡¡δ⌐ »áαá¼ÑΓα ó¬½ετÑ¡, ¿ óδ ¿º¼Ñ¡¿½¿ ßó«ε »α«úαá¼-
-
- B.Pascal 7 & Objects /UG - 48 -
-
- ¼π, ¡« ß½ÑñπεΘá∩ ¬«¼»¿½∩µ¿∩ ºáóÑαΦáÑΓß∩ ¡Ñπñáτ¡«, Γ« óá¼ óßÑ αáó-
- ¡« íπñÑΓ ñ«ßΓπ»¡á ¿¡Σ«α¼áµ¿∩ «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ ß »αÑñδñπΘÑ⌐ ¬«¼-
- »¿½∩µ¿¿. Æá¬¿¼ «íαẫ¼, óδ ß¼«ªÑΓÑ »α«ß¼«ΓαÑΓ∞ ßó«ε »α«úαá¼¼π ¿
- «»αÑñѽ¿Γ∞, ó τѼ ß«ßΓ«¿Γ »α«í½Ñ¼á. Å« π¼«½τá¡¿ε ñá¡¡δ⌐ »áαá¼ÑΓα
- ó¬½ετÑ¡.
-
- ôßΓá¡«ó¬á »áαá¼ÑΓα«ó
- ºá»π߬á ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñÑ
-
- Åáαá¼ÑΓαδ ºá»π߬á óδ ¼«ªÑΓÑ Γá¬ªÑ πßΓá¡«ó¿Γ∞ ó ßἫ⌐ ¿¡ΓÑú-
- α¿α«óá¡¡«⌐ ßαÑñÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Startup ñ½∩ óδó«ñá
- ñ¿á½«ú«ó«ú« «¬¡á Startup Options.
-
- 2. éδíÑα¿ΓÑ ¡πª¡δÑ »áαá¼ÑΓαδ ¿ ºáñÑ⌐ßΓóπ⌐ΓÑ ¬¡«»¬π OK.
-
- ôßΓá¡«ó½Ñ¡¡δÑ »áαá¼ÑΓαδ íπñπΓ ñÑ⌐ßΓó«óáΓ∞ »α¿ ß½ÑñπεΘѼ ºá-
- »π᪥ IDE.
-
-
-
- B.Pascal 7 & Objects /UG - 49 -
-
- éδσ«ñ ¿º IDE
- ─────────────────────────────────────────────────────────────────
-
- êº IDE ¼«ª¡« óδ⌐Γ¿ ñóπ¼∩ ß»«ß«íἿ:
-
- * ùΓ«íδ »«½¡«ßΓ∞ε óδ⌐Γ¿ ¿º IDE, óδíÑα¿ΓÑ ¬«¼á¡ñπ File│Exit.
- àß½¿ óδ ó¡Ñß½¿ ¿º¼Ñ¡Ñ¡¿∩, ¬«Γ«αδÑ ¡Ñ í뫨 ß«σαá¡Ñ¡δ, IDE
- óδó«ñ¿Γ ºá»α«ß, σ«Γ¿ΓÑ ½¿ óδ ß«σαá¡¿Γ∞ »ÑαÑñ óδσ«ñ«¼ ßó«¿
- »α«úαá¼¼δ.
-
- * ùΓ«íδ óαѼѡ¡« óδ⌐Γ¿ ¿º IDE ñ½∩ óó«ñá ¬«¼á¡ñ ó «ΓóÑΓ ¡á
- »«ñ߬Ậπ DOS, óδíÑα¿ΓÑ ¬«¼á¡ñπ File│DOS Shell. IDE «ßΓá-
- ÑΓß∩ ó »á¼∩Γ¿, ¡« π»αáó½Ñ¡¿Ñ »ÑαÑñáÑΓß∩ ó DOS. éδ ¼«ªÑΓÑ
- óóÑßΓ¿ ¬«¼á¡ñδ DOS ¿ ñáªÑ ºá»πßΓ¿Γ∞ ñαπú¿Ñ »α«úαá¼¼δ. è«ú-
- ñá óδ íπñÑΓÑ ú«Γ«óδ óÑα¡πΓ∞ß∩ ó IDE, ¡áíÑα¿ΓÑ ó ¬«¼á¡ñ¡«⌐
- ßΓα«¬Ñ EXIT ¿ ¡áª¼¿ΓÑ Enter. IDE óδó«ñ¿Γß∩ ó Γ«¼ ó¿ñÑ, ¬á¬
- óδ ¿º ¡ÑÑ óδΦÑ.
-
-
- êß»«½∞º«óá¡¿Ñ ß»αáó«τ¡«⌐ ß¿ßΓѼδ Help
- ─────────────────────────────────────────────────────────────────
-
- æ»αáó«τ¡á∩ ß¿ßΓѼá Help »αÑñ«ßΓáó½∩ÑΓ óἠ󫺼«ª¡«ßΓ∞ ½Ñú¬«-
- ú« ñ«ßΓπ»á ¬ ñÑΓá½∞¡«⌐ ¿¡Σ«α¼áµ¿¿ « ∩ºδ¬Ñ Borland Pascal, ¿¡ΓÑú-
- α¿α«óá¡¡«⌐ ¿¡ΓÑαá¬Γ¿ó¡«⌐ ßαÑñÑ, í¿í½¿«ΓÑ¬Ñ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼÑ,
- ñ¿αÑ¬Γ¿óáσ ¬«¼»¿½∩Γ«αá ¿ Γ.ñ.
-
- àß½¿ óδ αá¡ÑÑ ¡Ñ αáí«Γ὿ ß« ß»αáó«τ¡«⌐ ß¿ßΓѼ«⌐ Help ñ½∩
- DOS »« ∩ºδ¬á¼ Borland, Γ«, »α«τ¿Γáó ß½ÑñπεΘ¿Ñ αáºñѽδ, óδ ¼«ªÑΓÑ
- óδóÑßΓ¿ ß»αáó«τ¡δ⌐ φ¬αá¡. ¥¬αá¡ ß«ñÑন¼«ú« ß»αáó«τ¡¿¬á Borland
- Pascal Help Contents óδó«ñ¿Γß∩ »α¿ óδí«αÑ ¬«¼á¡ñδ Help│Contents.
-
-
- ÅÑαѼÑΘÑ¡¿Ñ ó ß»αáó«τ¡«⌐ ß¿ßΓѼÑ
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ óδ »«ß¼«Γα¿ΓÑ ¡á ß»αáó«τ¡δ⌐ φ¬αá¡, Γ« πó¿ñ¿ΓÑ ΓѬßΓ,
- ¬«Γ«αδ⌐ óδó«ñ¿Γß∩ µóÑΓ«¼, «Γ½¿τ¡δ¼ «Γ «¬απªáεΘÑú« ΓѬßΓá. ¥Γ«
- ßß佬¿. éδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ßß佬¿ ñ½∩ óδó«ñá ¡«ó«ú« ß»αáó«τ-
- ¡«ú« φ¬αá¡á, ß«ñÑαªáΘÑú« ¡«óπε ¿¡Σ«α¼áµ¿ε »« ß««ΓóÑΓßΓóπεΘÑ⌐ ΓÑ-
- ¼Ñ. éδíÑα¿ΓÑ «ñ¿¡ ¿º ß½ÑñπεΘ¿σ ¼ÑΓ«ñ«ó:
-
- * äóáªñδ Θѽ¬¡¿ΓÑ ¡á ßßδ½¬Ñ "¼δΦ∞ε".
-
- * àß½¿ ß»αáó«τ¡δ⌐ φ¬αá¡ ¡Ñ ß«ñÑαª¿Γ ¬«¼á¡ñ¡δσ ¬¡«»«¬:
-
- ìᪿ¼á⌐ΓÑ »«óΓ«α¡« ¬½áó¿Φπ Tab, »«¬á ¡Ñ íπñÑΓ »«ñßóÑτÑ¡á
- ßß佬á, ºáΓѼ ¡áª¼¿ΓÑ ¬½áó¿Φπ Enter.
-
- * àß½¿ ß»αáó«τ¡δ⌐ φ¬αá¡ »αÑñßΓáó½∩ÑΓ ß«í«⌐ ñ¿á½«ú«ó«Ñ «¬¡« ß
- ¬«¼á¡ñ¡δ¼¿ ¬¡«»¬á¼¿:
-
- - àß½¿ óδ ¿ß»«½∞ºπÑΓÑ "¼δΦ∞", Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ¬¡«»¬Ñ
-
- B.Pascal 7 & Objects /UG - 50 -
-
- »ÑαѬαÑßΓ¡δσ ßß佫¬ Cross-ref.
-
- - àß½¿ óδ ¿ß»«½∞ºπÑΓÑ ¬½áó¿áΓπαπ, ¡áª¼¿ΓÑ Enter; »α¿ φΓ«¼
- »« π¼«½τá¡¿ε óδí¿αáÑΓß∩ ¬¡«»¬á Cross-ref. ùΓ«íδ óδíαáΓ∞
- ñαπúπε ¬¡«»¬π, ¡áª¿¼á⌐ΓÑ »«óΓ«α¡« ¬½áó¿Φπ Tab, »«¬á ¡Ñ
- íπñÑΓ »«ñßóÑτÑ¡á ¡πª¡á∩ ¬¡«»¬á, ºáΓѼ ¡áª¼¿ΓÑ ¬½áó¿Φπ
- Enter.
-
- éδó«ñ¿Γß∩ ¡«óδ⌐ ß»αáó«τ¡δ⌐ φ¬αá¡ Help ß ¿¡Σ«α¼áµ¿Ñ⌐ »« óδí-
- αá¡¡«⌐ ΓѼÑ. éδ »ÑαÑΦ½¿ ó ¡«ó«Ñ ¼ÑßΓ« ß»αáó«τ¡«⌐ ß¿ßΓѼδ. ìá φΓ«¼
- φ¬αá¡Ñ óδ ¼«ªÑΓÑ ó¿ñÑΓ∞ ñαπú¿Ñ ßß佬¿, ¬«Γ«αδÑ ¼«ª¡« óδí¿αáΓ∞ ñ½∩
- »«½πτÑ¡¿∩ ñá½∞¡Ñ⌐ΦÑ⌐ ¿¡Σ«α¼áµ¿¿.
-
- ùΓ«íδ óÑα¡πΓ∞ß∩ ¬ »αÑñδñπΘѼπ φ¬αá¡π Help, óδíÑα¿ΓÑ ¬«¼á¡ñπ
- Help│Previous Topic ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Alt+F1.
-
-
- çá»α«ß »«¼«Θ¿
- ─────────────────────────────────────────────────────────────────
-
- ä«ßΓπ» ¬ ß»αáó«τ¡¿¬π Help ¼«ª¡« »«½πτ¿Γ∞ ¡Ñ߬«½∞¬¿¼¿ ß»«ß«-
- íἿ:
-
- * éδíαáó ¬«¼á¡ñπ Help ó ßΓα«¬Ñ ¼Ñ¡ε ¿½¿ ¡áªáó Alt+H ñ½∩ óδ-
- ó«ñá ¼Ñ¡ε Help.
-
- é ¼Ñ¡ε Help óδ ¼«ªÑΓÑ óδíαáΓ∞ óδó«ñ φ¬αá¡á «ú½áó½Ñ¡¿∩
- Contents, φ¬αá¡á ΓѼáΓ¿τÑ߬«ú« π¬áºáΓѽ∩ Index »« óßÑ⌐
- ß»αáó«τ¡«⌐ ß¿ßΓѼÑ, ñÑΓá½∞¡πε ¿¡Σ«α¼áµ¿ε »« ΓѼÑ, ¡á ¬«Γ«-
- απε π¬áºδóáÑΓ ¬παß«α ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩ ¿½¿ ß»αáó¬π »«
- αáí«ΓÑ ß« ß»αáó«τ¡«⌐ ß¿ßΓѼ«⌐ Help.
-
- * ä½∩ óδó«ñá φ¬αá¡á ΓѼáΓ¿τÑ߬«ú« π¬áºáΓѽ∩ Borland Pascal
- Help Index ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Shift+F1.
-
- ¥¬αá¡ ΓѼáΓ¿τÑ߬«ú« π¬áºáΓѽ∩ Index á¡á½«ú¿τÑ¡ ΓѼáΓ¿τÑß-
- ¬«¼π π¬áºáΓÑ½ε ¬¡¿ú¿. Äñ¡á¬«, ó¼ÑßΓ« Γ«ú«, τΓ«íδ »ÑαÑóÑα-
- ¡πΓ∞ ßΓαá¡¿µδ ñ½∩ »«½πτÑ¡¿∩ ¿¡Σ«α¼áµ¿¿ »« ¡πª¡«⌐ ΓѼÑ
- ºñÑß∞ ¡πª¡« ñóáªñδ Θѽ¬¡πΓ∞ ¡á ¡Ñ⌐ ¬¡«»¬«⌐ "¼δΦ¿" ¿½¿ »Ñ-
- αÑ⌐Γ¿ ¬ ΓÑ¼Ñ ß »«¼«Θ∞ε ¬½áó¿Φ¿ Tab ¿ ¡áªáΓ∞ Enter.
-
- * ìáªáó ¬½áó¿Φπ F1.
-
- éδ »«½πτ¿ΓÑ ¬«¡ΓѬßΓ¡«-ºáó¿ß¿¼πε ¿¡Σ«α¼áµ¿ε, ºáó¿ß∩Θπε «Γ
- Γ«ú«, τΓ« óδ ñѽáÑΓÑ ó φëà ¼«¼Ñ¡Γ - αÑñá¬Γ¿απÑΓÑ, «Γ½áª¿-
- óáÑΓÑ »α«úαá¼¼π, óδí¿αáÑΓÑ »áαá¼ÑΓαδ ¼Ñ¡ε ¿ Γ.ñ.
-
- àß½¿ óδ ¡áσ«ñ¿½¿ß∞ ó ñ¿á½«ú«ó«¼ «¬¡Ñ, Γ« πó¿ñ¿ΓÑ ß»αáó«τ-
- ¡δ⌐ φ¬αá¡ »« Γ«¼π »áαá¼ÑΓαπ, ¬«Γ«αδ⌐ óδñѽѡ ó ¼«¼Ñ¡Γ ¡á-
- ªáΓ¿∩ F1.
-
- * éδíαáó ¬«¼á¡ñ¡πε ¬¡«»¬π Help ó ñ¿á½«ú«ó«¼ «¬¡Ñ.
-
-
- B.Pascal 7 & Objects /UG - 51 -
-
- Åα¿ óδí«αÑ ¬«¼á¡ñ¡«⌐ ¬¡«»¬¿ Help óδ »«½πτ¿ΓÑ ¿¡Σ«α¼áµ¿ε «
- ñ¿á½«ú«ó«¼ «¬¡Ñ.
-
- * Å«¼ÑßΓ¿ó ¬παß«α ¡á ΓÑନ¡ ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩ ¿ óδíαáó
- Topic Search. êß»«½∞ºπ⌐ΓÑ ½εí«⌐ ¿º ß½ÑñπεΘ¿σ ¼ÑΓ«ñ«ó:
-
- - ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+F1;
-
- - óδíÑα¿ΓÑ ¬«¼á¡ñπ Help│Topic Search;
-
- - πñÑনóá∩ ¬½áó¿Φπ Ctrl, Θѽ¬¡¿ΓÑ »αáó«⌐ ¬¡«»¬«⌐ "¼δΦ¿"
- (¬«¼í¿¡áµ¿∩ ¡áªáΓ¿⌐ Ctrl+»αáóá∩ ¬¡«»¬á "¼δΦ¿" ñ«½ª¡á
- íδΓ∞ »αÑñóáα¿Γѽ∞¡« ¡áßΓα«Ñ¡á - óδíÑα¿ΓÑ ¬«¼á¡ñπ
- Options│Enviroment│Mouse ¿ óδíÑα¿ΓÑ ¬«¼á¡ñπ Topic
- Search).
-
- - óδíÑα¿ΓÑ ¬«¼á¡ñπ Topic Search ó ½«¬á½∞¡«¼ ¼Ñ¡ε «¬¡á αÑ-
- ñá¬Γ¿α«óá¡¿∩ (¡áª¼¿ΓÑ ¬½áó¿Φ¿ Alt+F10 ñ½∩ óδó«ñá ¡á φ¬-
- αá¡ ½«¬á½∞¡«ú« ¼Ñ¡ε ¿½¿ Θѽ¬¡¿ΓÑ »αáó«⌐ ¬¡«»¬«⌐ "¼δΦ¿".
-
- Åα¿¼Ñτá¡¿Ñ: Ä ½«¬á½∞¡«¼ ¼Ñ¡ε «¬¡á αÑñá¬Γ¿α«óá¡¿∩ αáßß-
- ¬áºδóáÑΓß∩ ¡¿ªÑ.
-
- é ß»αáó«τ¡«¼ φ¬αá¡Ñ óδó«ñ¿Γß∩ ¿¡Σ«α¼áµ¿∩ « ΓÑନ¡Ñ, ¡á ¬«Γ«-
- α«¼ πßΓá¡«ó½Ñ¡ ¬παß«α ó á¬Γ¿ó¡«¼ «¬¡Ñ.
-
-
- è«»¿α«óá¡¿Ñ »α¿¼Ñα«ó ¿ßσ«ñ¡«ú« ¬«ñá
- ─────────────────────────────────────────────────────────────────
-
- æ»αáó«τ¡á∩ ß¿ßΓѼá Help ß«ñÑαª¿Γ »α¿¼Ñαδ ¬«ñá ñ½∩ ¬áªñ«⌐
- »α«µÑñπαδ ¿ Σπ¡¬µ¿¿. éδ ¼«ªÑΓÑ ß¬«»¿α«óáΓ∞ φΓ¿ »α¿¼Ñαδ ¿º ß»αá-
- ó«τ¡«⌐ ß¿ßΓѼδ ó «¬¡« αÑñá¬Γ¿α«óá¡¿∩. éδ»«½¡¿ΓÑ ß½ÑñπεΘ¿Ñ Φáú¿:
-
- 1. éδóÑñ¿ΓÑ ß»αáó«τ¡δ⌐ φ¬αá¡ »« ¿¡ΓÑαÑßπεΘÑ⌐ óáß »α«µÑñπαÑ
- ¿½¿ Σπ¡¬µ¿¿.
-
- 2. Å᫬απΓ¿ΓÑ ß»αáó«τ¡«Ñ «¬¡«, »«¬á ¡Ñ πó¿ñ¿ΓÑ ó ¡Ñ¼ »α¿¼Ñα
- ¿ßσ«ñ¡«ú« ¬«ñá.
-
- 3. ä½∩ óδó«ñá ½«¬á½∞¡«ú« ¼Ñ¡ε Help ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Alt+F10
- ¿½¿ Θѽ¬¡¿ΓÑ »αáó«⌐ ¬¡«»¬«⌐ "¼δΦ¿".
-
- 4. 欫»¿απ⌐ΓÑ »α¿¼Ñα:
-
- * ñ½∩ ¬«»¿α«óá¡¿∩ óßÑú« »α¿¼Ñαá óδíÑα¿ΓÑ ¬«¼á¡ñπ Copy
- Example;
-
- * ñ½∩ ¬«»¿α«óá¡¿∩ τáßΓ¿ ¿ßσ«ñ¡«ú« ¬«ñá »«ñßóÑΓ¿ΓÑ Γ«, τΓ«
- óδ σ«Γ¿ΓÑ ß¬«»¿α«óáΓ∞, ¿ óδíÑα¿ΓÑ ¬«¼á¡ñπ Copy.
-
- 5. éÑα¡¿ΓÑß∞ ó «¬¡« αÑñá¬Γ¿α«óá¡¿∩ ¿ óδíÑα¿ΓÑ ¬«¼á¡ñπ
- Edit│Paste, ¡áª¼¿ΓÑ ¬½áó¿Φπ Shift+Ins ¿½¿ óδíÑα¿ΓÑ ¬«¼á¡-
-
- B.Pascal 7 & Objects /UG - 52 -
-
- ñπ Paste ó ½«¬á½∞¡«¼ ¼Ñ¡ε «¬¡á αÑñá¬Γ¿α«óá¡¿∩.
-
-
- çáúαπº¬á ñαπú¿σ ß»αáó«τ¡δσ Σá⌐½«ó
- ─────────────────────────────────────────────────────────────────
-
- ê¡ΓÑúα¿α«óá¡¡á∩ ßαÑñá »«ºó«½∩ÑΓ óá¼ »«ñ¬½ετáΓ∞ ¬ ß»αáó«τ¡«⌐
- ß¿ßΓÑ¼Ñ Help ñαπú¿Ñ ß»αáó«τ¡δÑ Σá⌐½δ. ìá»α¿¼Ñα, Ñß½¿ óδ σ«Γ¿ΓÑ
- »«½πτáΓ∞ ß»αáó«τ¡πε ¿¡Σ«α¼áµ¿ε »« Turbo Vision, Γ« ¼«ªÑΓÑ ºáúαπ-
- º¿Γ∞ ß»αáó«τ¡δ⌐ Σá⌐½ Turbo Vision. IDE «íΩÑñ¿¡∩ÑΓ ΓѼáΓ¿τÑ߬¿Ñ
- π¬áºáΓѽ¿ ß»αáó«τ¡δσ Σá⌐½«ó, τΓ« »«ºó«½∩ÑΓ óá¼ »«½πτ¿Γ∞ ñ«ßΓπ» ó
- φ¬αá¡Ñ Index ¬á¬ ¬ «íδτ¡«⌐ ß»αáó«τ¡«⌐ ß¿ßΓÑ¼Ñ Help, Γᬠ¿ ¬ ß»αá-
- ó«τ¡«⌐ ß¿ßΓÑ¼Ñ Turbo Vision.
-
- ùΓ«íδ ºáúαπº¿Γ∞ ¡«óπε ß»αáó«τ¡πε ß¿ßΓѼπ Help, óδ»«½¡¿ΓÑ
- ß½ÑñπεΘ¿Ñ Φáú¿:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Help│Files (æ»αáó«τ¡¿¬│öá⌐½δ).
-
- éδó«ñ¿Γß∩ ñ¿á½«ú«ó«Ñ «¬¡« πßΓá¡«ó¬¿ ß»αáó«τ¡δσ Σá⌐½«ó
- Install Help Files.
-
- 2. éδíÑα¿ΓÑ ¬«¼á¡ñπ New (ì«óδ⌐).
-
- éδó«ñ¿Γß∩ ñ¿á½«ú«ó«Ñ «¬¡« Help Files (æ»αáó«τ¡δÑ Σá⌐½δ).
- éßÑ ß»αáó«τ¡δÑ Σá⌐½δ ó óáΦѼ ¬áΓὫúÑ BIN ß αáßΦ¿αÑ¡¿Ñ¼
- .TPH óδó«ñ¿Γß∩ ó í½«¬Ñ ß»¿ß¬á. àß½¿ óδ ¡Ñ ó¿ñ¿ΓÑ ß»αáó«τ-
- ¡δσ Σá⌐½«ó, ¿º¼Ñ¡¿ΓÑ ¬áΓὫú BP\BIN.
-
- 3. äóáªñδ Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ß»αáó«τ¡«¼ Σá⌐½Ñ, ¬«Γ«αδ⌐ óδ
- σ«Γ¿ΓÑ ó¬½ετ¿Γ∞ ó ß»αáó«τ¡πε ß¿ßΓѼπ, ¿½¿ óδñѽ¿ΓÑ Ñú« ¿
- ¡áª¼¿ΓÑ ¬½áó¿Φπ Enter.
-
- Åα¿¼Ñτá¡¿Ñ: àß½¿ óδ σ«Γ¿ΓÑ Γá¬ªÑ óδíαáΓ∞ óΓ«α«⌐
- ß»αáó«τ¡δ⌐ Σá⌐½, »«óΓ«α¿ΓÑ φëà Φáú.
-
- ä¿á½«ú«ó«Ñ «¬¡« Install Help Files »«∩ó½∩ÑΓß∩ ó¡«ó∞, ¿ ó
- ¡Ñ¼ óδó«ñ¿Γß∩ ß»αáó«τ¡δ⌐ Σá⌐½, ¬«Γ«αδ⌐ óδ óδíα὿ ó í½«¬Ñ
- ᯨ᪠.
-
- 4. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- 5. éδíÑα¿ΓÑ ¬«¼á¡ñπ Help│Index ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Shift+F1.
-
- é ßΓα«¬Ñ ß«ßΓ«∩¡¿∩ óδ ¼«ªÑΓÑ πó¿ñÑΓ∞ ¬αáΓ¬«Ñ ß««íΘÑ¡¿Ñ,
- »«¬áºδóáεΘÑÑ ¿¡ñѬ߿α«óá¡¿Ñ ¿ ß½¿∩¡¿Ñ. Å«ß½Ñ ºáóÑαΦÑ¡¿∩
- ß½¿∩¡¿∩ óδ ¼«ªÑΓÑ »α«¬απΓ¿Γ∞ ß»αáó«τ¡δ⌐ φ¬αá¡ ¿ πó¿ñÑΓ∞,
- τΓ« óá¼ ñ«ßΓπ»¡δ óßÑ ΓѼδ ó óδíαá¡¡δσ ß»αáó«τ¡δσ Σá⌐½áσ.
-
- ÆÑ¼áΓ¿τÑ߬¿Ñ π¬áºáΓѽ¿ «ßΓáεΓß∩ «íΩÑñ¿¡Ñ¡¡δ¼¿ ó ΓÑτÑ¡¿¿
- ΓѬπΘÑú« ßÑá¡ßá. àß½¿ ó ñ¿á½«ú«ó«¼ «¬¡Ñ Preferences
- (Options│Enviroment│Preferences) óδ πßΓᡫ󿽿 »áαá¼ÑΓα
- Enviroment Auto Save, Γ« ΓѼáΓ¿τÑ߬¿Ñ π¬áºáΓѽ¿ íπñπΓ «ß-
-
- B.Pascal 7 & Objects /UG - 53 -
-
- ΓáóáΓ∞ß∩ «íΩÑñ¿¡Ñ¡¡δ¼¿ ¿ ó ß½ÑñπεΘ¿σ ßÑá¡ßáσ. àß½¿ óδ ¡Ñ
- ß«σαá¡¿½¿ ßó«ε «»Ñαᵿ«¡¡πε ßαÑñπ, Γ« »α¿ ß½ÑñπεΘѼ ºá-
- »π᪥ IDE ΓѼáΓ¿τÑ߬¿⌐ π¬áºáΓѽ∞ Help ó«ºóαáΘáÑΓß∩ ó ¿ß-
- σ«ñ¡«Ñ ß«ßΓ«∩¡¿Ñ. äαπú¿¼¿ ß½«óἿ, «íΩÑñ¿¡Ñ¡¿Ñ ΓѼáΓ¿τÑß-
- ¬¿σ π¬áºáΓѽÑ⌐ ¡Ñ íπñÑΓ ß«σαá¡∩Γ∞ß∩ «Γ «ñ¡«ú« ßÑá¡ßá ¬
- ñαπú«¼π.
-
- Åα¿¼Ñτá¡¿Ñ: Ä ß«σαá¡Ñ¡¿¿ «»Ñαᵿ«¡¡«⌐ ßαÑñδ αáß߬á-
- ºδóáÑΓß∩ ¡¿ªÑ.
-
- àß½¿ óδ ¡Ñ σ«Γ¿ΓÑ ó¿ñÑΓ∞ ¡á φ¬αá¡Ñ ΓѼáΓ¿τÑ߬«ú« π¬áºáΓѽ∩
- Index ¬«¡¬αÑΓ¡δÑ ºá»¿ß¿ Help, Γ« ¼«ªÑΓÑ "πñ὿Γ∞" ß»αáó«τ¡δ⌐
- Σá⌐½:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Help│Files.
-
- 2. éδíÑα¿ΓÑ ¿¼∩ ß»αáó«τ¡«ú« Σá⌐½á, ¬«Γ«αδ⌐ óδ í«½∞ΦÑ ¡Ñ σ«-
- Γ¿ΓÑ »α«ß¼áΓα¿óáΓ∞.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñπ Delete.
-
- 4. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
-
- éδσ«ñ ¿º ß»αáó«τ¡¿¬á Help
- ─────────────────────────────────────────────────────────────────
-
- ùΓ«íδ ºá¬αδΓ∞ «¬¡« Help ¿ óÑα¡πΓ∞ß∩ ó ßó«ε »α¿¬½áñ¡πε »α«ú-
- αá¼¼π óδ ¼«ªÑΓÑ óδíαáΓ∞ «ñ¿¡ ¿º ß½ÑñπεΘ¿σ ¼ÑΓ«ñ«ó:
-
- * ìáªáΓ∞ ¬½áó¿Φπ Esc.
-
- * Öѽ¬¡πΓ∞ "¼δΦ∞ε" ¡á φ½Ñ¼Ñ¡ΓÑ ºá¬αδΓ¿∩ «¬¡á Help.
-
- * Öѽ¬¡πΓ∞ "¼δΦ∞ε" ó¡Ñ «¬¡á Help.
-
- àß½¿ óδ σ«Γ¿ΓÑ ó¡«ó∞ óδóÑßΓ¿ »αÑñδñπΘ¿⌐ ß»αáó«τ¡δ⌐ φ¬αá¡,
- ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Alt+F1.
-
-
- çỿß∞ ¿ αÑñá¬Γ¿α«óá¡¿Ñ ¿ßσ«ñ¡«ú« ¬«ñá
- ─────────────────────────────────────────────────────────────────
-
- ìáí¿αá⌐ΓÑ ΓѬßΓ, ¬á¬ φΓ« ñѽáÑΓß∩ ó ½εí«¼ αÑñá¬Γ«αÑ. ä½∩ ºá-
- óÑαΦÑ¡¿∩ ßΓ᫬¿ ¡áª¿¼á⌐ΓÑ Enter. è«úñá óδ óóÑñÑΓÑ ñ«ßΓáΓ«τ¡«
- ßΓ᫬, τΓ«íδ ºá»«½¡¿Γ∞ φ¬αá¡, «¡ íπñÑΓ »α«¬απτ¿óáΓ∞ß∩.
-
- Åα¿¼Ñτá¡¿Ñ: é IDE óδ ¼«ªÑΓÑ «Γ¬αδΓ∞ ßΓ«½∞¬« «¬«¡,
- ߬«½∞¬« »«ºó«½∩ÑΓ »á¼∩Γ∞ óáΦÑ⌐ ß¿ßΓѼδ.
-
- Å«½¡δ⌐ ß»¿ß«¬ ¬«¼á¡ñ αÑñá¬Γ¿α«óá¡¿∩ óδ ¼«ªÑΓÑ ¡á⌐Γ¿ ó Åα¿½«-
- ªÑ¡¿¿ A ("æ»αáó«τ¡¿¬ »« αÑñá¬Γ«απ") "Éπ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá".
-
-
- B.Pascal 7 & Objects /UG - 54 -
-
-
- ìáßΓα«⌐¬á ¬«¡Σ¿úπαᵿ¿ αÑñá¬Γ«αá
- ─────────────────────────────────────────────────────────────────
-
- ä½∩ ¼«ñ¿Σ¿¬áµ¿¿ »«óÑñÑ¡¿∩ αÑñá¬Γ«αá Borland Pascal ¿¼ÑÑΓß∩
- ¡Ñ߬«½∞¬« »áαá¼ÑΓα«ó. ä½∩ óδó«ñá ñ¿á½«ú«ó«ú« «¬¡á Editor óδíÑα¿ΓÑ
- ¬«¼á¡ñπ Options│Enviroment│Editor.
-
- ùΓ«íδ »«ñα«í¡ÑÑ πº¡áΓ∞ « ¬áªñ«¼ »áαá¼ÑΓαÑ, óδñѽ¿ΓÑ ñá¡¡δ⌐
- »áαá¼ÑΓα ¿ ¡áª¼¿ΓÑ ¬½áó¿Φπ F1. æ»αáó«τ¡á∩ ß¿ßΓѼá Help »«∩ß¡∩ÑΓ,
- τΓ« ñѽáÑΓ ñá¡¡δ⌐ »áαá¼ÑΓα.
-
- Åα¿¼Ñτá¡¿Ñ: Ä óδñѽѡ¿¿ ß¿¡Γá¬ß¿ßá ó αÑñá¬Γ«αÑ αáß߬á-
- ºδóáÑΓß∩ ¡¿ªÑ.
-
-
- 꺼ѡѡ¿Ñ αÑΦÑ¡¿∩: ¬«¼á¡ñá Undo
- ─────────────────────────────────────────────────────────────────
-
- ÉÑñá¬Γ«α ¿¼ÑÑΓ ¬«¼á¡ñπ «Γ¼Ñ¡δ Undo, ¬«Γ«αá∩ «í½ÑúτáÑΓ ¿º¼Ñ-
- ¡Ñ¡¿Ñ óáΦÑú« αÑΦÑ¡¿∩ »α¿ óδ»«½¡Ñ¡¿¿ ¬á¬¿σ-½¿í« ñÑ⌐ßΓó¿⌐ ¿ ¿ß»αáó-
- ½Ñ¡¿Ñ «Φ¿í¬¿. ùΓ«íδ «Γ¼Ñ¡¿Γ∞ ñÑ⌐ßΓó¿Ñ »αÑñδñπΘÑ⌐ «»Ñαᵿ¿ αÑñá¬-
- Γ¿α«óá¡¿∩, óδíÑα¿ΓÑ ¬«¼á¡ñπ Edit│Undo ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿
- Alt+Backspace. àß½¿ óδ »α«ñ«½ªáÑΓÑ óδí¿αáΓ∞ ¬«¼á¡ñπ Undo, αÑñá¬-
- Γ«α »α«ñ«½ªáÑΓ «Γ¼Ñ¡∩Γ∞ ñÑ⌐ßΓó¿∩. æ »«¼«Θ∞ε ¬«¼á¡ñδ ó«º«í¡«ó½Ñ¡¿∩
- Edit│Redo óδ ¼«ªÑΓÑ Γá¬ªÑ «Γ¼Ñ¡¿Γ∞ ßá¼π ¬«¼á¡ñπ Undo.
-
- 諼á¡ñá Undo óßΓáó½∩ÑΓ óßÑ πñá½Ñ¡¡δÑ óἿ ß¿¼ó«½δ, πñá½∩ÑΓ
- ½εí«⌐ óßΓáó½Ñ¡¡δ⌐ ß¿¼ó«½, ºá¼Ñ¡∩ÑΓ óßÑ »ÑαѺỿßá¡¡δÑ ß¿¼ó«½δ ¿
- »ÑαѼÑΘáÑΓ ¬παß«α «íαáΓ¡« ¡á »αÑñδñπΘπε »«º¿µ¿ε. àß½¿ óδ «Γ¼Ñ¡∩Ñ-
- ΓÑ í½«τ¡πε «»Ñαᵿε, Γ« Σá⌐½δ óδó«ñ¿Γß∩ ó Γ«¼ ó¿ñÑ, ¬á¬«⌐ «¡ ¿¼Ñ½
- »ÑαÑñ óδ»«½¡Ñ¡¿Ñ í½«τ¡«⌐ «»Ñαᵿ¿.
-
- 諼á¡ñá Undo ¡Ñ ¿º¼Ñ¡∩ÑΓ πßΓá¡«ó¬π »áαá¼ÑΓα«ó, ó½¿∩εΘ¿σ í«-
- ½ÑÑ τѼ ¡á «ñ¡« «¬¡«. ìá»α¿¼Ñα, Ñß½¿ óδ ¿ß»«½∞ºπÑΓÑ ¬½áó¿Φπ Ins
- ñ½∩ ¿º¼Ñ¡Ñ¡¿∩ αѪ¿¼á óßΓáó¬¿ ¡á αѪ¿¼ ºá¼Ñ¡δ, á ºáΓѼ óδíÑα¿ΓÑ
- Undo, αÑñá¬Γ«α ¡Ñ ¿º¼Ñ¡¿Γ αѪ¿¼ «íαáΓ¡« ¡Ñ αѪ¿¼ óßΓáó¬¿. ì« Ñß½¿
- óδ πñ὿½¿ ß¿¼ó«½, »ÑαÑΦ½¿ ó αѪ¿¼ ºá¼Ñ¡δ, ºáΓѼ óδíα὿ ¬«¼á¡ñπ
- Undo, Γ« πñá½Ñ¡¡δÑ αá¡ÑÑ ß¿¼ó«½ óδó«ñ¿Γß∩ ó¡«ó∞.
-
-
- âαπ»»«óá∩ «Γ¼Ñ¡á
-
- Åáαá¼ÑΓα Group Undo ó ñ¿á½«ú«ó«¼ «¬¡Ñ Options│Enviroment│
- Editor ó½¿∩ÑΓ ¡á Γ«, ¬á¬ óÑñÑΓ ßÑí∩ ¬«¼á¡ñá Undo ¿ ß««ΓóÑΓßΓóπε-
- Θá∩ ¬«¼á¡ñá Redo. àß½¿ óδ óδíÑα¿ΓÑ »áαá¼ÑΓα Group Undo (âαπ»»«óá∩
- «Γ¼Ñ¡á), »α¿ ¡áªáΓ¿¿ ¬½áó¿Φ Alt+Backspace ¿½¿ Edit│Undo, αÑñá¬Γ«α
- ¿º¼Ñ¡∩ÑΓ »«ß½Ññ¡εε úαπ»»π ¬«¼á¡ñ.
-
- Åα¿óÑñѼ »α¿¼Ñα Γ«ú«, ¬á¬ αáí«ΓáÑΓ úαπ»»«ó«⌐ »áαá¼ÑΓα. àß½¿
- óδ ¡áíÑαÑΓÑ, ¡á»α¿¼Ñα, MISTAKE ¿ »áαá¼ÑΓα Group Undo πßΓá¡«ó½Ñ¡,
- Γ« Undo πñá½∩ÑΓ óßÑ ß½«ó«. àß½¿ »áαá¼ÑΓα Group Undo ¡Ñ óδíαá¡, ¿
- óδ ¡áí¿αáÑΓÑ MISTAKE, Undo πñá½∩ÑΓ Γ«½∞¬« »«ß½Ññ¡¿⌐ ß¿¼ó«½, íπ¬óπ
-
- B.Pascal 7 & Objects /UG - 55 -
-
- E. ùΓ«íδ «Γ¼Ñ¡¿Γ∞ ß½«ó« MISTAKE »α¿ ó䬽ετÑ¡¡«¼ »áαá¼ÑΓαÑ Group
- Undo, óá¼ ¡πª¡« ¿ß»«½∞º«óáΓ∞ ¬«¼á¡ñπ Undo ßѼ∞ αáº.
-
- Åα¿¼Ñτá¡¿Ñ: âαπ»»á - φΓ« »«ß½Ññ«óáΓѽ∞¡«ßΓ∞ ¬«¼á¡ñ «ñ-
- ¡«ú« Γ¿»á.
-
- éßΓáó¬¿, πñá½Ñ¡¿∩, ºá¼Ñ¡δ ¿ »ÑαѼÑΘÑ¡¿∩ ¬παß«αá ∩ó½∩εΓß∩
- úαπ»»«ó묨 «»Ñαᵿ∩¼¿. è«úñá óδ ¼Ñ¡∩ÑΓÑ Γ¿» ¬«¼á¡ñδ, ßΓáαá∩ úαπ»-
- »á ºáóÑαΦáÑΓß∩ ¿ ¡áτ¿¡áÑΓß∩ ¡«óá∩. ä½∩ αÑñá¬Γ«αá óßΓáó¬á ó«ºóαáΓá
- ¬áαÑΓ¬¿ ¡áªáΓ¿Ñ¼ ¬½áó¿Φ¿ Enter - φΓ« óßΓáó¬á, ºá ¬«Γ«α«⌐ ß½ÑñπÑΓ
- »ÑαѼÑΘÑ¡¿Ñ ¬παß«αá. ū߬«½∞¬π Γ¿» αÑñá¬Γ¿α«óá¡¿∩ ¿º¼Ñ¡¿½ß∩ (óδ
- óßΓá󿽿 ß¿¼ó«½δ, ºáΓѼ »ÑαѼÑßΓ¿½¿ ¬παß«α), úαπ»»á óßΓáó¬¿ ß¿¼-
- 󫽫ó ºáóÑαΦáÑΓß∩, ¬«úñá óδ ¡áª¿¼áÑΓÑ Enter.
-
- ÄΓ¼Ñ¡á «Γ¼Ñ¡δ
-
- 諼á¡ñá Edit│Redo ¿º¼Ñ¡∩ÑΓ ¡á «íαáΓ¡«Ñ ñÑ⌐ßΓó¿Ñ »«ß½Ññ¡Ñ⌐
- ¬«¼á¡ñδ Undo. Redo ¡Ñ¼Ññ½Ñ¡¡« ñÑ⌐ßΓóπÑΓ Γ«½∞¬« »«ß½Ñ ¬«¼á¡ñδ Undo
- ¿½¿ ñαπú«⌐ ¬«¼á¡ñδ Redo. ū߽Ññ«óáΓѽ∞¡«ßΓ∞ ¬«¼á¡ñ Redo «Γ¼Ñ¡∩ÑΓ
- ñÑ⌐ßΓó¿Ñ »«ß½Ññ«óáΓѽ∞¡«ßΓ¿ ¬«¼á¡ñ Undo. èᬠ¿ ó ß½πτáÑ ¬«¼á¡ñδ
- Undo, ¡á ¬«¼á¡ñπ Redo ó½¿∩ÑΓ »áαá¼ÑΓα Group Undo.
-
-
-
-
- B.Pascal 7 & Objects /UG - 56 -
-
- Éáí«Γá ß í½«¬á¼¿ ΓѬßΓá
- ─────────────────────────────────────────────────────────────────
-
- ü½«¬ ΓѬßΓá - φΓ« ½εí«⌐ «íΩѼ ΓѬßΓá («Γ «ñ¡«ú« ß¿¼ó«½á ñ«
- ß«ΓÑ¡ ßΓ᫬), ¬«Γ«αδ⌐ óδñѽѡ ¡á φ¬αá¡Ñ. é ¬áªñδ⌐ ¼«¼Ñ¡Γ óαѼѡ¿
- ó «¬¡Ñ ¼«ªÑΓ íδΓ∞ óδñѽѡ Γ«½∞¬« «ñ¿¡ í½«¬.
-
- éδñѽѡ¿Ñ í½«¬á
-
- ä½∩ óδñѽѡ¿∩ í½«¬á ΓѬßΓá ßπΘÑßΓóπÑΓ »« ¬αá⌐¡Ñ⌐ ¼ÑαÑ Γα¿
- ß»«ß«íá:
-
- * üπ¬ß¿απ⌐ΓÑ "¼δΦ∞" »« ΓѬßΓπ, ¬«Γ«αδ⌐ óδ σ«Γ¿ΓÑ óδñѽ¿Γ∞.
-
- * ÅÑαѼÑßΓ¿ΓÑ ßó«⌐ ¬παß«α ó ¡áτὫ í½«¬á ΓѬßΓá, ¡áª¼¿ΓÑ
- ¬½áó¿Φπ Shift ¿, πñÑনóá∩ ÑÑ, »ÑαѼÑßΓ¿ΓÑ ¬παß«α ¬ ¬«¡µπ
- í½«¬á ß »«¼«Θ∞ε ¬½áó¿Φ ßΓαѽ«¬.
-
- * Öѽ¬¡¿ΓÑ "¼δΦ∞ε" ó ¡áτá½Ñ í½«¬á, »ÑαѼÑßΓ¿ΓÑ ¬παß«α ¬ ¬«¡-
- µπ í½«¬á ß »«¼«Θ∞ε ¬½áó¿Φ ßΓαѽ«¬, ºáΓѼ, ¡áªáó Shift,
- ß¡«óá Θѽ¬¡¿ΓÑ ¬¡«»¬«⌐ "¼δΦ¿".
-
- àß½¿ óδ πªÑ αáí«Γ὿ ß αÑñá¬Γ«αἿ Borland αá¡ÑÑ, Γ« ¼«ªÑΓÑ
- ¿ß»«½∞º«óáΓ∞ ¬«¼á¡ñδ αáí«Γδ ß í½«¬á¼¿ ¬á¬ «íδτ¡«. Æáí½¿µπ ¬«¼á¡ñ
- αÑñá¬Γ«αá Borland ñ½∩ αáí«Γδ ß í½«¬á¼¿ ¼«ª¡« ¡á⌐Γ¿ ó Åα¿½«ªÑ¡¿¿ A
- ("æ»αáó«τ¡¿¬ »« αÑñá¬Γ«απ") "Éπ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá".
-
-
- éδαѺ᡿Ñ, ¬«»¿α«óá¡¿Ñ ¿ óßΓáó¬á í½«¬«ó
-
- Å«ß½Ñ óδí«αá í½«¬á Ñú« ¼«ª¡« ߬«»¿α«óáΓ∞, »ÑαѼÑßΓ¿Γ∞ ¿½¿
- ºá»¿ßáΓ∞ ó Σá⌐½.
-
- * ùΓ«íδ óδαѺáΓ∞ óδñѽѡ¡δ⌐ ΓѬßΓ, ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Shift+Del
- ¿½¿ óδíÑα¿ΓÑ ¬«¼á¡ñδ Edit│Cut. éδñѽѡ¡δ⌐ í½«¬ πñá½∩ÑΓß∩
- ¿º ΓѬßΓá ¿ »«¼ÑΘáÑΓß∩ ó íπΣÑα óδαѺᡡ«ú« ¿º«íαáªÑ¡¿∩
- ("¬áα¼á¡") - óαѼѡ¡πε «í½áßΓ∞ »á¼∩Γ¿.
-
- * ä½∩ ¬«»¿α«óá¡¿∩ óδñѽѡ¡«ú« ΓѬßΓá ¡áª¼¿ΓÑ ¬½áó¿Φ¿
- Ctrl+Ins ¿½¿ óδíÑα¿ΓÑ ¬«¼á¡ñπ Edit│Copy. éδñѽѡ¡δ⌐ í½«¬
- «ßΓáÑΓß∩ ó ΓѬßΓÑ, á Ñú« ¬«»¿∩ »«¼ÑΘáÑΓß∩ ó íπΣÑα óδαѺá¡-
- ¡«ú« ¿º«íαáªÑ¡¿∩ ¿ ú«Γ«óá ñ½∩ óßΓáó¬¿ ó ñαπú«¼ «¬¡Ñ αÑñá-
- ¬Γ¿α«óá¡¿∩.
-
- * ùΓ«íδ óßΓáó¿Γ∞ (߬«»¿α«óáΓ∞) ΓѬßΓ, ß«ñÑαªáΘ¿⌐ß∩ ó íπΣÑαÑ
- óδαѺᡡ«ú« ¿º«íαáªÑ¡¿∩, ó á¬Γ¿ó¡«Ñ «¬¡«, ¡áª¼¿ΓÑ ¬½áó¿Φ¿
- Shift+Ins ¿½¿ óδíÑα¿ΓÑ ¬«¼á¡ñπ Edit│Paste. ü½«¬, ß«ñÑαªá-
- Θ¿⌐ß∩ ó íπΣÑαÑ, óßΓáó½∩ÑΓß∩ ó ΓѬπΘÑ⌐ »«º¿µ¿¿ ¬παß«αá.
-
- * ä½∩ ßΓ¿αá¡¿∩ (πñá½Ñ¡¿∩) óδñѽѡ¡«ú« ΓѬßΓá ¡áª¼¿ΓÑ ¬½áó¿Φ¿
- Ctrl+Del ¿½¿ óδíÑα¿ΓÑ ¬«¼á¡ñπ Edit│Clear. éδñѽѡ¡δ⌐ í½«¬
- πñá½∩ÑΓß∩ ¿º ΓѬßΓá, ¿ ¬«»¿∩ ¡Ñ »«¼ÑΘáÑΓß∩ ó íπΣÑα óδαÑ-
- ºá¡¡«ú« ¿º«íαáªÑ¡¿∩. àñ¿¡ßΓóÑ¡¡δ⌐ ß»«ß«í ó«ßßΓá¡«ó½Ñ¡¿∩
-
- B.Pascal 7 & Objects /UG - 57 -
-
- πñá½Ñ¡¡«ú« ΓѬßΓá ß«ßΓ«¿Γ ó »α¿¼Ñ¡Ñ¡¿¿ ¬«¼á¡ñδ Edit│Undo.
-
-
- 꺼ѡѡ¿Ñ »«óÑñÑ¡¿∩ óδñѽѡ¡δσ í½«¬«ó
-
- ìá »«óÑñÑ¡¿Ñ ó αÑñá¬Γ«αÑ óδñѽѡ¡δσ í½«¬«ó ó½¿∩εΓ ñóá »áαá-
- ¼ÑΓαá - Persistent Blocks ¿ Overwrite Blocks. êσ ¼«ª¡« ¡á⌐Γ¿ ó
- ñ¿á½«ú«ó«¼ «¬¡Ñ Options│Enviroment│Editor.
-
- * àß½¿ ó¬½ετÑ¡ »áαá¼ÑΓα Persistent Blocks (Å«ßΓ«∩¡¡δÑ í½«-
- ¬¿), Γ« óδñѽѡ¡δÑ í½«¬¿ «ßΓáεΓß∩ óδñѽѡ¡δ¼¿ »«¬á óδ ¿σ
- ¡Ñ πñ὿ΓÑ ¿½¿ ¡Ñ «Γ¼Ñ¡¿ΓÑ óδñѽѡ¿Ñ (¿½¿ »«¬á ¡Ñ óδñѽ¿ΓÑ
- ñαπú«⌐ í½«¬).
-
- * àß½¿ »áαá¼ÑΓα Persistent Blocks ó䬽ετÑ¡, ¿ óδ »ÑαѼÑΘáÑΓÑ
- ¬παß«α ºá óδñѽѡ¡δ⌐ í½«¬, Γ« óδñѽѡ¿Ñ í½«¬á «Γ¼Ñ¡∩ÑΓß∩.
-
- * àß½¿ »áαá¼ÑΓα Persistent Blocks ó䬽ετÑ¡, Γ« »áαá¼ÑΓα
- Overwrite Blocks setting ¿ú¡«α¿απÑΓß∩.
-
- * àß½¿ ó¬½ετÑ¡ »áαá¼ÑΓα Overwrite Block (çáΓ¿αá¡¿Ñ í½«¬á), ¿
- óδ ¡áí¿αáÑΓÑ íπ¬óπ, Γ« óδñѽѡ¡δ⌐ í½«¬ ºá¼Ñ¡∩ÑΓß∩ ¡áíαá¡-
- ¡«⌐ íπ¬ó«⌐.
-
- * àß½¿ »áαá¼ÑΓα Overwrite Block ó䬽ετÑ¡, ¿ óδ ¡áí¿αáÑΓÑ
- íπ¬óπ, Γ« íπ¬óá óßΓáó½∩ÑΓß∩ »«ß½Ñ óδñѽѡ¡«ú« ΓѬßΓá.
-
- * àß½¿ »áαá¼ÑΓα Overwrite Block ó¬½ετÑ¡, á »áαá¼ÑΓα
- Persistent Block ó䬽ετÑ¡, ¿ óδ ¡áª¿¼áÑΓÑ ¬½áó¿Φπ Del ¿½¿
- ¬½áó¿Φπ Backspace, Γ« óÑß∞ óδñѽѡ¡δ⌐ ΓѬßΓá πñá½∩ÑΓß∩.
-
- àß½¿ óδ óßΓáó½∩ÑΓÑ ΓѬßΓ (¡áª¿¼á∩ ß¿¼ó«½ ¿½¿ óßΓáó½∩∩ Ñú« ¿º
- íπΣÑαá), Γ« óÑß∞ óδñѽѡ¡δ⌐ ΓѬßΓ ºá¼Ñ¡∩ÑΓß∩ óßΓáó½Ñ¡¡δ¼ ΓѬßΓ«¼.
-
-
-
- B.Pascal 7 & Objects /UG - 58 -
-
- Å«¿ß¬
- ─────────────────────────────────────────────────────────────────
-
- éδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ αÑñá¬Γ«α ñ½∩ »«¿ß¬á ßΓ᫬¿ ó ¿ßσ«ñ¡«¼
- ¬«ñÑ. ä½∩ »«¿ß¬á ßΓ᫬¿ ΓѬßΓá ó á¬Γ¿ó¡«¼ «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩ óδ-
- »«½¡¿ΓÑ ß½ÑñπεΘ¿Ñ Φáú¿:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Search│Find. Åα¿ φΓ«¼ «Γ¬αδóáÑΓß∩ ñ¿á½«-
- ú«ó«Ñ «¬¡« Find Text (Å«¿ß¬ ΓѬßΓá).
-
- 2. ìáíÑα¿ΓÑ ¿ß¬«¼πε ßΓ᫬π ó í½«¬Ñ óó«ñá Text to Find.
-
- 3. éδ ¼«ªÑΓÑ Γá¬ªÑ ºáñáΓ∞ αẽ¿τ¡δÑ »áαá¼ÑΓαδ »«¿ß¬á:
-
- * è¡«»¬¿ ß ¡Ñºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ Options (Åáαá¼ÑΓαδ) «»-
- αÑñѽ∩εΓ, íπñÑΓ »α¿ »«¿ß¬Ñ:
-
- - αẽ¿τáΓ∞ß∩ αÑú¿ßΓα ß¿¼ó«½«ó;
-
- - óδ»«½¡∩Γ∞ß∩ »«¿ß¬ Γ«½∞¬« »«½¡«ú« ß½«óá;
-
- - ¿ß»«½∞º«óáΓ∞ß∩ αÑúπ½∩α¡δÑ óδαáªÑ¡¿∩ («í ¿ß»«½∞º«óá¡¿¿
- αÑúπ½∩α¡δσ óδαáªÑ¡¿⌐ ó ßΓ᫬áσ »«¿ß¬á αáß߬áºδóáÑΓß∩
- ó Åα¿½«ªÑ¡¿¿ A "æ»αáó«τ¡«ú« απ¬«ó«ñßΓóá »α«úαá¼¼¿ß-
- Γá").
-
- * è¡«»¬¿ ß ºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ Scope (Äí½áßΓ∞ ñÑ⌐ßΓó¿∩)
- π»αáó½∩εΓ ΓѼ, ó ¬á¬«⌐ τáßΓ¿ Σá⌐½á óδ»«½¡∩ÑΓß∩ »«¿ß¬ -
- ó« óßÑ Σá⌐½Ñ ¿½¿ Γ«½∞¬« ó óδñѽѡ¡«¼ ΓѬßΓÑ.
-
- * è¡«»¬¿ ß ºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ Direction (ìá»αáó½Ñ¡¿Ñ)
- π»αáó½∩εΓ ΓѼ, ó ¬á¬«¼ ¡á»αáó½Ñ¡¿¿ óδ óδ»«½¡∩ÑΓÑ »«¿ß¬
- - ó »α∩¼«¼ ¿½¿ ó «íαáΓ¡«¼.
-
- * è¡«»¬¿ ß ºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ Origin (ìáτὫ) π»αáó½∩ÑΓ
- ΓѼ, «Γ¬πñá ¡áτ¿¡áÑΓß∩ »«¿ß¬.
-
- 4. ä½∩ óδ»«½¡Ñ¡¿∩ »«¿ß¬á óδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- 5. àß½¿ óδ σ«Γ¿ΓÑ óδ»«½¡¿Γ∞ »«óΓ«α¡δ⌐ »«¿ß¬ Γ«ú« ªÑ φ½Ñ¼Ñ¡-
- Γá, óδíÑα¿ΓÑ ¬«¼á¡ñπ Search│Search Again (Å«¿ß¬│Å«óΓ«α¡δ⌐
- »«¿ß¬).
-
- Å« π¼«½τá¡¿ε ó í½«¬Ñ óó«ñá Text to Find (ê߬«¼δ⌐ ΓѬßΓ) óδ-
- ó«ñ¿Γß∩ ß½«ó«, ¡á ¬«Γ«α«¼ »«º¿µ¿«¡¿απÑΓß∩ ¬παß«α. àß½¿ óδ ¡Ñ σ«-
- Γ¿ΓÑ, τΓ«íδ φΓ« »α«¿ßσ«ñ¿½«, ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Editor.
-
- 2. ÄΓ¼Ñ¡¿ΓÑ πßΓá¡«ó¬π »áαá¼ÑΓαá Find Text at Cursor.
-
- Åα¿ óδó«ñÑ ñ¿á½«ú«ó«ú« «¬¡á Find ó í½«¬Ñ óó«ñá óδó«ñ¿Γß∩
- ß½«ó«, ¡á ¬«Γ«α«¼ ¡áσ«ñ¿Γß∩ ¬παß«α. àß½¿ óδ σ«Γ¿ΓÑ ó¼ÑßΓ« «Γñѽ∞-
-
- B.Pascal 7 & Objects /UG - 59 -
-
- ¡«ú« ß½«óá ¡á⌐Γ¿ »αÑñ½«ªÑ¡¿Ñ ¿½¿ úαπ»»π ß½«ó, ¡áª¼¿ΓÑ ¬½áó¿Φπ >
- (¬«úñá ¬παß«α ¡áσ«ñ¿Γß∩ ó í½«¬Ñ óó«ñá Find Text). é í½«¬Ñ óó«ñá
- »«∩ó½∩ÑΓß∩ ñ«»«½¡¿Γѽ∞¡δ⌐ ΓѬßΓ, ¬á¬ Ñß½¿ íδ «¡ "óδΓ∩ú¿óá½ß∩" ¿º
- «¬¡á αÑñá¬Γ¿α«óá¡¿∩.
-
-
- Å«¿ß¬ ¿ ºá¼Ñ¡á
-
- ä½∩ »«¿ß¬á ßΓ᫬¿ ΓѬßΓá ¿ ºá¼Ñ¡δ ÑÑ ñαπú«⌐ ßΓ᫬«⌐ óδíÑα¿ΓÑ
- ¬«¼á¡ñπ Search│Replace (Å«¿ß¬│çá¼Ñ¡á). éδíÑα¿ΓÑ ó ñ¿á½«ú«ó«¼ «¬¡Ñ
- »áαá¼ÑΓαδ, ¬á¬ φΓ« ñѽáÑΓß∩ ñ½∩ ¬«¼á¡ñδ Search, ¡« ó¬½ετ¿ΓÑ ó
- í½«¬ Next Text ßΓ᫬π ºá¼Ñ¡δ.
-
- àß½¿ óδ σ«Γ¿ΓÑ ºá¼Ñ¡¿Γ∞ óßÑ óσ«ªñÑ¡¿∩ ßΓ᫬¿ ó ßó«Ñ¼ Σá⌐½Ñ,
- óδíÑα¿ΓÑ »áαá¼ÑΓα Change All. àß½¿ óδ óδíÑαÑΓÑ »áαá¼ÑΓα Prompt on
- Replace, αÑñá¬Γ«α íπñÑΓ óδ»«½¡∩Γ∞ »«¿ß¬, »«¬á ¡Ñ ¡á⌐ñÑΓ π¬áºá¡¡πε
- ßΓ᫬π, ºáΓѼ ºá»α«ß¿Γ, σ«Γ¿ΓÑ ½¿ óδ ÑÑ ºá¼Ñ¡¿Γ∞. àß½¿ óδ ¡Ñ ¿ß-
- »«½∞ºπÑΓÑ »áαá¼ÑΓα Prompt on Replace, ½πτΦÑ óδíαáΓ∞ »áαá¼ÑΓα
- Whole Words Only (Æ«½∞¬« »«½¡δÑ ß½«óá). ¥Γ« »«ºó«½¿Γ ¿ºíѪáΓ∞
- ß½πτáÑó ºá¼Ñ¡δ ß¿¼ó«½«ó ó ßÑαÑñ¿¡Ñ ß½«óá - 󫺼«ª¡«, óδ ¡Ñ σ«Γ¿-
- ΓÑ, τΓ«íδ φΓ« »α«¿ßσ«ñ¿½«.
-
-
- æ««ΓóÑΓßΓó¿Ñ »áα «úαá¡¿τ¿ΓѽÑ⌐
-
- ê¡«úñá óá¼ ¡Ñ ΓαÑíπÑΓß∩ ¿ß¬áΓ∞ ΓѬßΓ, á ¡πª¡« ¡á⌐Γ¿ ß««Γ-
- óÑΓßΓóπεΘ¿⌐ »áα¡δ⌐ «úαá¡¿τ¿Γѽ∞ (Σ¿úπα¡πε ¿½¿ ¬óáñαáΓ¡πε ߬«í¬π,
- «ñ¿¡áα¡πε ¬áóδτ¬π, ñó«⌐¡πε ¬áóδτ¬π, ñó«⌐¡«⌐ º¡á¬ ó«»α«ßá ¿½¿ ¬«¼-
- í¿¡áµ¿ε ߬«í¬¿ ¿ ºóѺñ«τ¬¿, «í«º¡áτáεΘπε ¬«¼¼Ñ¡Γáα¿⌐). ÅαÑñ»«½«-
- ª¿¼ π óáß ÑßΓ∞ ß½«ª¡«Ñ óδαáªÑ¡¿Ñ ß ¼¡«ªÑßΓó«¼ ó½«ªÑ¡¡δσ óδαáªÑ-
- ¡¿⌐, ¿ óδ σ«Γ¿ΓÑ πíÑñ¿Γ∞ß∩, τΓ« ¡Ñ »α«»πΘÑ¡á ¡¿ «ñ¡á ߬«í¬á. ìπª-
- ¡« ßñѽáΓ∞ ß½ÑñπεΘÑÑ:
-
- 1. Å«¼ÑßΓ¿ΓÑ ¬παß«α ¡á «úαá¡¿τ¿ΓÑ½Ñ (߬«í¬Ñ).
-
- 2. ì᪼¿ΓÑ ¬½áó¿Φ¿ Ctrl+Q[.
-
- ÉÑñá¬Γ«α ¡Ñ¼Ññ½Ñ¡¡« »ÑαѼÑΘáÑΓ ¬παß«α ¬ «úαá¡¿τ¿Γѽε, ß««Γ-
- óÑΓßΓóπεΘѼπ óδíαá¡¡«¼π. àß½¿ «¡ »ÑαѼÑΘáÑΓß∩ ¡á «úαá¡¿τ¿Γѽ∞,
- «Γ½¿τ¡δ⌐ «Γ «ª¿ñáѼ«ú« óἿ, Γ« φΓ« π¬áºδóáÑΓ ¡á «Φ¿í¬π.
-
- àß½¿ ñ½∩ óδíαá¡¡«ú« óἿ «úαá¡¿τ¿Γѽ∩ ¡ÑΓ ß««ΓóÑΓßΓóπεΘÑú«
- »áα¡«ú«, αÑñá¬Γ«α ¡Ñ ß¼ÑΘáÑΓ ¬παß«α.
-
- ìá ßἫ¼ ñÑ½Ñ ÑßΓ∞ ñóÑ ¬«¼á¡ñδ αÑñá¬Γ¿α«óá¡¿∩ »áα «úαá¡¿τ¿-
- ΓѽÑ⌐: «ñ¡á ñ½∩ »«¿ß¬á ß««ΓóÑΓßΓóπεΘÑ⌐ »áαδ ó »α∩¼«¼ ¡á»αáó½Ñ¡¿¿
- (Ctrl+Q[), á ñαπúá∩ - ó «íαáΓ¡«¼ (Ctrl+Q]).
-
- àß½¿ óδ »«¼ÑßΓ¿ΓÑ ¬παß«α ¡á «ñ¿¡áα¡πε ¿½¿ ñó«⌐¡πε ¬áóδτ¬π,
- αÑñá¬Γ«α ¡Ñ º¡áÑΓ, ó ¬á¬«¼ ¡á»αáó½Ñ¡¿¿ ¡πª¡« ¿ß¬áΓ∞ »áα¡δ⌐ «úαá-
- ¡¿τ¿Γѽ∞. é φΓ«¼ ß½πτáÑ óδ ñ«½ª¡δ ºáñáΓ∞ ¬«ααÑ¬Γ¡πε ¬«¼á¡ñπ »«¿ß-
- ¬á »áαδ.
-
-
- B.Pascal 7 & Objects /UG - 60 -
-
- ä½∩ ¬απú½δσ, ¬óáñαáΓ¡δσ ¿ Σ¿úπα¡δσ ߬«í«¬ ¡Ñ ¿¼ÑÑΓ º¡áτÑ¡¿∩,
- ¬á¬á∩ ¬«¼á¡ñá ¿ß»«½∞ºπÑΓß∩ ñ½∩ »«¿ß¬á »áαδ. ÉÑñá¬Γ«α º¡áÑΓ, ó ¬á-
- ¬«¼ ¡á»αáó½Ñ¡¿¿ ¿ß¬áΓ∞ ß««ΓóÑΓßΓóπεΘ¿⌐ «úαá¡¿τ¿Γѽ∞.
-
- Åα¿óÑñѼ »α¿¼Ñα, ¿½½εßΓα¿απεΘ¿⌐ ß««ΓóÑΓßΓó¿Ñ »áα:
-
- ß«ó»áñáεΘá∩ ß«ó»áñáεΘá∩ ß«ó»áñáεΘá∩
- »áαá »áαá »áαá
- ┌┴┐ ┌──┴──┐ ┌──┴──┐
- Array1[Array2[x]] ((x > 0) and (y < 0)
- └────┬────┘ └─────────┬────────┘
- ß«ó»áñáεΘá∩ ß«ó»áñáεΘá∩
- »áαá »áαá
-
- É¿ß. 4.1 Å«¿ß¬ ß««ΓóÑΓßΓóπεΘÑ⌐ ¬óáñαáΓ¡«⌐ ¿½¿ ¬απú½«⌐ ߬«í-
- ¬¿.
-
-
-
-
- B.Pascal 7 & Objects /UG - 61 -
-
- ÅÑαÑσ«ñ ¬ ßΓα«¬Ñ ß ºáñá¡¡δ¼ ¡«¼Ñα«¼
- ─────────────────────────────────────────────────────────────────
-
- ÉÑñá¬Γ«α «Γ߽Ѫ¿óáÑΓ, ¡á ¬á¬«⌐ ßΓα«¬Ñ ¡áσ«ñ¿Γß∩ ¬παß«α ó
- ßΓα«¬Ñ ß«ßΓ«∩¡¿∩ «¬¡á. üδßΓαδ⌐ ß»«ß«í »ÑαÑσ«ñá ó «»αÑñѽѡ¡«Ñ
- ¼ÑßΓ« ó Σá⌐½Ñ ß«ßΓ«¿Γ ó ¿ß»«½∞º«óá¡¿¿ ¬«¼á¡ñδ Go to Line Number
- (ÅÑαÑσ«ñ ¡á ßΓ᫬π ß ¡«¼Ñα«¼):
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Search│Go to Line Number.
-
- 2. ìáíÑα¿ΓÑ ¡«¼Ñα ßΓ᫬¿, ¡á ¬«Γ«απε óδ σ«Γ¿ΓÑ »ÑαÑ⌐Γ¿.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
-
- êß»«½∞º«óá¡¿Ñ ½«¬á½∞¡«ú« ¼Ñ¡ε «¬¡á αÑñá¬Γ¿α«óá¡¿∩
- ─────────────────────────────────────────────────────────────────
-
- î¡«ú¿Ñ ¿º Σπ¡¬µ¿⌐, óδ»«½¡∩Ѽδσ óἿ »α¿ αáí«ΓÑ ó «¬¡Ñ αÑñá¬-
- Γ¿α«óá¡¿∩, πñ«í¡« αáß»«½«ªÑ¡δ ó ½«¬á½∞¡«¼ ¼Ñ¡ε «¬¡á αÑñá¬Γ¿α«óá-
- ¡¿∩. è«úñá «¬¡« αÑñá¬Γ¿α«óá¡¿∩ á¬Γ¿ó¡«, óδ ¼«ªÑΓÑ óδóÑßΓ¿ ½«¬á½∞-
- ¡«Ñ ¼Ñ¡ε ñóπ¼∩ ß»«ß«íἿ:
-
- * ìáªáΓ∞ ¬½áó¿Φ¿ Alt+F10.
-
- * Öѽ¬¡πΓ∞ »αáó«⌐ ¬¡«»¬«⌐ "¼δΦ¿".
-
- ê¡ΓÑúα¿α«óá¡¡á∩ ßαÑñá IDE ß«ñÑαª¿Γ Γá¬ªÑ ñαπú¿Ñ ½«¬á½∞¡δÑ
- ¼Ñ¡ε. Åα«τ¿Γáó «í ¿ß»«½∞º«óá¡¿¿ ß»αáó«τ¡¿¬á Help, «Γ½áñ¬Ñ ¿ »α«ß-
- ¼«ΓαÑ, óδ πº¡áÑΓÑ, úñÑ ¡áσ«ñ∩Γß∩ «ßΓá½∞¡δÑ ½«¬á½∞¡δÑ ¼Ñ¡ε.
-
-
-
-
- B.Pascal 7 & Objects /UG - 62 -
-
- éδñѽѡ¿Ñ ß¿¡Γá¬ß¿ßá
- ─────────────────────────────────────────────────────────────────
-
- è«úñá óδ »¿ΦÑΓÑ ¿½¿ αÑñá¬Γ¿απÑΓÑ »α«úαá¼¼π ¡á Åá߬á½Ñ, ¡Ñ¬«-
- Γ«αδÑ τáßΓ¿ ¿ßσ«ñ¡«ú« ¬«ñá óδó«ñ∩Γß∩ ¡á φ¬αá¡ αáº¡δ¼¿ µóÑΓἿ.
- ìá»α¿¼Ñα, ºáαѺÑαó¿α«óá¡¡δÑ ß½«óá Borland Pascal óδó«ñ∩Γß∩ íѽδ¼
- µóÑΓ«¼, á «ßΓá½∞¡«⌐ ΓѬßΓ - ªÑ½Γδ¼. Æá¬«Ñ µóÑΓ«ó«Ñ óδñѽѡ¿Ñ ¿ß-
- σ«ñ¡«ú« ¬«ñá «í½ÑúτáÑΓ íδßΓαπε ¿ñÑ¡Γ¿Σ¿¬áµ¿ε τáßΓÑ⌐ ¬«ñá.
-
- ûóÑΓá ΓѬßΓá
-
- ùΓ«íδ ¿º¼Ñ¡¿Γ∞ µóÑΓ φ½Ñ¼Ñ¡Γá, óδ»«½¡¿ΓÑ ß½ÑñπεΘ¿Ñ Φáú¿:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Colors. éδó«ñ¿Γß∩ ñ¿-
- Ὣú«ó«Ñ «¬¡« Colors (ûóÑΓá).
-
-
- ╔═[ ]═══════════════════════Colors═════════════════════════╗
- ║ ║
- ║ Group Item ║
- ║ Compiler ^ Whitespace ^ ┌─Foreground─────┐ ║
- ║ Desktop ▒ Comments ▒ │▒▒▒▒▓▓▓▓▒▒▒▒ │ ║
- ║ Dialogs ▒ Reserved words ▒ │▓▓▓▓████ ░░░░│ ║
- ║ Help ▒ Identifiers ▒ │████ ░░░░████│ ║
- ║ Menus ▒ Symbols ▒ └────────────────┘ ║
- ║ Messages ▒ Strings ▒ ┌─Background─────┐ ║
- ║ Output ▒ Members ▒ │▒▒▒▒▓▓▓▓▒▒▒▒ │ ║
- ║ Register █ Assembler ▒ │▓▓▓▓████ ░░░░│ ║
- ║ ▓Syntax▓▓▓▓▓▓▓▒ ▒ │████ ░░░░ │ ║
- ║ Watches ▒ ▒ └────────────────┘ ║
- ║ ▒ █ Text░Text░Text░ ║
- ║ v v Text░Text░Text░ ║
- ║ ║
- ║ █████OK████ ███Cancel███ ███Help████ ║
- ║ ▒▒▒▒▒▒▒▒▒▒▒ ▒▒▒▒▒▒▒▒▒▒▒▒ ▒▒▒▒▒▒▒▒▒▒▒ ║
- ║ ║
- ╚══════════════════════════════════════════════════════════╝
-
- É¿ß. 4.2 ä¿á½«ú«ó«Ñ «¬¡« Colors.
-
- Colors - µóÑΓá; Group - úαπ»»á; Compiler - ¬«¼»¿½∩Γ«α;
- Desktop - «»ÑαáΓ¿ó¡á∩ «í½áßΓ∞; Dialogs - ñ¿á½«ú¿; Help -
- ß»αáó«τ¡¿¬; Menus - ¼Ñ¡ε; Messages - ß««íΘÑ¡¿∩; Output -
- óδó«ñ; Register - αÑú¿ßΓα; Syntax - ß¿¡Γá¬ß¿ß; Watches -
- óδαáªÑ¡¿∩ »α«ß¼«Γαá; Item - φ½Ñ¼Ñ¡Γ; Whitespace - »α«íѽ;
- Comments - ¬«¼¼Ñ¡Γáα¿⌐; Reserved words - ºáαѺÑαó¿α«óá¡-
- ¡δÑ ß½«óá; Identifiers - ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ; Symbols - ¿¼Ñ¡á;
- Strings - ßΓ᫬¿; Members - φ½Ñ¼Ñ¡Γδ (τ½Ñ¡δ); Assembler -
- áßßѼí½Ñα; Foreground - «ß¡«ó¡«⌐ µóÑΓ; Background - Σ«¡«-
- óδ⌐ µóÑΓ.
-
- é í½«¬Ñ ß»¿ß¬á ß½Ñóá óδó«ñ∩Γß∩ óßÑ úαπ»»δ φ½Ñ¼Ñ¡Γ«ó, ¬«-
- Γ«αδÑ óδ ¼«ªÑΓÑ óδñѽ∩Γ∞ µóÑΓ«¼ ó IDE.
-
- B.Pascal 7 & Objects /UG - 63 -
-
-
- 2. Å᫬απΓ¿ΓÑ í½«¬ ß»¿ß¬á Group, »«¬á ¡Ñ πó¿ñ¿ΓÑ úαπ»»π
- Syntax (æ¿¡Γá¬ß¿ß). éδíÑα¿ΓÑ úαπ»»π Syntax ¿ ó í½«¬Ñ
- ß»¿ß¬á Item óδóÑñπΓß∩ φ½Ñ¼Ñ¡Γδ ¬«ñá Åá߬á½∩, ¬«Γ«αδÑ óδ
- ¼«ªÑΓÑ óδñѽ∩Γ∞ µóÑΓ«¼.
-
- 3. éδñѽ¿ΓÑ φ½Ñ¼Ñ¡Γ, ¬«Γ«αδ⌐ óδ σ«Γ¿ΓÑ ¿º¼Ñ¡∩Γ∞ ó í½«¬Ñ
- ᯨ᪠ Item.
-
- 4. éδíÑα¿ΓÑ «ß¡«ó¡«⌐ ¿ Σ«¡«óδ⌐ µóÑΓ, ¬«Γ«αδ⌐ óδ σ«Γ¿ΓÑ ¡áº-
- ¡áτ¿Γ∞ ñ½∩ φ½Ñ¼Ñ¡Γá.
-
- * ùΓ«íδ óδíαáΓ∞ Σ«¡«óδ⌐ µóÑΓ ß »«¼«Θ∞ε "¼δΦ¿", Θѽ¬¡¿ΓÑ
- ÑÑ ¬¡«»¬«⌐ ¡á ¡πª¡«¼ µóÑΓÑ ¼áΓα¿µδ µóÑΓ«ó Foreground.
- ùΓ«íδ óδíαáΓ∞ µóÑΓ ß »«¼«Θ∞ε ¬½áó¿áΓπαδ, ¡áª¿¼á⌐ΓÑ ¬½á-
- ó¿Φπ Tab, »«¬á ¡Ñ íπñÑΓ óδíαá¡á ¼áΓα¿µá Σ«¡«ó«ú« µóÑΓá,
- ºáΓѼ ñ½∩ óδñѽѡ¿∩ µóÑΓá ¿ß»«½∞ºπ⌐ΓÑ ¬½áó¿Φ¿ ßΓαѽ«¬.
-
- * ùΓ«íδ óδíαáΓ∞ Σ«¡«óδ⌐ µóÑΓ, óδíÑα¿ΓÑ ¡πª¡δ⌐ µóÑΓ ó ¼áΓ-
- α¿µÑ µóÑΓ«ó Background.
-
- èá¬ Γ«½∞¬« óδ ßñѽáÑΓÑ óδí«α µóÑΓá, «¡ íπñÑΓ «ΓαáªÑ¡ ó
- »α¿¼ÑαÑ ΓѬßΓ«ó«ú« «¬¡á.
-
- 5. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- éδí«α Σá⌐½«ó ñ½∩ óδñѽѡ¿∩
-
- Å« π¼«½τá¡¿ε óδñѽѡ¿Ñ ß¿¡Γá¬ß¿ßá »α«¿ßσ«ñ¿Γ Γ«½∞¬« ó Σá⌐½áσ
- ß αáßΦ¿αÑ¡¿∩¼¿ .PAS ¿ .INC. éδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ óδñѽѡ¿Ñ ß¿¡-
- Γá¬ß¿ßá ó Σá⌐½áσ ñαπú«ú« Γ¿»á.
-
- ùΓ«íδ ¿º¼Ñ¡¿Γ∞ Γ¿» Σá⌐½«ó, óδó«ñ¿¼δσ ß óδñѽѡ¿Ñ¼ ß¿¡Γá¬ß¿-
- ßá, ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Editor.
-
- 2. 꺼ѡ¿ΓÑ ΓѬßΓ ó í½«¬Ñ Highlight Extensions.
-
- ä«»π߬áÑΓß∩ ½εí«Ñ αáºαÑΦÑ¡¡«Ñ ¿¼∩ Σá⌐½á DOS, ó¬½ετá∩ Γαá-
- ΣáαÑΓ¡δÑ ß¿¼ó«½δ. éδ ¼«ªÑΓÑ ºáñáΓ∞ ¡Ñ߬«½∞¬« ¿¼Ñ¡ Σá⌐½«ó.
- é φΓ«¼ ß½πτáÑ ¿σ ¡πª¡« αáºñѽ¿Γ∞ ñó«ÑΓ«τ¿∩¼¿.
-
- çá»αÑΘÑ¡¿Ñ óδñѽѡ¿∩ ß¿¡Γá¬ß¿ßá
-
- àß½¿ óδ ¡Ñ σ«Γ¿ΓÑ ¿ß»«½∞º«óáΓ∞ óδñѽѡ¿Ñ ß¿¡Γá¬ß¿ßá, Γ« ¼«-
- ªÑΓÑ ó䬽ετ¿Γ∞ Ñú«:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Editor.
-
- 2. ÄΓ¼Ñ¡¿ΓÑ óδí«α »áαá¼ÑΓαá Syntax Highlight (éδñѽѡ¿Ñ ß¿¡-
- Γá¬ß¿ßá).
-
-
- B.Pascal 7 & Objects /UG - 64 -
-
- ûóÑΓ «íδτ¡«ú« ΓѬßΓá ¿º¼Ñ¡∩ÑΓß∩ ¼«ñ¿Σ¿¬áµ¿Ñ⌐ »áαá¼ÑΓαá
- Editor│Normal Text ó ñ¿á½«ú«ó«¼ «¬¡Ñ Options│Enviroment│Coplors.
- àß½¿ óδ ¡Ñ ó䬽ετ¿ΓÑ »«ñßóÑΓ¬π ß¿¡Γá¬ß¿ßá, ¿º¼Ñ¡Ñ¡¿Ñ µóÑΓá «íδτ-
- ¡«ú« ΓѬßΓá ¡Ñ ñÑ⌐ßΓóπÑΓ.
-
-
-
-
- B.Pascal 7 & Objects /UG - 65 -
-
- ÅÑτáΓ∞ ¿ßσ«ñ¡«ú« ¬«ñá
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ óδ σ«Γ¿ΓÑ »«½πτ¿Γ∞ »ÑτáΓ¡πε ¬«»¿ε ßó«Ñú« ¿ßσ«ñ¡«ú« ¬«-
- ñá, óδíÑα¿ΓÑ ¬«¼á¡ñπ File│Print. IDE αáßΦ¿α∩ÑΓ ß¿¼ó«½δ Γáíπ½∩µ¿¿
- (ºá¼Ñ¡∩∩ Γáíπ½∩µ¿ε ß««ΓóÑΓßΓóπεΘ¿¼ τ¿ß½«¼ »α«íѽ«ó ¿ ºáΓѼ »Ñτá-
- ΓáÑΓ óáΦ Σá⌐½.
-
- éδñѽѡ¿Ñ φ½Ñ¼Ñ¡Γ«ó ß¿¡Γá¬ß¿ßá »α¿ »ÑτáΓ¿
-
- éδ ¼«ªÑΓÑ ¡á»ÑτáΓáΓ∞ ΓѬßΓ Γᬿ¼ «íαẫ¼, τΓ«íδ ß¿¡Γá¬ß¿τÑß-
- ¬¿Ñ φ½Ñ¼Ñ¡Γδ í뫨 óδñѽѡδ. ÅÑαÑñ »ÑτáΓ∞ε óδ ñ«½ª¡δ »α«»πßΓ¿Γ∞
- óδó«ñ¿¼δ⌐ ¡á »α¿¡ΓÑα ΓѬßΓ τÑαÑñ »α«úαá¼¼π-Σ¿½∞Γα PRNFLTR.EXE:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ File│Printer Setup.
-
- 2. àß½¿ »α«úαá¼¼á PRNFLTR.EXE ¡Ñ ¡áσ«ñ¿Γß∩ »« óáΦѼπ ¼áαΦαπ-
- Γπ ¿½¿ ó ΓѬπΘѼ ¬áΓὫúÑ, ñ«íáó∞ΓÑ ¿¡Σ«α¼áµ¿ε « ΓѬπΘѼ
- ¼áαΦαπΓÑ ó ºá»¿ß∞ PRNFLTR ó ñ¿á½«ú«ó«¼ «¬¡Ñ Filter Path.
-
- 3. é í½«¬Ñ óó«ñá Command Line óδ ¼«ªÑΓÑ π¬áºáΓ∞ »α¿¡ΓÑα
- Epsor, HP LaserJet ¿½¿ PostScript.
-
- * àß½¿ óδ ¿ß»«½∞ºπÑΓÑ »α¿¡ΓÑα Epson, óóÑñ¿ΓÑ:
-
- $NOSWAP /EPSON
-
- * àß½¿ óδ ¿ß»«½∞ºπÑΓÑ »α¿¡ΓÑα HP LaserJet, óóÑñ¿ΓÑ:
-
- $NOSWAP /HP
-
- * àß½¿ óδ ¿ß»«½∞ºπÑΓÑ »α¿¡ΓÑα PostScript, óóÑñ¿ΓÑ:
-
- $NOSWAP /PS
-
- àß½¿ π óáß ñαπú«⌐ Γ¿» »α¿¡ΓÑαá, Γ« óδ ¼«ªÑΓÑ ¼«ñ¿Σ¿µ¿α«-
- óáΓ∞ Σá⌐½ PRNFLTR.PAS, τΓ«íδ ó«ß»α¿¡¿¼á½¿ß∞ ß««ΓóÑΓßΓóπ-
- εΘ¿Ñ ¬«ñδ.
-
- 4. ôßΓá¡«ó¿ΓÑ »áαá¼ÑΓα Send Highllighting Escape Codes.
-
- 5. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- 6. éδíÑα¿ΓÑ ¬«¼á¡ñπ File│Print.
-
- àß½¿ »áαá¼ÑΓα Syntax Highlight πßΓá¡«ó½Ñ¡, óáΦ ΓѬßΓ »Ñ-
- τáΓáÑΓß∩ ß óδñѽѡ¿Ñ¼ ß¿¡Γá¬ß¿τÑ߬¿σ φ½Ñ¼Ñ¡Γ«ó.
-
-
-
- B.Pascal 7 & Objects /UG - 66 -
-
- Éáí«Γá ß Σá⌐½á¼¿
- ─────────────────────────────────────────────────────────────────
-
- Åα¿ »α«úαá¼¼¿α«óá¡¿¿ ó IDE óδ ¼«ªÑΓÑ ß«ºñáóáΓ∞ ¡«óδÑ Σá⌐½δ,
- «Γ¬αδóáΓ∞ ßπΘÑßΓóπεΘ¿Ñ Σá⌐½δ ¿ ß«σαá¡∩Γ∞ ¿σ. Äß¡«ó¡δÑ ¬«¼á¡ñδ αá-
- í«Γδ ß Σá⌐½á¼¿ »ÑαÑτ¿ß½Ñ¡δ ó ß½ÑñπεΘÑ⌐ Γáí½¿µÑ:
-
- ┌──────────────────┬──────────────────────────────────┐
- │ 諼á¡ñá │ Ä»¿ßá¡¿Ñ │
- ├──────────────────┼──────────────────────────────────┤
- │ File│New │ ÄΓ¬αδóáÑΓ ¡«ó«Ñ «¬¡« αÑñá¬Γ¿α«-│
- │ │ óá¡¿∩ ¿ »α¿ßóá¿óáÑΓ Ñ¼π óαѼѡ¡«Ñ│
- │ │ ¿¼∩. │
- ├──────────────────┼──────────────────────────────────┤
- │ File│Open │ éδó«ñ¿Γ ñ¿á½«ú«ó«Ñ «¬¡«, ß »«-│
- │ │ ¼«Θ∞ε ¬«Γ«α«ú« ¼«ª¡« «Γ¬αδΓ∞│
- │ │ Σá⌐½. │
- ├──────────────────┼──────────────────────────────────┤
- │ File│Save │ æ«σαá¡∩ÑΓ Σá⌐½ ó á¬Γ¿ó¡«¼ «¬¡Ñ│
- │ │ αÑñá¬Γ«αá ¡á ñ¿ß¬Ñ. │
- ├──────────────────┼──────────────────────────────────┤
- │ File│Save As │ æ«σαá¡∩ÑΓ Σá⌐½ ó á¬Γ¿ó¡«¼ «¬¡Ñ│
- │ │ αÑñá¬Γ«αá »«ñ ñαπú¿¼ ¿¼Ñ¡Ñ¼. │
- ├──────────────────┼──────────────────────────────────┤
- │ File│Save All │ æ«σαá¡∩ÑΓ óßÑ ¼«ñ¿Σ¿µ¿α«óá¡¡δÑ│
- │ │ Σá⌐½δ. │
- └──────────────────┴──────────────────────────────────┘
-
-
-
- B.Pascal 7 & Objects /UG - 67 -
-
- ÄΓ¬αδΓ¿Ñ Σá⌐½«ó
- ─────────────────────────────────────────────────────────────────
-
- ä½∩ «Γ¬αδΓ¿∩ Σá⌐½á óδ»«½¡¿ΓÑ ß½ÑñπεΘ¿Ñ Φáú¿:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ File│Open. éδó«ñ¿Γß∩ ñ¿á½«ú«ó«Ñ «¬¡«
- Open a File (ÄΓ¬αδΓ¿Ñ Σá⌐½á). ä½∩ ºáñá¡¿∩ «Γ¬αδóáѼ«ú«
- Σá⌐½á óδ ¼«ªÑΓÑ óδ»«½¡¿Γ∞ «ñ¡« ¿º ß½ÑñπεΘ¿σ ñÑ⌐ßΓó¿⌐.
-
- * é í½«¬Ñ óó«ñá ¡áíÑα¿ΓÑ »«½¡«Ñ ¿¼∩ Σá⌐½á.
-
- * ìáíÑα¿ΓÑ ¿¼∩ Σá⌐½á ß ΓαáΣáαÑΓ¡δ¼¿ ß¿¼ó«½á¼¿. ¥Γ« «Γ-
- Σ¿½∞Γα«óδóáÑΓ ß»¿ß«¬ Σá⌐½«ó ó ß««ΓóÑΓßΓó¿¿ ß óáΦ¿¼¿
- ߻ѵ¿Σ¿¬áµ¿∩¼¿. é ß»¿ß¬Ñ Files óδíÑα¿ΓÑ ¿¼∩ Σá⌐½á, ¬«-
- Γ«αδ⌐ óδ σ«Γ¿ΓÑ αÑñá¬Γ¿α«óáΓ∞.
-
- * ä½∩ óδó«ñá ß»¿ß¬á »α«Γ«¬«½á (߻ѵ¿Σ¿¬áµ¿⌐ ¿¼Ñ¡ Σá⌐½«ó,
- ¬«Γ«αδÑ óδ ºáñáó὿ αá¡ÑÑ), ¡áª¼¿ΓÑ ßΓαѽ¬π 󡿺. éδíÑ-
- α¿ΓÑ ΓαÑíπѼ«Ñ ¿¼∩ Σá⌐½á ¿½¿ ߻ѵ¿Σ¿¬áµ¿ε. éδí«α ߻ѵ¿-
- Σ¿¬áµ¿¿ Σá⌐½á óδó«ñ¿Γ Σá⌐½δ, ß««ΓóÑΓßΓóπεΘ¿Ñ ñá¡¡«⌐
- ߻ѵ¿Σ¿¬áµ¿¿.
-
- * äóáªñδ Θѽ¬¡πó "¼δΦ∞ε" ¡á ¿¼Ñ¡¿ ñαπú«ú« ¬áΓὫúá ó
- ß»¿ß¬Ñ Σá⌐½«ó, »α«ß¼«Γα¿ΓÑ ß«ñÑন¼«Ñ φΓ«ú« ¬áΓὫúá.
- éδíÑα¿ΓÑ ¿¼∩ Σá⌐½á, ¬«Γ«αδ⌐ óδ σ«Γ¿ΓÑ αÑñá¬Γ¿α«óáΓ∞.
-
- 2. Å«ß½Ñ Γ«ú« ¬á¬ ¿¼∩ Σá⌐½á, ¬«Γ«αδ⌐ óδ σ«Γ¿ΓÑ αÑñá¬Γ¿α«-
- óáΓ∞, íπñÑΓ óδñѽѡ« ó í½«¬Ñ óó«ñá, óδíÑα¿ΓÑ ¬«¼á¡ñπ Open
- (ÄΓ¬αδΓ∞) ¿½¿ Replace (çá¼Ñ¡¿Γ∞). 諼á¡ñá Open ºáúαπªáÑΓ
- Σá⌐½ ó ¡«ó«Ñ «¬¡« αÑñá¬Γ¿α«óá¡¿∩; ¬«¼á¡ñá Replace ºá¼Ñ¡∩-
- ÑΓ ß«ñÑন¼«Ñ á¬Γ¿ó¡«ú« «¬¡á αÑñá¬Γ¿α«óá¡¿∩ óδíαá¡¡δ¼
- Σá⌐½«¼.
-
- Å«ß½Ñ óδñѽѡ¿∩ ¿¼Ñ¡¿ Σá⌐½á óδ ¼«ªÑΓÑ »α«ßΓ« ¡áªáΓ∞ ¬½áó¿Φπ
- Enter ¿½¿, ¬«úñá πó¿ñ¿ΓÑ ¿¼∩ ¡πª¡«ú« Σá⌐½á ó ß»¿ß¬Ñ, ñóáªñδ Θѽ¬-
- ¡πΓ∞ ¡á ¡Ñ¼ ¬¡«»¬«⌐ "¼δΦ¿". öá⌐½ íπñÑΓ «Γ¬αδΓ.
-
- àß½¿ óδ «Γ¬α«ÑΓÑ «ñ¿¡ ¿½¿ í«½ÑÑ Σá⌐½«ó, á ºáΓѼ ºá¬α«ÑΓÑ ¿σ,
- Γ« πó¿ñ¿ΓÑ ¿σ ß»¿ß«¬ ó ¡¿ª¡Ñ⌐ τáßΓ¿ ¼Ñ¡ε File (ñ« »∩Γ¿ Σá⌐½«ó).
- àß½¿ óδ óδíÑα¿ΓÑ ó ¼Ñ¡ε «ñ¿¡ ¿º φΓ¿σ »∩Γ¿ Σá⌐½«ó, Γ« Σá⌐½ «Γ¬αδ-
- óáÑΓß∩ ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩. è«úñá óδ αáí«ΓáÑΓÑ ß ¡Ñ߬«½∞¬¿¼¿
- «Γ¬αδΓ묨 Σá⌐½á¼¿, Γ« ¼«ªÑΓÑ ºá¬αδΓ∞ ¡Ñ¬«Γ«αδÑ ¿º ¡¿σ, »α¿ ¡Ñ«í-
- σ«ñ¿¼«ßΓ¿ íδßΓα« «Γ¬αδóá∩ ¿σ ß¡«óá ß »«¼«Θ∞ε ß»¿ß¬á. ¥Γ« π¼Ñ¡∞Φ¿Γ
- »ÑαÑúαπªÑ¡¡«ßΓ∞ óáΦÑ⌐ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿.
-
- éδ ¼«ªÑΓÑ Γá¬ªÑ ¿º¼Ñ¡¿Γ∞ ¿ß»«½∞ºπѼδ⌐ »« π¼«½τá¡¿ε ¬áΓὫú
- ¡á Γ«Γ, ó ¬«Γ«α«¼ ¡áσ«ñ¿Γß∩ «Γ¬αδóáѼδ⌐ óἿ Σá⌐½. ¥Γ« ¿º¼Ñ¡∩ÑΓ
- »«óÑñÑ¡¿Ñ, ºáñá¡¡«Ñ »ÑαѼѡ¡δ¼¿ «»Ñαᵿ«¡¡«⌐ ßαÑñδ Windows:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Preferences.
-
- 2. ôßΓá¡«ó¿ΓÑ »áαá¼ÑΓα Change Dir (æ¼Ñ¡á ¬áΓὫúá).
-
-
- B.Pascal 7 & Objects /UG - 68 -
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
-
- ÄΓ¬αδΓ¿Ñ Σá⌐½á ó »«º¿µ¿¿ ¬παß«αá
- ─────────────────────────────────────────────────────────────────
-
- IDE ñáÑΓ óá¼ íδßΓαδ⌐ ß»«ß«í «Γ¬αδΓ¿∩ Σá⌐½á, ¿¼∩ ¬«Γ«α«ú« ¡á-
- σ«ñ¿Γß∩ ó óáΦѼ ¿ßσ«ñ¡«¼ ¬«ñÑ. éδ ¡á⌐ñÑΓÑ φΓ« πñ«í¡δ¼, ¬«úñá »«Γ-
- αÑíπÑΓß∩ »α«ß¼«ΓαÑΓ∞ ¬«ñ ¼«ñπ½∩ ¿½¿ ó¬½ετáѼ«ú« Σá⌐½á, ¿ß»«½∞ºπÑ-
- ¼«ú« ó óáΦÑ⌐ »α«úαá¼¼Ñ.
-
- 1. Å«¼ÑßΓ¿ΓÑ ¬παß«α ¡á ¿¼∩ Σá⌐½á, ¬«Γ«αδ⌐ óδ σ«Γ¿ΓÑ «Γ¬αδΓ∞.
-
- 2. ì᪼¿ΓÑ ¬½áó¿Φ¿ Ctrl+Enter ¿½¿ óδóÑñ¿ΓÑ ½«¬á½∞¡«Ñ ¼Ñ¡ε
- «¬¡á αÑñá¬Γ¿α«óá¡¿∩ ¿ óδíÑα¿ΓÑ ¬«¼á¡ñπ Open File at
- Cursor (ÄΓ¬αδΓ¿Ñ Σá⌐½á ó »«º¿µ¿¿ ¬παß«αá).
-
-
-
-
- B.Pascal 7 & Objects /UG - 69 -
-
- 諼»¿½∩µ¿∩ ¿ óδ»«½¡Ñ¡¿Ñ
- ─────────────────────────────────────────────────────────────────
-
- IDE »αÑñ«ßΓáó½∩ÑΓ óá¼ ¡Ñ߬«½∞¬« ß»«ß«í«ó ß«ºñá¡¿∩ óδ»«½¡∩Ñ-
- ¼«⌐ »α«úαá¼¼δ, ¼«ñπ½∩ ¿½¿ (Ñß½¿ óδ ¿ß»«½∞ºπÑΓÑ ºáΘ¿ΘÑ¡¡δ⌐ αѪ¿¼)
- ñ¿¡á¼¿τÑ߬¿ ¬«¼»«¡πѼπε í¿í½¿«ΓѬπ. éδ ¼«ªÑΓÑ:
-
- * 欫¼»¿½¿α«óáΓ∞ ΓѬπΘ¿⌐ Σá⌐½ ß »«¼«Θ∞ε ¬«¼á¡ñδ (Compile│
- Compile).
-
- * 欫¼»¿½¿α«óáΓ∞ óßÑ ¿º¼Ñ¡Ñ¡¡δÑ Σá⌐½δ (Compile│Make).
-
- * 欫¼»¿½¿α«óáΓ∞ óßÑ Σá⌐½δ »α«Ñ¬Γá (Compile│Build).
-
- * 欫¼»¿½¿α«óáΓ∞ ¿ óδ»«½¡¿Γ∞ »α«úαá¼¼π (Run│Run).
-
- èáªñá∩ ¿º φΓ¿σ 󫺼«ª¡«ßΓÑ⌐ »«ñσ«ñ¿Γ ñ½∩ ¬«¡¬αÑΓ¡«⌐ ß¿Γπá-
- µ¿¿. æ½ÑñπεΘ¿Ñ αáºñÑ½δ »«¼«úπΓ óá¼ αÑΦ¿Γ∞, ¬á¬πε 󫺼«ª¡«ßΓ∞ ½πτ-
- ΦÑ ¿ß»«½∞º«óáΓ∞.
-
-
- éδí«α µÑ½Ñó«⌐ »½áΓΣ«α¼δ
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ óδ ¿ß»«½∞ºπÑΓÑ BP.EXE, Γ« »ÑαÑñ ¬«¼»¿½∩µ¿Ñ⌐ ßó«Ñ⌐ »α«ú-
- αá¼¼δ óá¼ ¡πª¡« ß««íΘ¿Γ∞ IDE, ¬á¬«⌐ ó¿ñ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ óδ
- ß«ºñáÑΓÑ: »α«úαá¼¼π DOS αÑá½∞¡«ú« αѪ¿¼á, »α«úαá¼¼π Windows ¿½¿
- »α«úαá¼¼π DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á. Æ¿» ß«ºñáóáѼ«⌐ »α¿¬½áñ¡«⌐
- »α«úαá¼¼δ ¡áºδóáÑΓß∩ µÑ½Ñó«⌐ »½áΓΣ«α¼«⌐.
-
- Åα¿¼Ñτá¡¿Ñ: TURBO.EXE ¼«ªÑΓ ß«ºñáóáΓ∞ »α¿½«ªÑ¡¿Ñ αÑ-
- á½∞¡«ú« αѪ¿¼á.
-
- ä½∩ óδí«αá µÑ½Ñó«⌐ »½áΓΣ«α¼δ ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Compile│Target.
-
- 2. é ñ¿á½«ú«ó«¼ «¬¡Ñ Target óδíÑα¿ΓÑ ¡πª¡πε µÑ½Ñóπε »½áΓΣ«α-
- ¼π.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
-
- B.Pascal 7 & Objects /UG - 70 -
-
- Åα¿ ¬«¼»¿½∩µ¿¿ ¼«ñπ½∩ αáßΦ¿αÑ¡¿∩ ¿¼Ñ¡¿ Σá⌐½á »«½πτÑ¡¡«ú« ó
- αѺπ½∞ΓáΓÑ ¼«ñπ½∩ ó ºáó¿ß¿¼«ßΓ¿ «Γ µÑ½Ñó«⌐ »½áΓΣ«α¼δ íπñπΓ αẽ¿-
- τáΓ∞ß∩:
-
- ┌───────────────────────────┬───────────────────────────────┐
- │ ûѽÑóá∩ »½áΓΣ«α¼á │ ÉáßΦ¿αÑ¡¿Ñ ¿¼Ñ¡¿ Σá⌐½á ¼«ñπ½∩ │
- │ │ «íΩÑ¬Γ¡«ú« ¬«ñá │
- ├───────────────────────────┼───────────────────────────────┤
- │ ÉÑá½∞¡δ⌐ αѪ¿¼ DOS │ .TPU │
- │ │ │
- │ Windows │ .TPW │
- │ │ │
- │ çáΘ¿ΘÑ¡¡δ⌐ αѪ¿¼ DOS │ .TPP │
- └───────────────────────────┴───────────────────────────────┘
-
-
- B.Pascal 7 & Objects /UG - 71 -
-
- 諼»¿½∩µ¿∩
- ─────────────────────────────────────────────────────────────────
-
- 諼á¡ñá Compile│Compile ¬«¼»¿½¿απÑΓ Γ«½∞¬« Σá⌐½ ó á¬Γ¿ó¡«¼
- «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩. Åα¿ ¬«¼»¿½∩µ¿¿ »α«úαá¼¼δ óδó«ñ¿Γß∩ «¬¡« ß«ß-
- Γ«∩¡¿∩, ó ¬«Γ«α«¼ ß««íΘáÑΓß∩ « σ«ñÑ ¿ αѺπ½∞ΓáΓáσ ¬«¼»¿½∩µ¿¿.
- è«úñá ¬«¼»¿½∩µ¿∩ ¿ ¬«¼»«¡«ó¬á íπñÑΓ óδ»«½¡Ñ¡á, ¡áª¼¿ΓÑ ½εíπε ¬½á-
- ó¿Φπ. Ĭ¡« ß«ßΓ«∩¡¿∩ ¿ßτѺ¡ÑΓ. àß½¿ ¿¼ÑÑΓß∩ «Φ¿í¬á, ó óÑασ¡Ñ⌐
- τáßΓ¿ «¬¡á αÑñá¬Γ¿α«óá¡¿∩ óδ πó¿ñ¿ΓÑ ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ, á ¬πα-
- ß«α íπñÑΓ »«º¿µ¿«¡¿α«óá¡ ¡á Γπ ßΓ᫬𠬫ñá, úñÑ ¿¼ÑÑΓß∩ «Φ¿í¬á.
-
- éδí«α ¼ÑßΓá ¡áº¡áτÑ¡¿∩
-
- àß½¿ óδ ¿ß»«½∞ºπÑΓÑ IDE ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á, Γ« ß »«¼«Θ∞ε ¬«-
- ¼á¡ñδ Compile│Destination ¼«ªÑΓÑ óδíαáΓ∞ ¬«¼»¿½∩µ¿ε »α«úαá¼¼δ ¡á
- ñ¿ß¬ ¿½¿ ó »á¼∩Γ∞. àß½¿ óδ óδíÑαÑΓÑ ¬«¼»¿½∩µ¿ε ¡á ñ¿ß¬, óáΦ óδ-
- »«½¡∩Ѽδ⌐ ¬«ñ ß«σαá¡∩ÑΓß∩ ¡á ñ¿ß¬Ñ ó ó¿ñÑ Σá⌐½á .EXE. 諼»¿½∩µ¿∩
- ¡á ñ¿ß¬ πóѽ¿τ¿óáÑΓ «íΩѼ »á¼∩Γ¿, ñ«ßΓπ»¡«⌐ ó IDE ñ½∩ ¬«¼»¿½∩µ¿¿
- ¿ «Γ½áñ¬¿ óáΦÑ⌐ »α«úαá¼¼. Åα¿ óδí«αÑ ¬«¼»¿½∩µ¿¿ ó »á¼∩Γ∞ óáΦá
- »α«úαá¼¼á íπñÑΓ ºá»¿ßδóáΓ∞ß∩ ó »á¼∩Γ∞, ¿, Ñß½¿ óδ ÑÑ ¡Ñ ß«σαá¡¿-
- ΓÑ, íπñÑΓ »«ΓÑα∩¡á »α¿ óδσ«ñÑ ¿º IDE.
-
- Åα¿ ¬«¼»¿½∩µ¿¿ ¡á ñ¿ß¬ »«½πτÑ¡¡δÑ ó αѺπ½∞ΓáΓÑ Σá⌐½δ .EXE
- ¿½¿ .TPU ß«σαá¡∩εΓß∩ ó Γ«¼ ªÑ ¬áΓὫúÑ, τΓ« ¿ ¿ßσ«ñ¡δÑ Σá⌐½δ, ¿½¿
- ó ¬áΓὫúÑ EXE and TPU (Options│Directories), Ñß½¿ «¡ ºáñá¡.
-
- ö«α¼¿α«óá¡¿Ñ (Make)
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ óáΦá »α«úαá¼¼á ó¬½ετáÑΓ ó ßÑí∩ ¡Ñ Γ«½∞¬« ¿ßσ«ñ¡δ⌐ ¬«ñ ó
- á¬Γ¿ó¡«¼ «¬¡Ñ, ¡á»α¿¼Ñα, «ß¡«ó¡«⌐ Σá⌐½, «ñ¿¡ ¿½¿ í«½ÑÑ ¼«ñπ½Ñ⌐,
- ó¡ÑΦ¡¿Ñ ¼«ñ㫨 ¡á ∩ºδ¬Ñ áßßѼí½Ñαá ¿ Γ.ñ., Γ« óδ ¼«ªÑΓÑ ßΣ«α¼¿α«-
- óáΓ∞ ßó«ε »α«úαá¼¼π. Åα¿ Σ«α¼¿α«óá¡¿¿ ¬«¼»¿½¿απÑΓß∩ óÑß∞ ¿ßσ«ñ¡δ⌐
- ¬«ñ, ¬«Γ«αδ⌐ íδ½ ¼«ñ¿Σ¿µ¿α«óá¡ ß ¼«¼Ñ¡Γá »«ß½Ññ¡Ñ⌐ ¬«¼»¿½∩µ¿¿.
-
- 諼á¡ñá Compile│Make ß«ºñáÑΓ Σá⌐½ .EXE ¿½¿ ¼«ñπ½∞. àß½¿ óδ
- ó ¬áτÑßΓóÑ µÑ½Ñó«⌐ »½áΓΣ«α¼δ ¿ß»«½∞ºπÑΓÑ IDE ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á ¿
- Windows, «¡á ¼«ªÑΓ Γá¬ªÑ ß«ºñáóáΓ∞ ñ¿¡á¼¿τÑ߬¿ ¬«¼»«¡πѼπε í¿í½¿-
- «ΓѬπ (DLL).
-
- Åα¿¼Ñτá¡¿Ñ: Ä ß«ºñá¡¿¿ DLL αáß߬áºδóáÑΓß∩ ó â½áóÑ 11
- "ü¿í½¿«ΓѬ¿ ñ¿¡á¼¿τÑ߬«⌐ ¬«¼»«¡«ó¬¿" "Éπ¬«ó«ñßΓóá »« ∩ºδ-
- ¬π".
-
- 諼á¡ñá Make (ö«α¼¿α«óá¡¿Ñ) ¿ß»«½∞ºπÑΓ ß½ÑñπεΘ¿Ñ »αáó¿½á:
-
- * àß½¿ ºáñá¡ «ß¡«ó¡«⌐ Σá⌐½, Γ« «¡ ¬«¼»¿½¿απÑΓß∩. é »α«Γ¿ó¡«¼
- ß½πτáÑ ¬«¼»¿½¿απÑΓß∩ Σá⌐½ ó á¬Γ¿ó¡«¼ «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩.
- ÅÑαÑñ ¬«¼»¿½∩µ¿Ñ⌐ IDE »α«óÑα∩ÑΓ óßÑ Σá⌐½δ, τΓ«íδ πíÑñ¿Γ∞-
- ß∩, τΓ« «¡¿ ßπΘÑßΓóπεΓ ¿ ∩ó½∩εΓß∩ ΓѬπΘ¿¼¿.
-
- Åα¿¼Ñτá¡¿Ñ: ü«½ÑÑ »«ñα«í¡« «í «ß¡«ó¡δσ Σá⌐½á αáß߬á-
- ºδóáÑΓß∩ ¡¿ªÑ.
-
- B.Pascal 7 & Objects /UG - 72 -
-
-
- * àß½¿ ¿ßσ«ñ¡δ⌐ Σá⌐½ ñ½∩ ñá¡¡«ú« ¼«ñπ½∩ ¼«ñ¿Σ¿µ¿α«óá¡ ß ¼«-
- ¼Ñ¡Γá ß«ºñá¡¿∩ Σá⌐½á .TPU, .TPW ¿½¿ .TPP («íΩÑ¬Γ¡δ⌐ ¬«ñ),
- Γ« φëà ¼«ñπ½∞ »ÑαѬ«¼»¿½¿απÑΓß∩.
-
- * àß½¿ ¿º¼Ñ¡∩ÑΓß∩ ¿¡ΓÑαΣÑ⌐ß ñ½∩ ñá¡¡«ú« ¼«ñπ½∩, »ÑαѬ«¼»¿½¿-
- απεΓß∩ óßÑ ñαπú¿Ñ ºáó¿ß∩Θ¿Ñ «Γ ¡Ñú« ¼«ñπ½¿.
-
- Åα¿¼Ñτá¡¿Ñ: Ä ¼«ñπ½∩σ »«ñα«í¡ÑÑ αáß߬áºδóáÑΓß∩ ó â½á-
- óÑ 7 "î«ñ㫨 Borland Pascal".
-
- * àß½¿ ¼«ñπ½∞ ¬«¼»«¡πÑΓß∩ ß Σá⌐½«¼ .OBJ (ó¡ÑΦ¡¿Ñ »«ñ»α«úαá¼-
- ¼δ) ¿ Σá⌐½ .OBJ ∩ó½∩ÑΓß∩ í«½ÑÑ ¡«óδ¼, τѼ ¼«ñ㫨 .TPU,
- .TPW ¿½¿ .TPP, Γ« ¼«ñπ½∞ »ÑαѬ«¼»¿½¿απÑΓß∩.
-
- * àß½¿ ¼«ñπ½∞ ß«ñÑαª¿Γ ó¬½ετáѼδ⌐ Σá⌐½, ¿ ó¬½ετáѼδ⌐ Σá⌐½
- í«½ÑÑ ¡«óδ⌐, τѼ ¼«ñ㫨 .TPU, .TPW ¿½¿ .TPP, Γ« ¼«ñπ½∞ »Ñ-
- αѬ«¼»¿½¿απÑΓß∩.
-
- àß½¿ ¬«¼»¿½∩Γ«α ¡Ñ ¼«ªÑΓ ¡á⌐Γ¿ ¿ßσ«ñ¡δ⌐ ¬«ñ ¼«ñπ½∩, Γ« ¼«-
- ñπ½∞ ¡Ñ ¬«¼»¿½¿απÑΓß∩ ¿ ¿ß»«½∞ºπÑΓß∩ ¬á¬ ÑßΓ∞.
-
-
-
- B.Pascal 7 & Objects /UG - 73 -
-
- Å«ßΓα«Ñ¡¿Ñ (Build)
- ─────────────────────────────────────────────────────────────────
-
- 諼á¡ñá Compile│Build (諼»¿½∩µ¿∩│Å«ßΓα«Ñ¡¿Ñ) »ÑαÑßΓαá¿óáÑΓ
- óßÑ ¬«¼»«¡Ñ¡Γδ óáΦÑ⌐ »α«úαá¼¼δ ¡Ñºáó¿ß¿¼« «Γ Γ«ú«, ∩ó½∩εΓß∩ «¡¿
- ΓѬπΘ¿¼¿ ¿½¿ ¡ÑΓ.
-
- ¥Γá ¬«¼á¡ñá á¡á½«ú¿τ¡á ¬«¼á¡ñÑ Compile│Make, Γ«½∞¬« «¡á óδ-
- »«½¡∩ÑΓ »«½¡πε »ÑαѬ«¼»¿½∩µ¿ε, ñáªÑ Ñß½¿ Σá⌐½ ¡Ñ ¿º¼Ñ¡∩½ß∩. àß½¿
- óδ «ßΓá¡«ó¿ΓÑ ¬«¼á¡ñπ Build, ¡áªáó ¬½áó¿Φ¿ Ctrl+Break, ¿½¿ »«½π-
- τ¿ΓÑ «Φ¿í¬¿, ¬«Γ«αδÑ »αѬαáΘáεΓ »«ßΓα«Ñ¡¿Ñ, Γ«, óδíαáó Compile│
- Make, óδ ¼«ªÑΓÑ «»αÑñѽ¿Γ∞, úñÑ φΓ« »α«¿º«Φ½«.
-
- àß½¿ ó IDE αÑá½∞¡«ú« αѪ¿¼á DOS óδ óδíα὿ ¬«¼»¿½∩µ¿ε ó »á-
- ¼∩Γ∞, Γ« óßÑ Σá⌐½δ .TPU «í¡«ó½∩εΓß∩ ¡á ñ¿ß¬Ñ (ñ½∩ óßÑσ »ÑαѬ«¼»¿-
- ½¿απѼδσ ¬«¼á¡ñ«⌐ Build ¼«ñπ½Ñ⌐).
-
-
- éδ»«½¡Ñ¡¿Ñ
- ─────────────────────────────────────────────────────────────────
-
- Å«ß½Ñ ß«ºñá¡¿∩ óδ»«½¡∩Ѽ«ú« Σá⌐½á óδ ¼«ªÑΓÑ »«»α«í«óáΓ∞, ¬á¬
- «¡á αáí«ΓáÑΓ. ä½∩ φΓ«ú« ¼«ª¡« ¿ß»«½∞º«óáΓ∞ ¬«¼á¡ñπ Run│Run. ìá
- ßἫ¼ ñÑ½Ñ óá¼ ¡Ñ ¡πª¡« »αÑñóáα¿Γѽ∞¡« ¬«¼»¿½¿α«óáΓ∞ ßó«ε »α«ú-
- αá¼¼π. àß½¿ óáΦ ¬«ñ ¿º¼Ñ¡¿½ß∩ ß ¼«¼Ñ¡Γá »«ß½Ññ¡Ñ⌐ ¬«¼»¿½∩µ¿¿, ¬«-
- ¼á¡ñá Run áóΓ«¼áΓ¿τÑ߬¿ Σ«α¼¿απÑΓ óáΦπ »α«úαá¼¼π ¿ ºáΓѼ óδ»«½¡∩-
- ÑΓ ÑÑ.
-
- àß½¿ óáΦá »α«úαá¼¼á »αÑñßΓáó½∩ÑΓ ß«í«⌐ »α¿¬½áñ¡πε »α«úαá¼¼π
- DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á, Γ« ó ΓѬπΘѼ ¬áΓὫúÑ ¿½¿ »« ¼áαΦαπΓπ DOS
- π óáß ñ«½ª¡δ ¡áσ«ñ¿Γ∞ß∩ Σá⌐½δ DPMI16BL.OVL ¿ RTM.EXE, ó »α«Γ¿ó¡«¼
- ß½πτáÑ »α«úαá¼¼á óδ»«½¡∩Γ∞ß∩ ¡Ñ íπñÑΓ. éδ ¼«ªÑΓÑ ßó«í«ñ¡« αáß»-
- α«ßΓαá¡∩Γ∞ φΓ¿ Σá⌐½δ ß ú«Γ«ó«⌐ »α¿¬½áñ¡«⌐ »α«úαá¼¼«⌐.
-
- ÅÑαÑñáτá »α«úαá¼¼Ñ »áαá¼ÑΓα«ó
-
- Åα¿ ºá»π᪥ »α«úαá¼¼δ óδ ¼«ªÑΓÑ »ÑαÑñáΓ∞ Ñ⌐ »áαá¼ÑΓαδ ¬«-
- ¼á¡ñ¡«⌐ ßΓ᫬¿. ä½∩ óδó«ñá ñ¿á½«ú«ó«ú« «¬¡á Parameters (Åáαá¼ÑΓ-
- αδ) ¿ ¡áí«αá ß»¿ß¬á »áαá¼ÑΓα«ó, ¬«Γ«αδÑ óδ σ«Γ¿ΓÑ ¿ß»«½∞º«óáΓ∞,
- óδíÑα¿ΓÑ ¬«¼á¡ñπ Run│Paramenters.
-
-
- B.Pascal 7 & Objects /UG - 74 -
-
- Åáαá¼ÑΓαδ ¬«¼»¿½∩Γ«αá ¿ ¬«¼»«¡«óΘ¿¬á
- ─────────────────────────────────────────────────────────────────
-
- IDE »«ºó«½∩ÑΓ óá¼ óδíαáΓ∞ ¡Ñ߬«½∞¬« »áαá¼ÑΓα«ó, ó½¿∩εΘ¿σ ¡á
- σáαá¬ΓÑα ¬«¼»¿½∩µ¿¿ ¬«ñá. ä½∩ óδó«ñá ñ¿á½«ú«ó«ú« «¬¡á »áαá¼ÑΓα«ó
- ¬«¼»¿½∩Γ«αá Compiler Options óδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Compiler.
- àß½¿ óδ ¡Ñ πóÑαÑ¡δ «Γ¡«ß¿Γѽ∞¡« Γ«ú«, τΓ« ñѽáÑΓ ¬«¡¬αÑΓ¡δ⌐ »áαá-
- ¼ÑΓα, óδíÑα¿ΓÑ Ñú« ó ñ¿á½«ú«ó«¼ «¬¡Ñ, ó ßΓα«¬Ñ ß«ßΓ«∩¡¿∩ »«∩ó¿Γß∩
- »«∩ß¡∩εΘá∩ ß»αáó¬á. ä½∩ óδó«ñá í«½ÑÑ »«ñα«í¡«⌐ ¿¡Σ«α¼áµ¿¿ « ñá¡-
- ¡«¼ »áαá¼ÑΓαÑ ¡áª¼¿ΓÑ ¬½áó¿Φπ F1 ¿½¿ óδíÑα¿ΓÑ ¬«¼á¡ñπ Help ñ½∩
- »«½πτÑ¡¿∩ ß»αáó«τ¡«⌐ ¿¡Σ«α¼áµ¿¿ «í« óßѼ ñ¿á½«ú«ó«¼ «¬¡Ñ Compiler
- Options.
-
- ╔═[ ]══════════════════════Compiler Options═════════════════════╗
- ║ Compiler settings for: ▒▒Real mode target▒▒▒▒▒▒▒▒▒▒v▒║
- ║───────────────────────────────────────────────────────────────║
- ║ Code generation ║
- ║ ▒[▒]▒Force▒far▒calls▒▒▒▒▒▒▒▒▒[▒]▒286▒instructions▒▒▒▒▒▒▒▒▒ ║
- ║ ▒[▒]▒Overlays▒allowed▒▒▒▒▒▒▒▒[▒]▒Smart▒callbacks▒▒▒▒▒▒▒▒▒▒ ║
- ║ ▒[X]▒Word▒align▒data▒▒▒▒▒▒▒▒▒[▒]▒Windows▒stack▒frames▒▒▒▒▒ ║
- ║ Runtime errors Syntax Options ║
- ║ ▒[▒]▒Range▒checking▒▒▒▒▒ ▒[X]▒Strict▒var-strings▒▒▒▒▒▒▒ ║
- ║ ▒[X]▒Stack▒checking▒▒▒▒▒ ▒[▒]▒Complete▒boolean▒eval▒▒▒▒ ║
- ║ ▒[X]▒I/O▒checking▒▒▒▒▒▒▒ ▒[X]▒Extended▒syntax▒▒▒▒▒▒▒▒▒▒ ║
- ║ ▒[ ]▒Overflow▒checking▒▒ ▒[▒]▒Typed▒@▒operator▒▒▒▒▒▒▒▒▒ ║
- ║ Debugging ▒[▒]▒Open▒parameters▒▒▒▒▒▒▒▒▒▒ ║
- ║ ▒[X]▒Debug▒Information▒▒ Numeric processing ║
- ║ ▒[X]▒Local▒symbols▒▒▒▒▒▒ ▒[▒]▒8087/80287▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒ ║
- ║ ▒[X]▒Symbol▒information▒ ▒[X]▒Emulation▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒ ║
- ║ ║
- ║ Conditional defines ║
- ║ ██████████████████████████████████████████████████████████v█ ║
- ║ ║
- ║ █████OK████ ███Cancel███ ███Help████ ║
- ║ ▒▒▒▒▒▒▒▒▒▒▒ ▒▒▒▒▒▒▒▒▒▒▒▒ ▒▒▒▒▒▒▒▒▒▒▒ ║
- ║ ║
- ╚═══════════════════════════════════════════════════════════════╝
-
- É¿ß. 4.3 ä¿á½«ú«ó«Ñ «¬¡« Compiler Options.
-
- Compiler settings for - πßΓá¡«ó¬¿ ¬«¼»¿½∩Γ«αá ñ½∩; Real mode
- target - µÑ½Ñóá∩ »½áΓΣ«α¼á αÑá½∞¡«ú« αѪ¿¼á; Code generation -
- úÑ¡Ñαᵿ∩ ¬«ñá; Force far calls - »α¿¡πñ¿Γѽ∞¡«Ñ ¿ß»«½∞º«óá¡¿Ñ
- ó맮ó«ó ñá½∞¡Ñú« Γ¿»á; 286 instructions - ¿¡ßΓαπ¬µ¿¿ »α«µÑßß«αá
- 286; Overlays allowed - ñ«»πßΓ¿¼«ßΓ∞ «óÑα½ÑÑó; Smart callbacks -
- φΣΣÑ¬Γ¿ó¡δÑ ó맮óδ; Word align data - óδαáó¡¿óá¡¿Ñ ñá¡¡δσ ¡á úαá-
- ¡¿µπ ß½«óá; Windows stack frames ¬áñαδ ßΓѬá Windows; Runtime
- errors - «Φ¿í¬¿ φΓá»á óδ»«½¡Ñ¡¿∩; Syntax Options - ß¿¡Γá¬ß¿τÑ߬¿Ñ
- «Φ¿í¬¿; Range checking - »α«óÑα¬á ñ¿á»áº«¡á; Strict var-strings -
- ßΓα«úá∩ »α«óÑα¬á ßΓ᫬«óδσ »ÑαѼѡ¡δσ; Stack checking - »α«óÑα¬á
- ßΓѬá; Complete boolean eval - »«½¡«Ñ óδτ¿ß½Ñ¡¿Ñ íπ½Ñó߬¿σ óδαá-
- ªÑ¡¿⌐; I/O checking - »α«óÑα¬á óó«ñá-óδó«ñá; Extended syntax -
- αáßΦ¿αÑ¡¡δ⌐ ß¿¡Γá¬ß¿ß; Overflow checking - »α«óÑα¬á »ÑαÑ»«½¡Ñ¡¿∩
-
- B.Pascal 7 & Objects /UG - 75 -
-
- ßΓѬá; Typed @ operator - Γ¿»¿º«óá¡¡á∩ «»Ñαᵿ∩ @; Debugging -
- «Γ½áñ¬á; Open parameters - «Γ¬αδΓδÑ »áαá¼ÑΓαδ; Debug Information
- - «Γ½áñ«τ¡á∩ ¿¡Σ«α¼áµ¿∩; Numeric processing - τ¿ß½«óá∩ «íαáí«Γ¬á;
- Local symbols - ½«¬á½∞¡δÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ; 8087/80287 - »α«µÑßß«αδ
- 8087/80287; Symbol information - ½«¬á½∞¡á∩ ¿¡Σ«α¼áµ¿∩; Emulation
- - φ¼π½∩µ¿∩; Conditional defines - πß½«ó¡δÑ «»αÑñѽѡ¿∩.
-
- çáñá¡¿Ñ »áαá¼ÑΓα«ó
- ¬«¼»¿½∩Γ«αá ñ½∩ µÑ½Ñó«⌐ »½áΓΣ«α¼δ
-
- éδí¿αáѼδÑ óἿ »áαá¼ÑΓαδ ¬«¼»¿½∩Γ«αá ó ß¿½∞¡«⌐ ßΓѻѡ¿ ºá-
- ó¿ß∩Γ «Γ Γ«ú«, ¬á¬πε µÑ½Ñóπε »½áΓΣ«α¼π óδ ¿ß»«½∞ºπÑΓÑ. ìá»α¿¼Ñα,
- Ñß½¿ óδ ß«ºñáÑΓÑ »α¿½«ªÑ¡¿Ñ DOS αÑá½∞¡«ú« αѪ¿¼á, Γ« ¼«ªÑΓÑ αáº-
- αÑΦ¿Γ∞ ¿ß»«½∞º«óá¡¿Ñ «óÑα½ÑÑó, τΓ« ¡Ñ ΓαÑíπÑΓß∩ ñ½∩ »α«úαá¼¼
- Windows ¿½¿ ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á DOS.
-
- ä½∩ π¬áºá¡¡«⌐ µÑ½Ñó«⌐ »½áΓΣ«α¼δ óδ ¼«ªÑΓÑ πßΓá¡«ó¿Γ∞ ßΓá¡-
- ñáαΓ¡δÑ »áαá¼ÑΓαδ ¬«¼»¿½∩Γ«αá:
-
- Åα¿¼Ñτá¡¿Ñ: îÑ¡ε Compiler Options ¬«¼»¿½∩Γ«αá
- TURBO.EXE ¡Ñ ¿¼ÑÑΓ »áαá¼ÑΓαá Compiler Setting For.
-
- 1. ä½∩ óδó«ñá »α«¬απτ¿óáѼ«ú« ß»¿ß¬á Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á
- ßΓαѽ¬Ñ v ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φπ ßΓαѽ¬¿ 󡿺 »α¿ óδí«αÑ
- í½«¬á ß»¿ß¬á Compiler Setting For.
-
- 2. Åα«óÑα∞ΓÑ óδíαá¡¡πε µÑ½Ñóπε »½áΓΣ«α¼π.
-
- IDE áóΓ«¼áΓ¿τÑ߬¿ πßΓá¡áó½¿óáÑΓ «íδτ¡« ¿ß»«½∞ºπѼδÑ »áαá¼ÑΓ-
- αδ. é ½εí«⌐ ¼«¼Ñ¡Γ óδ ¼«ªÑΓÑ »ÑαÑ«»αÑñѽ¿Γ∞ φΓ¿ óδíαá¡¡δÑ ó IDE
- »áαá¼ÑΓαδ.
-
- àß½¿ »áαá¼ÑΓα ¬«¼»¿½∩Γ«αá ¡Ñß«ó¼ÑßΓ¿¼ ß óδíαá¡¡«⌐ µÑ½Ñó«⌐
- »½áΓΣ«α¼«⌐, Γ« «¡ ßΓá¡«ó¿Γß∩ Γπ߬½δ¼, ¿ óδ ¡Ñ ¼«ªÑΓÑ Ñú« óδí¿-
- αáΓ∞.
-
- ôßΓá¡«ó¬á »áαá¼ÑΓα«ó
- ¬«¼»¿½∩Γ«αá ñ½∩ óßÑσ µÑ½Ñóδσ »½áΓΣ«α¼
-
- àß½¿ óδ σ«Γ¿ΓÑ τΓ«íδ ¬«¡¬αÑΓ¡δ⌐ »áαá¼ÑΓα ¬«¼»¿½∩Γ«αá íδ½ πß-
- Γá¡«ó½Ñ¡ ¡Ñºáó¿ß¿¼« «Γ ¿ß»«½∞ºπѼ«⌐ µÑ½Ñó«⌐ »½áΓΣ«α¼δ, ßñѽá⌐ΓÑ
- ß½ÑñπεΘÑÑ:
-
- 1. é ¬áτÑßΓóÑ º¡áτÑ¡¿∩ »áαá¼ÑΓαá Compiler Settings For óδíÑ-
- α¿ΓÑ All Targets.
-
- 2. ôßΓá¡«ó¿ΓÑ ¿½¿ «Γ¼Ñ¡¿ΓÑ »áαá¼ÑΓα ¬«¼»¿½∩Γ«αá, ¬«Γ«αδ⌐ óδ
- σ«Γ¿ΓÑ πßΓá¡«ó¿Γ∞.
-
- ìá»α¿¼Ñα, Ñß½¿ óδ σ«Γ¿ΓÑ ¿ß»«½∞º«óáΓ∞ ¿¡ßΓαπ¬µ¿¿ »α«µÑßß«αá
- 286 ñ½∩ óßÑσ »½áΓΣ«α¼, óδíÑα¿ΓÑ All Targets (éßÑ »½áΓΣ«α¼δ), ºá-
- ΓѼ πßΓá¡«ó¿ΓÑ »áαá¼ÑΓα 286 instructions.
-
-
- B.Pascal 7 & Objects /UG - 76 -
-
- è«úñá óδ óδí¿αáÑΓÑ All Targets, Γ« ¼«ªÑΓÑ πó¿ñÑΓ∞, τΓ« ó ¡Ñ-
- ¬«Γ«αδσ ¬¡«»¬áσ ß ¡Ñºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐ óδó«ñ¿Γß∩ ó«»α«ß¿Γѽ∞¡δ⌐
- º¡á¬ (?). ¥Γ« π¬áºδóáÑΓ, Γ« πßΓá¡«ó¬á »áαá¼ÑΓαá ñ½∩ óßÑσ »½áΓΣ«α¼
- ¡Ñ ∩ó½∩ÑΓß∩ «ñ¿¡á¬«ó«⌐. éδ ¼«ªÑΓÑ ¿º¼Ñ¡¿Γ∞ φëà »áαá¼ÑΓα, ßñѽáó
- Ñú« «ñ¿¡á¬«óδ¼ ñ½∩ óßÑσ »½áΓΣ«α¼, ¿½¿ «ßΓáó¿Γ∞ ¬á¬ ÑßΓ∞.
-
- çáñá¡¿Ñ »áαá¼ÑΓα«ó ¬«¼»«¡«óΘ¿¬á
-
- òáαá¬ΓÑα ¬«¼»«¡«ó¬¿ óáΦÑú« ¬«ñá ºáó¿ß¿Γ «Γ πßΓá¡«ó«¬ ó ñ¿á-
- ½«ú«ó«¼ «¬¡Ñ Linker Options (Åáαá¼ÑΓαδ ¬«¼»«¡«óΘ¿¬á). ä½∩ Ñú« óδ-
- ó«ñá óδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Linker. àß½¿ ¡πª¡á í«½ÑÑ ñÑΓá½∞¡á∩
- ¿¡Σ«α¼áµ¿∩, óδíÑα¿ΓÑ Help.
-
- 鬽ετÑ¡¿Ñ ó ¬«ñ ñ¿αÑ¬Γ¿ó ¬«¼»¿½∩Γ«αá
-
- æπΘÑßΓóπÑΓ ÑΘÑ «ñ¿¡ ß»«ß«í ºáñá¡¿∩ αѪ¿¼á ¬«¼»¿½∩µ¿¿ ¿ßσ«ñ-
- ¡«ú« ¬«ñá. é¼ÑßΓ« ¿ß»«½∞º«óá¡¿∩ ñ½∩ πßΓá¡«ó¬¿ »áαá¼ÑΓα«ó ñ¿á½«ú«-
- óδσ «¬«¡ óδ ¼«ªÑΓÑ ó¬½ετ¿Γ∞ ó ßó«⌐ ¬«ñ ñ¿αÑ¬Γ¿óδ ¬«¼»¿½∩Γ«αá.
- ìá»α¿¼Ñα, óδ ¼«ªÑΓÑ ó¬½ετ¿Γ∞ ó ßó«ε »α«úαá¼¼π »α«óÑα¬π ñ¿á»áº«¡á,
- πßΓá¡«ó¿ó ó ñ¿á½«ú«ó«¼ «¬¡Ñ Options│Compiler »áαá¼ÑΓα Range
- Checking, ¿½¿ »«¼ÑßΓ¿Γ∞ ó ¿ßσ«ñ¡δ⌐ ¬«ñ ñ¿αÑ¬Γ¿óπ {$R+}. Å«½¡«Ñ
- «»¿ßá¡¿Ñ ñ¿αÑ¬Γ¿ó ¬«¼»¿½∩Γ«αá ¿ ¿σ ¿ß»«½∞º«óá¡¿∩ óδ ¼«ªÑΓÑ ¡á⌐Γ¿
- ó â½áóÑ 2 ("ä¿αÑ¬Γ¿óδ ¬«¼»¿½∩Γ«αá") "æ»αáó«τ¡«ú« απ¬«ó«ñßΓóá
- »α«úαá¼¼¿ßΓá".
-
- 鬽ετáѼδÑ ó ¿ßσ«ñ¡δ⌐ ¬«ñ ñ¿αÑ¬Γ¿óδ ¬«¼»¿½∩Γ«αá ¿¼ÑεΓ í«½∞-
- Φ¿⌐ »α¿«α¿ΓÑΓ, τѼ »áαá¼ÑΓαδ ¬«¼»¿½∩Γ«αá, πßΓá¡áó½¿óáѼδÑ ó IDE.
- ìá»α¿¼Ñα, Ñß½¿ ó IDE óδ πßΓá¡«ó¿ΓÑ »áαá¼ÑΓα Range Checking, ¡«
- óáΦá »α«úαá¼¼á ó¬½ετáÑΓ ó ßÑí∩ ñ¿αÑ¬Γ¿óπ {R-}, Γ« »α«úαá¼¼á ¬«¼-
- »¿½¿απÑΓß∩ ß ó䬽ετÑ¡¡«⌐ »α«óÑᬫ⌐ ñ¿á»áº«¡á.
-
- Ä»Γ¿¼¿ºáµ¿∩ ¬«ñá
-
- ìѬ«Γ«αδÑ »áαá¼ÑΓαδ ¬«¼»¿½∩Γ«αá, »«ß¬«½∞¬π «¡¿ ó¬½ετáεΓ ó
- »α«úαá¼¼π ¬«ñ »α«óÑન ¿ «íαáí«Γ¬¿ «Φ¿í«¬, ó½¿∩εΓ ¬á¬ ¡á αẼÑα,
- Γᬠ¿ ¡á ߬«α«ßΓ∞ óáΦÑú« ¬«ñá. ò«Γ∩ Γá¬¿Ñ »áαá¼ÑΓαδ »«½Ñº¡« ¿ß-
- »«½∞º«óáΓ∞ »α¿ αáºαáí«Γ¬Ñ »α«úαá¼¼δ, íѺ ¡¿σ óδ ¼«ªÑΓÑ »«½πτ¿Γ∞
- í«½ÑÑ íδßΓαδ⌐ ¿ ¬«¼»á¬Γ¡δ⌐ ¬«ñ.
-
- Åα¿óÑñѼ »áαá¼ÑΓαδ, ó½¿∩εΘ¿Ñ ¡á «»Γ¿¼¿ºáµ¿ε ¬«ñá. èáªñá∩ ñ¿-
- αÑ¬Γ¿óá ¬«¼»¿½∩Γ«αá ß«»α«ó«ªñáÑΓß∩ π¬áºá¡¿Ñ¼ ß««ΓóÑΓßΓóπεΘÑú« »á-
- αá¼ÑΓαá ¬«¼»¿½∩Γ«αá. Éáßß¼«Γα¿¼ ¿ß»«½∞º«óá¡¿Ñ ñ½∩ ºáóÑαΦáεΘÑ⌐
- ¬«¼»¿½∩µ¿¿ ß½ÑñπεΘ¿σ »áαá¼ÑΓα«ó:
-
- * éδαáó¡¿óá¡¿Ñ ñá¡¡δσ ¡á úαá¡¿µπ ß½«óá Word Align Data
- ({$A+}) óδαáó¡¿óáÑΓ »ÑαѼѡ¡δÑ ¿ Γ¿»¿º¿α«óá¡¡δÑ ¬«¡ßΓá¡Γδ
- ¡á úαá¡¿µπ ß½«óá, τΓ« ñáÑΓ ó ß¿ßΓѼáσ ß »α«µÑßß«αἿ 80x86
- í«½ÑÑ íδßΓαδ⌐ ñ«ßΓπ» ¬ »á¼∩Γ¿.
-
- * é䬽ετÑ¡¿Ñ »«½¡«ú« óδτ¿ß½Ñ¡¿∩ íπ½Ñó߬¿σ óδαáªÑ¡¿⌐ Complete
- Boolean Evaluation ({$B-}) ñáÑΓ ¬«ñ, ¬«Γ«αδ⌐ ó ºáó¿ß¿¼«ßΓ¿
- «Γ πßΓá¡«ó¬¿ óáΦ¿σ íπ½Ñó߬¿σ óδαáªÑ¡¿⌐ í«½ÑÑ íδßΓα« αáí«-
- ΓáÑΓ.
-
- B.Pascal 7 & Objects /UG - 77 -
-
-
- * Åα¿ ó䬽ετÑ¡¡«⌐ φ¼π½∩µ¿¿ Emulation ({$E-}) ¬«¼»¿½∩Γ«α ¡Ñ
- íπñÑΓ óδ»«½¡∩Γ∞ ¬«¼»«¡«ó¬π ß í¿í½¿«ΓѬ«⌐ ¿ß»«½¡∩εΘÑ⌐ ß¿ß-
- ΓѼδ, φ¼π½¿απεΘÑ⌐ ß«»α«µÑßß«α 80x87. Ä¡á ñ«½ª¡á ¿ß»«½∞º«-
- óáΓ∞ ß«»α«µÑßß«α 80σ87 (ó ß½πτáÑ Ñú« ¡á½¿τ¿∩) ¿½¿ ßΓá¡-
- ñáαΓ¡δ⌐ 6-íá⌐Γ«óδ⌐ Γ¿» Real. Åα¿ ¬«¼»¿½∩µ¿¿ »α¿½«ªÑ¡¿⌐
- Windows φ¼π½∩µ¿∩ ¡Ñ ¿ß»«½∞ºπÑΓß∩; »α¿ ¡á½¿τ¿¿ ñ¿αÑ¬Γ¿óδ
- φ¼π½∩µ¿¿ ¬«¼»¿½∩Γ«α ÑÑ ¿ú¡«α¿απÑΓ.
-
- * è«úñá ºáñá¡á úÑ¡Ñαᵿ∩ ¬«ñá »α«µÑßß«αá 80286 Code
- Generation ({$G+}), ¬«¼»¿½∩Γ«α ñ½∩ π½πτΦÑ¡¿∩ úÑ¡Ñαᵿ¿ ¬«-
- ñá ¿ß»«½∞ºπÑΓ ñ«»«½¡¿Γѽ∞¡δÑ ¿¡ßΓαπ¬µ¿¿ »α«µÑßß«αá 80286.
- 欫¼»¿½¿α«óá¡¡δÑ Γᬿ¼ «íαẫ¼ »α«úαá¼¼δ ¡Ñ íπñπΓ αáí«ΓáΓ∞
- ¡á »α«µÑßß«αáσ 8088 ¿ 8086.
-
- * Åα¿ ó䬽ετÑ¡¡«⌐ »α«óÑα¬Ñ óó«ñá-óδó«ñá I/O Checking ({$I-})
- ¬«¼»¿½∩Γ«α ¡Ñ »α«óÑα∩ÑΓ «Φ¿í¬¿ óó«ñá-óδó«ñá. éδºóáó »αÑ-
- ñ«»αÑñѽѡ¡πε Σπ¡¬µ¿ε IOResult, óδ ¼«ªÑΓÑ ßἫßΓ«∩Γѽ∞¡«
- »α«óÑα¿Γ∞ «Φ¿í¬¿ óó«ñá-óδó«ñá.
-
- * è«úñá ó䬽ετÑ¡á τ¿ß½«óá∩ «íαáí«Γ¬á Numeric Processing
- ({$N-}), ¬«¼»¿½∩Γ«α úÑ¡Ñα¿απÑΓ ¬«ñ, ß»«ß«í¡δ⌐ óδ»«½¡∩Γ∞
- óßÑ «»Ñαᵿ¿ ß »½áóáεΘÑ⌐ Γ«τ¬«⌐ ß »«¼«Θ∞ε óßΓα«Ñ¡¡«ú«
- 6-íá⌐Γ«ó«ú« Γ¿»á Real. àß½¿ »áαá¼ÑΓα Numeric Processing
- ó¬½ετÑ¡, ({$N+}), ¬«¼»¿½∩Γ«α ¿ß»«½∞ºπÑΓ ß«»α«µÑßß«α 80σ87
- ¿½¿ φ¼π½¿απÑΓ ß«»α«µÑßß«α ß »«¼«Θ∞ε »α«úαá¼¼¡«ú« «íÑß»Ñ-
- τÑ¡¿∩, ó ºáó¿ß¿¼«ßΓ¿ «Γ ¡á½¿τ¿∩ ß«»α«µÑßß«αá 80σ87. Å«½π-
- τÑ¡¡δ⌐ ó αѺπ½∞ΓáΓÑ ¬«ñ ¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ τÑΓδαÑ ñ«»«½¡¿-
- Γѽ∞¡δσ óÑΘÑßΓóÑ¡¡δσ Γ¿»á (Single, Double, Extended ¿
- Comp).
-
- * è«úñá ó䬽ετÑ¡á »α«óÑα¬á ñ¿á»áº«¡á Stack Checking ({$R-}),
- ¬«¼»¿½∩Γ«α ¡Ñ óδ»«½¡∩ÑΓ »α«óÑα¬π ¡á «Φ¿í¬¿ ¿¡ñѬ߿α«óá¡¿∩
- ¼áßß¿óá ¿ »α¿ßóá¿óá¡¿Ñ º¡áτÑ¡¿∩ ó¡Ñ ñ¿á»áº«¡á.
-
- * Åα¿ ó䬽ετÑ¡¡«⌐ »α«óÑα¬Ñ ßΓѬá Stack Checking ({$S-}) ¬«¼-
- »¿½∩Γ«α ¡Ñ «íÑß»Ñτ¿óáÑΓ ñ«ßΓáΓ«τ¡«ú« »α«ßΓαá¡ßΓóá ó ßΓѬÑ
- ñ½∩ ¬áªñ«ú« ó맮óá »α«µÑñπαδ ¿½¿ Σπ¡¬µ¿¿.
-
- * è«úñá ó¬½ετÑ¡á ¡ÑßΓα«úá∩ »α«óÑα¬á ßΓ᫬-»ÑαѼѡ¡δσ Relaxed
- String Var Checking ($V-}), ¬«¼»¿½∩Γ«α ¡Ñ »α«óÑα∩ÑΓ »áαá-
- ¼ÑΓαδ-»ÑαѼѡ¡δÑ ßΓ᫬«ó«ú« Γ¿»á. ¥Γ« »«ºó«½∩ÑΓ óá¼ »ÑαÑ-
- ñáóáΓ∞ ßΓ᫬¿ Σá¬Γ¿τÑ߬¿σ »áαá¼ÑΓα«ó, ¿¼ÑεΘ¿Ñ ñ½¿¡π, «Γ-
- ½¿τ¡πε «Γ ñ½¿¡δ, «»αÑñѽѡ¡«⌐ ñ½∩ Σ«α¼á½∞¡«ú« »áαá¼ÑΓ-
- αá-»ÑαѼѡ¡«⌐.
-
- * Åα¿ αáºαÑΦÑ¡¿¿ αáßΦ¿αÑ¡¡«ú« ß¿¡Γá¬ß¿ßá Extended Syntax
- ({$X+}) óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ó맮óδ Σπ¡¬µ¿⌐ ¬á¬ «»ÑαáΓ«-
- αδ, »«ß¬«½∞¬π αѺπ½∞ΓáΓ Σπ¡¬µ¿«¡á½∞¡δσ ó맮ó«ó ¼«ªÑΓ «Γí-
- αáßδóáΓ∞ß∩.
-
- B.Pascal 7 & Objects /UG - 78 -
-
-
- Ä»Γ¿¼¿ºáµ¿∩ óáΦÑú« ¬«ñá ß »«¼«Θ∞ε φΓ¿σ »áαá¼ÑΓα«ó ¿¼ÑÑΓ ñóá
- »αÑ¿¼πΘÑßΓóá. é«-»Ñαóδσ, φΓ« ñѽáÑΓ óáΦ ¬«ñ í«½ÑÑ ¬«¼»á¬Γ¡δ¼ ¿
- íδßΓαδ¼. é«-óΓ«αδσ, »«ºó«½∩ÑΓ ñѽáΓ∞ óá¼ ¡Ñ¬«Γ«αδÑ óÑΘ¿, ¬«Γ«αδÑ
- óδ «íδτ¡« ñѽáΓ∞ ¡Ñ ¼«ªÑΓÑ. Äñ¡á¬«, óßÑ φΓ¿ »áαá¼ÑΓαδ ó¡«ß∩Γ ¡Ñ-
- ¬«Γ«αδ⌐ α¿ß¬, »«φΓ«¼π ¿ß»«½∞ºπ⌐ΓÑ ¿σ ᬬπαáΓ¡«, ¿ Ñß½¿ óáΦá »α«ú-
- αá¼¼á ¡áτ¿¡áÑΓ óÑßΓ¿ ßÑí∩ ßΓαá¡¡«, óÑα¡¿ΓÑß∞ ¬ ¿ßσ«ñ¡«⌐ ß¿Γπᵿ¿.
-
-
- B.Pascal 7 & Objects /UG - 79 -
-
- ôß½«ó¡á∩ ¬«¼»¿½∩µ¿∩
- ─────────────────────────────────────────────────────────────────
-
- ùΓ«íδ «í½Ñúτ¿Γ∞ óáΦ¿ ºáñáτ¿, Borland Pascal »αÑñ½áúáÑΓ
- ßαÑñßΓó« πß½«ó¡«⌐ ¬«¼»¿½∩µ¿¿. ¥Γ« «º¡áτáÑΓ, τΓ« ¼«ªÑΓÑ ¬«¼»¿½¿-
- α«óáΓ∞ τáßΓ¿ ßó«Ñ⌐ »α«úαá¼¼δ ¡á «ß¡«óÑ »áαá¼ÑΓα«ó ¿½¿ «»αÑñѽѡ-
- ¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó.
-
- ôß½«ó¡δÑ ñ¿αÑ¬Γ¿óδ á¡á½«ú¿τ¡δ »« Σ«α¼áΓπ ñ¿αÑ¬Γ¿óá¼ ¬«¼»¿½∩-
- Γ«αá, ß ¬«Γ«α묨 óδ πªÑ »«º¡á¬«¼¿½¿ß∞. Ä¡¿ ¿¼ÑεΓ ß½ÑñπεΘ¿⌐ Σ«α-
- ¼áΓ:
-
- {$ñ¿αÑ¬Γ¿óá áαúπ¼Ñ¡Γ}
-
- úñÑ "ñ¿αÑ¬Γ¿óá" - φΓ« Γá¬á∩ ñ¿αÑ¬Γ¿óá ¬á¬ DEFINE, IFDEF ¿ Γ.ñ., á
- áαúπ¼Ñ¡Γ - ¡Ñ«í∩ºáΓѽ∞¡δ⌐ áαúπ¼Ñ¡Γ. îѪñπ ¡¿¼¿ «í∩ºáΓѽ∞¡« ñ«½ªÑ¡
- »α¿ßπΓßΓó«óáΓ∞ αáºñѽ¿Γѽ∞ (»α«íѽ ¿½¿ Γáíπ½∩µ¿∩). éßÑ πß½«ó¡δÑ
- ñ¿αÑ¬Γ¿óδ ¿ ¿σ ß¼δß½ »α¿óÑñÑ¡δ ó Æáí½¿µÑ 4.3.
-
- Åα¿¼Ñτá¡¿Ñ: Å«½¡«Ñ «»¿ßá¡¿Ñ ñ¿αÑ¬Γ¿ó πß½«ó¡«⌐ ¬«¼»¿½∩-
- µ¿¿ ¼«ª¡« ¡á⌐Γ¿ ó â½áóÑ 2 ("ä¿αÑ¬Γ¿óδ ¬«¼»¿½∩Γ«αá") "æ»αá-
- ó«τ¡«ú« απ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá".
-
- ä¿αÑ¬Γ¿óá πß½«ó¡«⌐ ¬«¼»¿½∩µ¿¿ Æáí½¿µá 4.3
- ┌──────────────────────────────┬────────────────────────────────┐
- │ ä¿αÑ¬Γ¿óá │ Ä»¿ßá¡¿Ñ │
- ├──────────────────────────────┼────────────────────────────────┤
- │ {$DEFINE ¿ñÑ¡Γ¿Σ¿¬áΓ«α} │ Ä»αÑñѽ∩ÑΓ "¿ñÑ¡Γ¿Σ¿¬áΓ«α" ñ½∩ │
- │ │ ñαπú¿σ ñ¿αÑ¬Γ¿ó. │
- ├──────────────────────────────┼────────────────────────────────┤
- │ {$UNDEF ¿ñÑ¡Γ¿Σ¿¬áΓ«α} │ ÄΓ¼Ñ¡∩ÑΓ «»αÑñѽѡ¿Ñ "¿ñÑ¡Γ¿- │
- │ │ Σ¿¬áΓ«αá". │
- ├──────────────────────────────┼────────────────────────────────┤
- │ {$IFDEF ¿ñÑ¡Γ¿Σ¿¬áΓ«α} │ 諼»¿½¿απÑΓ ß½ÑñπεΘ¿⌐ ¬«ñ, Ñß- │
- │ │ ½¿ «»αÑñѽѡ "¿ñÑ¡Γ¿Σ¿¬áΓ«α". │
- ├──────────────────────────────┼────────────────────────────────┤
- │ {$IFNDEF ¿ñÑ¡Γ¿Σ¿¬áΓ«α} │ 諼»¿½¿απÑΓ ß½ÑñπεΘ¿⌐ ¬«ñ, Ñß- │
- │ │ ½¿ "¿ñÑ¡Γ¿Σ¿¬áΓ«α" ¡Ñ «»αÑñÑ- │
- │ │ ½Ñ¡. │
- ├──────────────────────────────┼────────────────────────────────┤
- │ {$IFOPT x+} │ 諼»¿½¿απÑΓ ß½ÑñπεΘ¿⌐ ¬«ñ, Ñß- │
- │ │ ½¿ αáºαÑΦÑ¡á ñ¿αÑ¬Γ¿óá x. │
- ├──────────────────────────────┼────────────────────────────────┤
- │ {$IFOPT x-} │ 諼»¿½¿απÑΓ ß½ÑñπεΘ¿⌐ ¬«ñ, Ñß- │
- │ │ ½¿ ºá»αÑΘÑ¡á ñ¿αÑ¬Γ¿óá x. │
- ├──────────────────────────────┼────────────────────────────────┤
- │ {ELSE} │ 諼»¿½¿απÑΓ ß½ÑñπεΘ¿⌐ ¬«ñ, Ñß- │
- │ │ ½¿ »αÑñδñπΘÑÑ óδαáªÑ¡¿Ñ IFxxx │
- │ │ ¡Ñ αáó¡« True. │
- ├──────────────────────────────┼────────────────────────────────┤
- │ {$ENDIF} │ ÄΓ¼ÑτáÑΓ ¬«¡Ñµ í½«¬á IFxxx ¿½¿ │
- │ │ ELSE. │
- └──────────────────────────────┴────────────────────────────────┘
-
- B.Pascal 7 & Objects /UG - 80 -
-
- ä¿αÑ¬Γ¿óδ DEFINE ¿ UNDEF
- ─────────────────────────────────────────────────────────────────
-
- ä¿αÑ¬Γ¿óδ IFDEF ¿ IFNDEF »α«óÑα∩εΓ, «»αÑñѽѡ ½¿ ºáñá¡¡δ⌐
- ¿ñÑ¡Γ¿Σ¿¬áΓ«α. ¥Γ¿ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ «»αÑñѽ∩εΓß∩ ß »«¼«Θ∞ε DEFINE ¿
- UNDEF. (¡« Γá¬ªÑ «»αÑñѽ∩Γ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ ó ¬«¼á¡ñ¡«⌐ ßΓ᫬Ñ
- ¿½¿ ó IDE.)
-
- ùΓ«íδ «»αÑñѽ¿Γ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«α, ó¬½ετ¿ΓÑ ó »α«úαá¼¼π ß½Ññπε-
- Θπε ñ¿αÑ¬Γ¿óπ:
-
- {$DEFINE ¿ñÑ¡Γ¿Σ¿¬áΓ«α}
-
- úñÑ "¿ñÑ¡Γ¿Σ¿¬áΓ«α" ó »½á¡Ñ ñ½¿¡δ, αáºαÑΦÑ¡¡δσ ß¿¼ó«½«ó ¿ ñαπú¿σ
- ߻ѵ¿Σ¿¬áµ¿⌐ »«ñτ¿¡∩ÑΓß∩ «íδτ¡δ¼ »αáó¿½á¼ ñ½∩ ¿¼Ñ¡ ¿ñÑ¡Γ¿Σ¿¬áΓ«-
- α«ó. ìá»α¿¼Ñα, óδ ¼«ªÑΓÑ ºá»¿ßáΓ∞:
-
- {$DEFINE debug}
-
- ¥Γ¿¼ ñ½∩ «ßΓá½∞¡«⌐ τáßΓ¿ ¬«¼»¿½¿απѼ«ú« ¼«ñπ½∩ ¿½¿ ñ« ß½Ññπ-
- εΘÑú« «»ÑαáΓ«αá:
-
- {$UNDEF debug}
-
- «»αÑñѽ∩ÑΓß∩ ¿ñÑ¡Γ¿Σ¿¬áΓ«α debug.
-
- ä¿αÑ¬Γ¿óá UNDEF "αẫ»αÑñѽ∩ÑΓ" ¿ñÑ¡Γ¿Σ¿¬áΓ«α. àß½¿ ¿ñÑ¡Γ¿-
- Σ¿¬áΓ«α ¡Ñ «»αÑñѽѡ, Γ« «¡á ¡Ñ ñÑ⌐ßΓóπÑΓ.
-
- Ä»αÑñѽѡ¿Ñ πß½«ó¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó ó IDE
-
- é¼ÑßΓ« Γ«ú«, τΓ«íδ óßΓáó½∩Γ∞ ñ¿αÑ¬Γ¿óπ DEFINE ó ßó«⌐ ¿ßσ«ñ-
- ¡δ⌐ ¬«ñ, óδ ¼«ªÑΓÑ Γá¬ªÑ «»αÑñѽ¿Γ∞ πß½«ó¡δÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ ¿
- í½«¬Ñ óó«ñá Conditional Defines (ôß½«ó¡δÑ «»αÑñѽѡ¿∩). Ä»αÑñѽ¿-
- ΓÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, óóÑñ∩ ¿σ ó í½«¬Ñ óó«ñá ¿ αáºñѽ¿ó Γ«τ¬á¼¿ ºá-
- »∩Γ«⌐. ìá»α¿¼Ñα, ó ß½ÑñπεΘѼ »α¿¼ÑαÑ «»αÑñѽ∩εΓß∩ ñóá πß½«ó¡δσ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αá - TestCode ¿ DebugCode:
-
- TestCode:DebugCode
-
-
-
- B.Pascal 7 & Objects /UG - 81 -
-
- ÅαÑñ«»αÑñѽѡ¡δÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ
-
- èα«¼Ñ «»αÑñѽ∩Ѽδσ óἿ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó óδ ¼«ªÑΓÑ Γá¬ªÑ »α«-
- óÑα∩Γ∞ «Γñѽ∞¡δÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, «»αÑñѽ∩ѼδÑ ¬«¼»¿½∩Γ«α«¼:
-
- ÅαÑñ«»αÑñѽѡ¡δÑ πß½«ó¡δÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ Æáí½¿µá 4.4
- ┌───────────────────┬───────────────────────────────────────────┐
- │ êñÑ¡Γ¿Σ¿¬áΓ«α │ Å«¬áºδóáÑΓ │
- ├───────────────────┼───────────────────────────────────────────┤
- │ CPU86 │ äá¡¡á∩ óÑαß¿∩ Borland Pascal »αÑñ¡áº¡áτÑ¡á│
- │ │ ñ½∩ ßѼÑ⌐ßΓóá »α«µÑßß«α«ó 80σ86. │
- ├───────────────────┼───────────────────────────────────────────┤
- │ CPU87 │ Åα¿ßπΓßΓóπÑΓ áα¿Σ¼ÑΓ¿τÑ߬¿⌐ ß«»α«µÑßß«α│
- │ │ 80σ87. │
- ├───────────────────┼───────────────────────────────────────────┤
- │ DPMI │ äá¡¡á∩ óÑαß¿∩ »αÑñ¡áº¡áτÑ¡á ñ½∩ «»Ñαᵿ«¡-│
- │ │ ¡«⌐ ßαÑñδ ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á DOS. Åα¿ ß«º-│
- │ │ ñá¡¿¿ »α¿½«ªÑ¡¿⌐ ñ½∩ ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á│
- │ │ DOS ñá¡¡δ⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ñ«ßΓπ»Ñ¡ ñ½∩│
- │ │ BP.EXE. │
- ├───────────────────┼───────────────────────────────────────────┤
- │ MSDOS │ äá¡¡á∩ óÑαß¿∩ »αÑñ¡áº¡áτÑ¡á ñ½∩ «»Ñαᵿ-│
- │ │ «¡¡«⌐ ß¿ßΓѼδ MS-DOS. äá¡¡δ⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α│
- │ │ ñ«ßΓπ»Ñ¡ ó BP.EXE Γ«½∞¬« »α¿ ß«ºñá¡¿¿ »α¿-│
- │ │ ½«ªÑ¡¿⌐ DOS αÑá½∞¡«ú« ¿½¿ ºáΘ¿ΘÑ¡¡«ú« αÑ-│
- │ │ ª¿¼á ¿ ó TURBO.EXE. │
- ├───────────────────┼───────────────────────────────────────────┤
- │ VER70 │ äá¡¡á∩ óÑαß¿∩ ∩ó½∩ÑΓß∩ óÑαß¿Ñ⌐ 7.0 ¬«¼»¿-│
- │ │ ½∩Γ«αá. │
- ├───────────────────┼───────────────────────────────────────────┤
- │ WINDOWS │ äá¡¡á∩ óÑαß¿∩ »αÑñ¡áº¡áτÑ¡á ñ½∩ «»Ñαᵿ-│
- │ │ «¡¡«⌐ ßαÑñδ Windows. äá¡¡δ⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α│
- │ │ ñ«ßΓπ»Ñ¡ ó BP.EXE ¿ ó BPW.EXE, ¬«úñá µÑ½Ñ-│
- │ │ ó«⌐ »½áΓΣ«α¼«⌐ ∩ó½∩ÑΓß∩ Windows. │
- └───────────────────┴───────────────────────────────────────────┘
-
- Å«ñα«í¡ÑÑ « »αÑñ«»αÑñѽѡ¡δσ πß½«ó¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ ¬«¼»¿-
- ½∩Γ«αá αáß߬áºδóáÑΓß∩ ó â½áóÑ 2 ("ä¿αÑ¬Γ¿óδ ¬«¼»¿½∩Γ«αá") "Éπ¬«-
- ó«ñßΓóá »α«úαá¼¼¿ßΓá".
-
-
- êñÑ¡Γ¿Σ¿¬áΓ«αδ IFxxx, ELSE ¿ ENDIF
-
- æ¼δß½ πß½«ó¡δσ ñ¿αÑ¬Γ¿ó ó Γ«¼, τΓ« Ñß½¿ «»αÑñѽѡ ¿½¿ ¡ÑΓ
- ¬«¡¬αÑΓ¡δ⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ½¿í« Ñß½¿ πßΓá¡«ó½Ñ¡ ¿½¿ ¡ÑΓ ¬«¡¬αÑΓ¡δ⌐
- »áαá¼ÑΓα, óδ ¼«ªÑΓÑ óδí¿αáΓ∞ ñ½∩ ¬«¼»¿½∩µ¿¿ ¡Ñ¬«Γ«αδÑ τáßΓ¿ ¿ß-
- σ«ñ¡«ú« ¬«ñá. Ä¡¿ ¿¼ÑεΓ ß½ÑñπεΘ¿⌐ «íΘ¿⌐ Σ«α¼áΓ, úñÑ IFxxx - φΓ«
- ñ¿αÑ¬Γ¿óδ IFDEF, INDEF ¿½¿ IFOPT, ºá ¬«Γ«α묨 ß½ÑñπÑΓ ß««ΓóÑΓß-
- ΓóπεΘ¿⌐ áαúπ¼Ñ¡Γ, á "¿ßσ«ñ¡δ⌐ ¬«ñ" - ½εí«Ñ ¬«½¿τÑßΓó« ¿ßσ«ñ¡«ú«
- ¬«ñá Åá߬á½∩.
-
- {$IFxxx}
- ¿ßσ«ñ¡δ⌐ ¬«ñ
-
- B.Pascal 7 & Objects /UG - 82 -
-
- {$ENDIF}
-
- àß½¿ óδαáªÑ¡¿Ñ ó ñ¿αÑ¬Γ¿óÑ IFxxx »α¿¡¿¼áÑΓ º¡áτÑ¡¿Ñ True, Γ«
- "¿ßσ«ñ¡δ⌐ ¬«ñ" ¬«¼»¿½¿απÑΓß∩; ó »α«Γ¿ó¡«¼ ß½πτáÑ «¡ ¿ú¡«α¿απÑΓß∩
- ¿ ¿¡ΓÑα»αÑΓ¿απÑΓß∩ ¬á¬ «íδτ¡δ⌐ ¬«¼¼Ñ¡Γáα¿⌐ ó »α«úαá¼¼Ñ.
-
- ùáßΓ« π óáß ¿¼ÑεΓß∩ á½∞ΓÑα¡áΓ¿ó¡δÑ Σαáú¼Ñ¡Γδ ¬«ñá. àß½¿ óδ-
- αáªÑ¡¿Ñ »α¿¡¿¼áÑΓ º¡áτÑ¡¿Ñ True, Γ« ¬«¼»¿½¿απÑΓß∩ «ñ¿¡ Σαáú¼Ñ¡Γ
- ¬«ñá, á Ñß½¿ False - ñαπú«⌐. 諼»¿½∩Γ«α »«ºó«½∩ÑΓ ßñѽáΓ∞ φΓ« ß
- »«¼«Θ∞ε ñ¿αÑ¬Γ¿óδ $ELSE:
-
- {$IFxxx}
- ¿ßσ«ñ¡δ⌐ ¬«ñ A
- {$ELSE}
- ¿ßσ«ñ¡δ⌐ ¬«ñ B
- {$ENDIF}
-
- àß½¿ óδαáªÑ¡¿Ñ ó IFxxx αáó¡« True, Γ« ¬«¼»¿½¿απÑΓß∩ "¿ßσ«ñ-
- ¡δ⌐ ¬«ñ A", ó »α«Γ¿ó¡«¼ ß½πτáÑ ¬«¼»¿½¿απÑΓß∩ "¿ßσ«ñ¡δ⌐ ¬«ñ B".
-
- éßÑ ñ¿αÑ¬Γ¿óδ IFxxx ñ«½ª¡δ ºáóÑαΦáΓ∞ß∩ ß «ñ¡«¼ ¿ßσ«ñ¡«¼ Σá⌐-
- ½Ñ. ¥Γ« «º¡áτáÑΓ, τΓ« «¡¿ ¡Ñ ¼«úπΓ ¡áτ¿¡áΓ∞ß∩ ó «ñ¡«¼ ¿ßσ«ñ¡«¼
- Σá⌐½Ñ ¿ ºá¬á¡τ¿óáΓ∞ß∩ ó ñαπú«¼. Äñ¡á¬«, ó ñ¿αÑ¬Γ¿óÑ IFxxx ¼«ªÑΓ
- π¬áºδóáΓ∞ß∩ ó¬½ετáѼδ⌐ Σá⌐½:
-
- {$IFxxx}
- {$I file1.pas}
- {$ELSE}
- {$I file2.pas}
- {$ENDIF}
-
- Æá¬¿¼ «íαẫ¼, ¡á «ß¡«óÑ ¡Ñ¬«Γ«α«ú« πß½«ó¿∩ óδ ¼«ªÑΓÑ óδí¿-
- αáΓ∞ á½∞ΓÑα¡áΓ¿ó¡δÑ ó¬½ετáѼδÑ Σá⌐½δ
-
- ä«»π߬áÑΓß∩ ¿ß»«½∞º«óáΓ∞ 󽫪ѡ¡δÑ ¬«¡ßΓαπ¬µ¿¿ IFxxx..ENDIF,
- ΓᬠτΓ« óδ ¼«ªÑΓÑ ºá»¿ßáΓ∞, ¡á»α¿¼Ñα, ß½ÑñπεΘÑÑ:
-
- {$IFxxx} { »Ñαóá∩ ñ¿αÑ¬Γ¿óá IF }
- .
- .
- .
- {$IFxxx} { »Ñαóá∩ ñ¿αÑ¬Γ¿óá IF }
- .
- .
- .
-
- {$ENDIF} { ºáóÑαΦáÑΓ óΓ«απε ñ¿αÑ¬Γ¿óπ IF }
- .
- .
- .
- {$ENDIF} { ºáóÑαΦáÑΓ »Ñαóπε ñ¿αÑ¬Γ¿óπ IF }
-
-
-
- B.Pascal 7 & Objects /UG - 83 -
-
- ä¿αÑ¬Γ¿óδ IFDEF ¿ IFNDEF
-
- ä¿αÑ¬Γ¿óδ IFDEF ¿ IFNDEF »«ºó«½∩εΓ óá¼ πß½«ó¡« ¬«¼»¿½¿α«óáΓ∞
- ¬«ñ ¡á «ß¡«óÑ «»αÑñѽѡ¿∩ ¿½¿ ¡Ñ«»αÑñѽѡ¿∩ ¡Ñ¬«Γ«αδσ ¿ñÑ¡Γ¿Σ¿¬á-
- Γ«α«ó.
-
- ä¿αÑ¬Γ¿óδ IFDEF ¿ IFNDEF «íδτ¡« ¿ß»«½∞ºπεΓß∩ ñ½∩ ó¬½ετÑ¡¿∩ ó
- ¬«¼»¿½¿απѼδ⌐ ¬«ñ «Γ½áñ«τ¡«⌐ ¿¡Σ«α¼áµ¿¿. ìá»α¿¼Ñα, Ñß½¿ óδ »«¼Ñß-
- Γ¿ΓÑ ó ¡áτὫ ¬áªñ«ú« ¼«ñπ½∩ ß½ÑñπεΘ¿⌐ ¬«ñ:
-
- {$IFDEF debug}
- {$D+,L+}
- {$ELSE}
- {$D-,L-}
- {$ENDIF}
-
- á ó ¡áτὫ »α«úαá¼¼δ ß½ÑñπεΘπε ñ¿αÑ¬Γ¿óπ:
-
- {$DEFINE debug}
-
- ¿ ¬«¼»¿½¿απÑΓÑ ßó«ε »α«úαá¼¼π, ñ½∩ ¿ß»«½∞º«óá¡¿∩ ß Æπαí« «Γ½áñ-
- τ¿¬«¼ úÑ¡Ñα¿απÑΓß∩ »«½¡á∩ «Γ½áñ«τ¡á∩ ¿¡Σ«α¼áµ¿∩. ǡὫú¿τ¡«, óδ
- ¼«ªÑΓÑ ¿¼ÑΓ∞ Σαáú¼Ñ¡Γδ ¬«ñá, ¬«¼»¿½¿απѼδÑ Γ«½∞¬« »α¿ «Γ½áñ¬Ñ. é
- φΓ«¼ ß½πτáÑ ¼«ª¡« ºá»¿ßáΓ∞:
-
- {$IFDEF debug}
- ¿ßσ«ñ¡δ⌐ ¬«ñ
- {$ENDIF}
-
- úñÑ "¿ßσ«ñ¡δ⌐ ¬«ñ" ¬«¼»¿½¿απÑΓß∩ Γ«½∞¬« ó Γ«¼ ß½πτáÑ, Ñß½¿ ó ñá¡-
- ¡«⌐ Γ«τ¬Ñ «»αÑñѽѡ ¿ñÑ¡Γ¿Σ¿¬áΓ«α debug.
-
-
- B.Pascal 7 & Objects /UG - 84 -
-
-
- ä¿αÑ¬Γ¿óá IFOPT
-
- ê¡«úñá ó¬½ετ¿Γ∞ ¿½¿ ¿ß¬½ετ¿Γ∞ ¬«ñ ªÑ½áΓѽ∞¡« ó ºáó¿ß¿¼«ßΓ¿
- «Γ Γ«ú«, ¬á¬«⌐ óδíαá¡ »áαá¼ÑΓα ¬«¼»¿½∩Γ«αá (»α«óÑα¬á ñ¿á»áº«¡á,
- »α«óÑα¬á óó«ñá-óδó«ñá ¿ Γ.ñ.). éδ ¼«ªÑΓÑ ßñѽáΓ∞ φΓ« ß »«¼«Θ∞ε
- ñ¿αÑ¬Γ¿óδ IFOPT, ¬«Γ«αá∩ ¿¼ÑÑΓ ñóÑ Σ«α¼δ:
-
- {$IFOPT x+}
- ¿
- {$IFOPT x-}
-
- úñÑ x - «ñ¿¡ ¿º »áαá¼ÑΓα«ó ¬«¼»¿½∩Γ«αá. Åα¿ ¿ß»«½∞º«óá¡¿¿ »Ñαó«⌐
- Σ«α¼δ ß«ñÑαªáΘ¿⌐ß∩ ¡¿ªÑ ¬«ñ íπñÑΓ ¬«¼»¿½¿α«óáΓ∞ß∩, Ñß½¿ »áαá¼ÑΓα
- ¬«¼»¿½∩Γ«αá ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ αáºαÑΦÑ¡; »α¿ ¿ß»«½∞º«óá¡¿¿ óΓ«α«⌐
- Σ«α¼δ ¬«ñ ¬«¼»¿½¿απÑΓß∩ »α¿ ºá»αÑΘÑ¡¿¿ »áαá¼ÑΓαá. ìá»α¿¼Ñα, τΓ«íδ
- óδíαáΓ∞ Γ¿» ñá¡¡δσ ñ½∩ ß»¿ß¬á »ÑαѼѡ¡δσ ¡á «ß¡«óÑ Γ«ú«, αáºαÑΦÑ-
- ¡á ¿½¿ ¡ÑΓ »«ññÑ᪬á ß«»α«µÑßß«αá 80σ87, ¼«ª¡« ¿ß»«½∞º«óáΓ∞ ß½Ñ-
- ñπεΘ¿⌐ ¿ßσ«ñ¡δ⌐ ¬«ñ:
-
- var
- {$IFOPT N+}
- Radius,Circ,Area: Double;
- {$ELSE}
- Radius,Circ,Area: Real;
- {$ENDIF}
-
- Åα¿¼Ñτá¡¿Ñ: Å«½¡«Ñ «»¿ßá¡¿Ñ óßÑσ »áαá¼ÑΓα«ó ¬«¼»¿½∩Γ«-
- αá óδ ¼«ªÑΓÑ ¡á⌐Γ¿ ó â½áóÑ 2 ("ä¿αÑ¬Γ¿óδ ¬«¼»¿½∩Γ«αá")
- "æ»αáó«τ¡«ú« απ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá".
-
-
-
-
- B.Pascal 7 & Objects /UG - 85 -
-
- Åα«ß¼«Γα ¿ßσ«ñ¡«ú« ¬«ñá
- ─────────────────────────────────────────────────────────────────
-
- IDE ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á DOS ß«ñÑαª¿Γ ¡«ó«Ñ »α«úαá¼¼¡«Ñ ¿¡ß-
- Γαπ¼Ñ¡Γá½∞¡«Ñ ßαÑñßΓó« »α«ß¼«Γαá «íΩÑ¬Γ«ó - ObjectBrowser. Ä¡«
- »«ºó«½∩ÑΓ óá¼ ¿ßß½Ññ«óáΓ∞ »α«úαá¼¼δ ¿ ¼«ñ㫨 ó »α«úαá¼¼áσ ¿ ¼¡«-
- ú«Ñ ñαπú«Ñ. äáªÑ Ñß½¿ αáºαáíáΓδóáѼ«Ñ óἿ »α¿½«ªÑ¡¿Ñ ¡Ñ ¿ß»«½∞-
- ºπÑΓ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ, óδ ¡á⌐ñÑΓÑ
- ObjectBrowser ταѺóδτá⌐¡« »«½Ñº¡δ¼ ßαÑñßΓó«¼. éδ ¼«ªÑΓÑ »α«ß¼áΓ-
- α¿óáΓ∞ ¿Ñαáασ¿ε «íΩÑ¬Γ«ó, ¼«ñπ½Ñ⌐ ¿ óßÑσ »α«µÑñπα, Σπ¡¬µ¿⌐, »ÑαÑ-
- ¼Ñ¡¡δσ, Γ¿»«ó, ¬«¡ßΓá¡Γ ¿ ñαπú¿Ñ ¿ß»«½∞ºπѼδÑ ó »α«úαá¼¼Ñ ¿ñÑ¡Γ¿-
- Σ¿¬áΓ«αδ. æ »«¼«Θ∞ε ObjectBrowser óδ ¼«ªÑΓÑ ñѽáΓ∞ ß½ÑñπεΘÑÑ:
-
- * Åα«ß¼«ΓαÑΓ∞ ó ßó«Ñ⌐ »α¿¬½áñ¡«⌐ »α«úαá¼¼Ñ ¿Ñαáασ¿ε «íΩѬ-
- Γ«ó. çáΓѼ óδíαáΓ∞ «íΩÑ¬Γ ¿ »α«ß¼«ΓαÑΓ∞ óßÑ Ñú« »α«µÑñπαδ,
- Σπ¡¬µ¿¿ ¿ ñαπú¿Ñ ß«ñÑαªáΘ¿Ñß∩ ó »α«úαá¼¼Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ.
- Åα¿ »α«óÑα¬Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá óδ ¼«ªÑΓÑ óδóÑßΓ¿ »ÑαÑτÑ¡∞
- óßÑσ ßß佫¬ ¡á ¡Ñú« ó »α«µÑñπαáσ, Σπ¡¬µ¿∩σ »α«úαá¼¼δ ¿,
- Ñß½¿ σ«Γ¿ΓÑ, »ÑαÑ⌐Γ¿ ¡á Γ« ¼ÑßΓ« ó ¿ßσ«ñ¡«¼ ¬«ñÑ, úñÑ «¡
- ¿ß»«½∞ºπÑΓß∩.
-
- * éδóÑßΓ¿ ß»¿ß«¬ óßÑσ ú½«íá½∞¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó, ¿ß»«½∞ºπÑ-
- ¼δÑ ó óáΦÑ⌐ »α«úαá¼¼Ñ, ¿ πó¿ñÑΓ∞ ¿σ «»¿ßá¡¿∩. àß½¿ óδ óδ-
- íÑα¿ΓÑ «ñ¡π »ÑαѼѡ¡πε, Γ« ¼«ªÑΓÑ óδóÑßΓ¿ ß»¿ß«¬ óßÑσ ßßδ-
- ½«¬ ¡Ñ ¡ÑÑ ó ßó«Ñ⌐ »α«úαá¼¼Ñ ¿, Ñß½¿ σ«Γ¿ΓÑ, »ÑαÑ⌐Γ¿ ¡á Γ«
- ¼ÑßΓ« ó ¿ßσ«ñ¡«¼ ¬«ñÑ, úñÑ «¡á ¿ß»«½∞ºπÑΓß∩.
-
- * éδóÑßΓ¿ ß»¿ß«¬ óßÑσ ¿ß»«½∞ºπѼδσ ó »α«úαá¼¼Ñ ¼«ñπ½Ñ⌐, ºá-
- ΓѼ óδíαáΓ∞ «ñ¿¡ ¿º ¡¿σ ¿ »α«ß¼«ΓαÑΓ∞ ß»¿ß«¬ óßÑσ ¿ñÑ¡Γ¿-
- Σ¿¬áΓ«α«ó Ñú« ¿¡ΓÑαΣÑ⌐ß¡«⌐ τáßΓ¿.
-
- * éδíαáΓ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ó ¿ßσ«ñ¡«¼ ¬«ñÑ, ºáΓѼ »α«ß¼«ΓαÑΓ∞
- ñÑΓá½∞¡πε ¿¡Σ«α¼áµ¿ε »« ¡Ñ¼π, ¡áªáó ¬½áó¿Φπ Ctrl ¿ «ñ¡«ó-
- αѼѡ¡« Θѽ¬¡πó »αáó«⌐ ¬¡«»¬«⌐ "¼δΦ¿".
-
- * ÄΓ¬αδΓ∞ ¼¡«ªÑßΓó« «¬«¡ »α«ß¼«Γαá, ßαáó¡¿Γ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ,
- óδó«ñ¿¼δÑ ó αẽ¿τ¡δσ «¬¡áσ, á ºáΓѼ óÑα¡πΓ∞ß∩ ó »αÑñδñπ-
- ΘÑÑ «Γ¬αδΓ«Ñ ó ßαÑñßΓóÑ »α«ß¼«Γαá «¬¡«.
-
- ÅÑαÑñ ¿ß»«½∞º«ó᡿Ѽ ObjectBrowser πíÑñ¿ΓÑß∞, τΓ« ó ñ¿á½«ú«-
- ó«¼ «¬¡Ñ Options│Compiler πßΓá¡«ó½Ñ¡δ ß½ÑñπεΘ¿Ñ »áαá¼ÑΓαδ:
-
- * Debug Information (ê¡Σ«α¼áµ¿∩ ñ½∩ «Γ½áñ¬¿).
-
- * Locals Symbols (﫬á½∞¡δÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ).
-
- * Symbol Information (ê¡Σ«α¼áµ¿∩ «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ).
-
- ôíÑñ¿ΓÑß∞ ΓᬪÑ, τΓ« ó ñ¿á½«ú«ó«¼ «¬¡Ñ Debugging/Browsing
- (Options│Debugger) πßΓá¡«ó½Ñ¡ »áαá¼ÑΓα Integrated Debugging/
- Browsing (ÄΓ½áñ¬á ß ¿ß»«½∞º«óá¡¿Ñ óßΓα«Ñ¡¡«ú« «Γ½áñτ¿¬á/Åα«ß-
- ¼«Γα).
-
-
- B.Pascal 7 & Objects /UG - 86 -
-
- 欫¼»¿½¿απ⌐ΓÑ »α«úαá¼¼π, ¬«Γ«απε óδ σ«Γ¿ΓÑ »α«ß¼áΓα¿óáΓ∞.
-
- ä½∩ á¬Γ¿ó¿ºáµ¿¿ ObjectBrowser óδíÑα¿ΓÑ ó ¼Ñ¡ε Search (Å«¿ß¬)
- ¬«¼á¡ñπ Objects (ÄíΩѬΓδ), Units (î«ñπ½¿) ¿½¿ Globals (⽫íá½∞¡δÑ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ). éδ ¼«ªÑΓÑ Γá¬ªÑ »«¼ÑßΓ¿Γ∞ ¬παß«α ¡á ¿ñÑ¡Γ¿Σ¿¬á-
- Γ«α ó ¿ßσ«ñ¡«¼ ¬«ñÑ ¿ óδíαáΓ∞ ñ½∩ óδó«ñá ObjectBrowser ¬«¼á¡ñπ
- Search│Symbol (Å«¿ß¬│êñÑ¡Γ¿Σ¿¬áΓ«α).
-
- éδ ¼«ªÑΓÑ Γá¬ªÑ ßñѽáΓ∞ Γá¬, τΓ«íδ ¬«¼»¿½∩Γ«α "ºá»«¼¿¡á½"
- ¿¡Σ«α¼áµ¿ε «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ ¼Ñªñ𠬫¼»¿½∩µ¿∩¼¿. àß½¿ φëà »áαá-
- ¼ÑΓα ó¬½ετÑ¡, ¿ óδ ¿º¼Ñ¡¿ΓÑ »α«úαá¼¼π, ¡« ß½ÑñπεΘá∩ ¬«¼»¿½∩µ¿∩
- ºáóÑαΦ¿Γ∞ß∩ ¡Ñπñáτ¡«, Γ« óá¼ óßÑ αáó¡« íπñÑΓ ñ«ßΓπ»¡á ¿¡Σ«α¼áµ¿∩
- «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ, ß«σαá¡Ñ¡¡á∩ ß »«ß½Ññ¡Ñ⌐ ¬«¼»¿½∩µ¿¿. ü½áú«ñáα∩
- φΓ«¼π óδ ß¼«ªÑΓÑ »α«ß¼«ΓαÑΓ∞ ßó«ε »α«úαá¼¼π, τΓ« »«¼«ªÑΓ óá¼ «»-
- αÑñѽ¿Γ∞ ¿ßΓ«τ¡¿¬ »α«í½Ñ¼δ. ùΓ«íδ ¬«¼»¿½∩Γ«α ß«σαá¡∩½ ¿¡Σ«α¼áµ¿ε
- «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ ¼Ñªñ𠬫¼»¿½∩µ¿∩¼¿, ¡πª¡« ßñѽáΓ∞ ß½ÑñπεΘÑÑ:
-
- 1. éδíαáΓ∞ ¬«¼á¡ñπ Options│Enviroment│Startup.
-
- 2. ôßΓá¡«ó¿Γ∞ »áαá¼ÑΓα Preserve Symbols (æ«σαá¡Ñ¡¿Ñ ¿ñÑ¡Γ¿-
- Σ¿¬áΓ«α«ó); »« π¼«½τá¡¿ε «¡ πßΓá¡«ó½Ñ¡.
-
- 3. éδíαáΓ∞ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- 4. ä½∩ óδσ«ñá ¿º IDE óδíαáΓ∞ ¬«¼á¡ñπ File│Exit.
-
- 5. æ¡«óá ºá»πßΓ¿Γ∞ IDE.
-
- Åα¿¼Ñτá¡¿Ñ: ū߬«½∞¬π Preserve Symbols - φΓ« »áαá¼ÑΓα
- ºá»π߬á, ¿º¼Ñ¡Ñ¡¿Ñ Ñú« πßΓá¡«ó¬¿ ¡Ñ íπñÑΓ ¿¼ÑΓ∞ ñÑ⌐ßΓó¿Ñ,
- »«¬á óδ ¡Ñ óδ⌐ñ¿ΓÑ ¿º IDE ¿ ¡Ñ ºá»πßΓ¿ΓÑ ÑÑ ß¡«óá.
-
- B.Pascal 7 & Objects /UG - 87 -
-
-
- àß½¿ π óáß ÑßΓ∞ "¼δΦ∞", Γ« ¿ßσ«ñ¡δ⌐ ¬«ñ πñ«í¡ÑÑ »α«ß¼áΓα¿-
- óáΓ∞, Ñß½¿ ºáñáΓ∞ á¬Γ¿ó¿ºáµ¿ε ObjectBrowser »αáó«⌐ ¬¡«»¬«⌐ "¼δ-
- Φ¿". çáΓѼ, πñÑনóá∩ ¡áªáΓ«⌐ ¬½áó¿Φπ Ctrl, óδ ¼«ªÑΓÑ ¿ß»«½∞º«-
- óáΓ∞ »αáóπε ¬¡«»¬π "¼δΦ¿" ñ½∩ π¬áºá¡¿∩ ¿ »α«óÑન «íΩѬΓá, »α«µÑ-
- ñπαδ, Σπ¡¬µ¿¿, »ÑαѼѡ¡«⌐ ¿½¿ ñαπú«ú« ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ó óáΦѼ ¿ß-
- σ«ñ¡«¼ ¬«ñÑ ¿ Ñú« á¡á½¿ºá (óδó«ñá ñÑΓá½∞¡«⌐ ¿¡Σ«α¼áµ¿¿).
-
- Åα¿¼Ñτá¡¿Ñ: ä½∩ íδßΓα«ú« »α«ß¼«Γαá ¿ñÑ¡Γ¿Σ¿¬áΓ«αá, ¡á
- ¬«Γ«α«¼ ó ¿ßσ«ñ¡«¼ ¬«ñÑ »«º¿µ¿«¡¿α«óá¡ ¬παß«α, óδ ¼«ªÑΓÑ
- Γá¬ªÑ óδíαáΓ∞ ó ½«¬á½∞¡«¼ ¼Ñ¡ε «¬¡á αÑñá¬Γ¿α«óá¡¿∩ ¬«¼á¡ñπ
- Browse Symbol at Cursor (Åα«ß¼«Γα ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ó »«º¿µ¿¿
- ¬παß«αá).
-
- ùΓ«íδ ºáñáΓ∞ »α«ß¼«Γα ß »«¼«Θ∞ε "¼δΦ¿", óδ»«½¡¿ΓÑ ß½ÑñπεΘ¿Ñ
- Φáú¿:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Mouse.
-
- 2. éδíÑα¿ΓÑ »áαá¼ÑΓα Browse as the Ctrl + Right Mouse Button
- (Åα«ß¼«Γα »« ¬½áó¿ΦÑ Ctrl + »αáóá∩ ¬¡«»¬á "¼δΦ¿").
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
-
-
-
- B.Pascal 7 & Objects /UG - 88 -
-
- Åα«ß¼«Γα «íΩÑ¬Γ«ó
- ─────────────────────────────────────────────────────────────────
-
- 諼á¡ñá Search│Objects «Γ¬αδóáÑΓ «¬¡«, ó ¬«Γ«α«¼ óδó«ñ∩Γß∩
- óßÑ ¿ß»«½∞ºπѼδÑ ó »α«úαá¼¼Ñ «íΩѬΓδ, π»«α∩ñ«τÑ¡¡δÑ ó ¿Ñαáασ¿τÑß-
- ¬«⌐ ßΓαπ¬ΓπαÑ. é óÑασ¡Ñ⌐ τáßΓ¿ «¬¡á ObjectBrowser »«¬áºδóáÑΓ íá-
- º«óδ⌐ Γ¿» ¿ óδó«ñ¿Γ ¡¿ªÑ ¿ ß»αáóá «Γ íẫó«ú« Γ¿»á »«Γ«¼¬«ó. Åα«-
- ∩ß¡¿Γ∞ ß««Γ¡«ΦÑ¡¿∩ "»αÑñ«¬-»«Γ«¼«¬" »«¼«úáεΓ ß«Ññ¿¡∩εΘ¿Ñ ½¿¡¿¿.
-
- Åα¿¼Ñτá¡¿Ñ: Å«ñα«í¡πε ¿¡Σ«α¼áµ¿ε « Γ¿»áσ «íΩÑ¬Γ«ó óδ
- ¼«ªÑΓÑ ¡á⌐Γ¿ ó â½áóÑ 9 ("ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«⌐ »α«úαá¼-
- ¼¿α«óá¡¿Ñ").
-
- ▒File▒Edit▒Search▒▒Run▒▒Compile▒Debug▒Tools▒Options▒Window▒Help▒▒
- ╔═[*]══════════════════════ Browse: Object ════════════════2═[*]╗
- ║ Global Scope ║
- ║─┤ I ├─────────────────────────────────────────────────────────║
- ║─Objects▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒^
- ║ ├────Location █
- ║ │ ├───Block ▒
- ║ │ │ ├───Ball ▒
- ║ │ │ └───Brick ▒
- ║ │ ├───Cursor ▒
- ║ │ │ └───SaveScreen ▒
- ║ │ ├───Obstacle ▒
- ║ │ │ ├───Boundary ▒
- ║ │ │ │ ├───LeftBound ▒
- ║ │ │ │ ├───LowerBound ▒
- ║ │ │ │ ├───RightBound ▒
- ║ │ │ │ └───UpperBound ▒
- ║ │ │ ├───Paddle ▒
- ║ │ │ └───Wall ▒
- ║ │ └───TextString ▒
- ║ │ └───Counter ▒
- ║ │ └───DownCounter ▒
- ║ │ └───LimitCounter v
- ╚<▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒>─┘
- ░F1░Help░<┘░Browse░░Ctrl░<┘░Go░to░source░Space░Track░src░F10░Menu
-
- É¿ß. 4.4 Åα«ß¼«Γα ¿Ñαáασ¿¿ «íΩÑ¬Γ«ó »α¿¬½áñ¡«⌐ »α«úαá¼¼δ.
-
- àß½¿ ¿Ñαáασ¿∩ «íΩÑ¬Γ«ó π óáß ß½¿Φ¬«¼ í«½∞Φá∩, óδ ¼«ªÑΓÑ ºá-
- ñáΓ∞, τΓ«íδ »«Γ«¼¬¿ ¬«¡¬αÑΓ¡«ú« «íΩѬΓá ¡á φ¬αá¡ ¡Ñ óδó«ñ¿½¿ß∞.
-
- * æ »«¼«Θ∞ε ¬½áó¿áΓπαδ ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ «íΩѬΓ.
-
- 2. ì᪼¿ΓÑ ¬½áó¿Φπ - (¼¿¡πß).
-
- * Åα¿ ¡á½¿τ¿¿ "¼δΦ¿" »α«ßΓ« Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ú«α¿º«¡Γá½∞-
- ¡«⌐ ½¿¡¿¿, ß«Ññ¿¡∩εΘÑ⌐ «íΩÑ¬Γ ß ¿Ñαáασ¿Ñ⌐.
-
-
- B.Pascal 7 & Objects /UG - 89 -
-
- ÆÑ»Ñα∞ »«ß½Ñ «íΩѬΓá óδó«ñ¿Γß∩ + (»½εß), ¿ «¡ »«ñßóÑτ¿óáÑΓ-
- ß∩, »«¬áºδóá∩, τΓ« »«Γ«¼¬¿ ñá¡¡«ú« «íΩѬΓá ¡á φ¬αá¡ ¡Ñ óδó«ñ∩Γß∩.
-
- éδ ¼«ªÑΓÑ óδóÑßΓ¿ »«Γ«¼¬«ó «íΩѬΓá ß¡«óá.
-
- * æ »«¼«Θ∞ε ¬½áó¿áΓπαδ:
-
- 1. éδñѽ¿ΓÑ «íΩÑ¬Γ ß ß¿¼ó«½«¼ +.
-
- 2. ì᪼¿ΓÑ ¬½áó¿Φπ +.
-
- * Åα¿ ¡á½¿τ¿¿ "¼δΦ¿" Θѽ¬¡¿ΓÑ Ñ⌐ ¡á ú«α¿º«¡Γá½∞¡«⌐ ßΓ᫬Ñ,
- ß«Ññ¿¡∩εΘÑ⌐ «íΩÑ¬Γ ß ¿Ñαáασ¿Ñ⌐.
-
- Å«Γ«¼¬¿ «íΩѬΓá »«∩ó½∩εΓß∩ ó¡«ó∞.
-
- êº ¿Ñαáασ¿¿ «íΩÑ¬Γ«ó óδ ¼«ªÑΓÑ »α«ß¼áΓα¿óáΓ∞ óßÑ «»¿ßá¡¡δÑ ó
- ¿¡ñ¿ó¿ñπá½∞¡«¼ «íΩѬΓÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ. éδñѽ¿ΓÑ «íΩÑ¬Γ ¿ ¡áª¼¿ΓÑ
- ¬½áó¿Φπ Enter, ½¿í« ñóáªñδ Θѽ¬¡¿ΓÑ ¡á «íΩѬΓÑ ¬¡«»¬«⌐ "¼δΦ¿".
-
- Åα¿ »α«ß¼«ΓαÑ «»¿ßá¡¡δσ ó «íΩѬΓÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó óδ ¼«ªÑΓÑ
- ºáñáΓ∞ αẽ¿τ¡δÑ ó¿ñδ óδó«ñá:
-
- * ä½∩ óδó«ñá ¿¡Σ«α¼áµ¿¿ « ¡áß½Ññ«óá¡¿¿ ñ½∩ »α«ß¼áΓα¿óáѼ«ú«
- «íΩѬΓá Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á íπ¬óÑ I ó óÑασ¡Ñ⌐ τáßΓ¿ «¬¡á
- ObjectBrowser ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+I.
-
- * ä½∩ óδó«ñá ¡á φ¬αá¡ »ÑαÑτ¡∩ ßΓ᫬ »α«úαá¼¼δ ¿½¿ ¼«ñπ½∩,
- úñÑ ¿¼ÑÑΓß∩ ßßδ½¬á ¡á ¿ñÑ¡Γ¿Σ¿¬áΓ«α «íΩѬΓá Θѽ¬¡¿ΓÑ
- "¼δΦ∞ε" ¡á íπ¬óÑ R ó óÑασ¡Ñ⌐ τáßΓ¿ «¬¡á ObjectBrowser ¿½¿
- ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+R.
-
- * ä½∩ óδó«ñá «í½áßΓ¿ ñÑ⌐ßΓó¿∩ «íΩѬΓá Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á
- íπ¬óÑ S ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+S.
-
- ùΓ«íδ ¡á⌐Γ¿ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ó ß»¿ß¬Ñ óδó«ñ¿¼δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«-
- α«ó, ¡áíÑα¿ΓÑ »Ñαóπε íπ¬óπ ¿¼Ñ¡¿ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá; óáΦ ¬παß«α íδßΓ-
- α« »ÑαѼÑΘáÑΓß∩ ¡á ß««ΓóÑΓßΓóπεΘ¿⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α.
-
- ùΓ«íδ ObjectBrowser ¼«ú ¡áσ«ñ¿Γ∞, úñÑ αáß»«½«ªÑ¡δ óáΦ¿ ¿ß-
- σ«ñ¡δÑ Σá⌐½δÑ, óá¼ ¼«ªÑΓ »«ΓαÑí«óáΓ∞ß∩ ¿º¼Ñ¡¿Γ∞ ¼áαΦαπΓ ¬áΓὫúá
- ¼«ñπ½Ñ⌐ ¿ ó¬½ετáѼδσ Σá⌐½«ó ó ñ¿á½«ú«ó«¼ «¬¡Ñ Options│
- Directories.
-
- àß½¿ »«ß½Ñ «Γ¬αδΓ¿∩ «¬¡á »α«ß¼«Γαá óδ ¼«ñ¿Σ¿µ¿απÑΓÑ ¿ßσ«ñ¡δ⌐
- ¬«ñ, ñ«íáó½∩∩ ¿½¿ πñá½∩∩ ßΓ᫬¿ »α«úαá¼¼δ, Γ« »α«úαá¼¼π ½πτΦÑ »Ñ-
- αѬ«¼»¿½¿α«óáΓ∞. ò«Γ∩ ObjectBrowser »«ß½Ñ ¼«ñ¿Σ¿¬áµ¿¿ ¿ßσ«ñ¡«ú«
- ¬«ñá óßÑ αáó¡« ß¼«ªÑΓ «Γ߽Ѫ¿óáΓ∞ ¿¡Σ«α¼áµ¿ε «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ,
- ¡«¼Ñαá ßΓ᫬ ¿ßσ«ñ¡«ú« ¬«ñá, óδó«ñ¿¼δÑ ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩, ¡Ñ
- íπñπΓ «í¡«ó½∩Γ∞ß∩, »«¬á »α«úαá¼¼á ¡Ñ íπñÑΓ »ÑαѬ«¼»¿½¿α«óá¡á.
-
- 꺼ѡѡ¿∩ αѪ¿¼á óδó«ñá ¿¡Σ«α¼áµ¿¿ ObjectBrowser
-
-
- B.Pascal 7 & Objects /UG - 90 -
-
- éδ ¼«ªÑΓÑ π»αáó½∩Γ∞ σáαá¬ΓÑα«¼ óδó«ñá ó ObjectBrowser ¿¡Σ«α-
- ¼áµ¿¿.
-
- ¡« óδíαáΓ∞, ¬á¬¿Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ ñ«½ª¡δ óδó«ñ¿Γ∞
- ObjectBrowser:
-
- 1. ä½∩ óδó«ñá ñ¿á½«ú«ó«ú« «¬¡á Browser Options óδíÑα¿ΓÑ ¬«-
- ¼á¡ñπ Options│Browser.
-
- 2. é úαπ»»Ñ Symbols «Γ¼ÑΓ∞ΓÑ Γ«½∞¬« ΓÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, ¬«Γ«-
- αδÑ óδ σ«Γ¿ΓÑ óδó«ñ¿Γ∞ ó ObjectBrowser. éδ ¼«ªÑΓÑ ΓᬪÑ
- óδíαáΓ∞ óδó«ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó, ¡áß½ÑñπѼδσ «Γ »αÑñ¬«ó
- «íΩѬΓá.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- é ObjectBrowser óδó«ñ∩Γß∩ Γ«½∞¬« ΓÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, ¬«Γ«-
- αδÑ óδ óδíα὿.
-
- éδ ¼«ªÑΓÑ Γá¬ªÑ óδíαáΓ∞, ¬á¬¿Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ óδó«ñ¿Γ∞ Γ«½∞-
- ¬« ó á¬Γ¿ó¡«¼ «¬¡Ñ »α«ß¼«Γαá. ä½∩ óδó«ñá ñ¿á½«ú«ó«ú« «¬¡á Local
- Browser Options (﫬á½∞¡δÑ »áαá¼ÑΓαδ »α«ß¼«Γαá) óδíÑα¿ΓÑ ó ½«-
- ¬á½∞¡«¼ ¼Ñ¡ε «¬¡á »α«ß¼«Γαá ¬«¼á¡ñπ Options ¿½¿ »α¿ «Γ«íαáªÑ¡¿¿
- «¬¡á »α«ß¼«Γαá ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+O.
-
-
- B.Pascal 7 & Objects /UG - 91 -
-
-
- àß½¿ óδ ó ¬áτÑßΓóÑ Γ¿»á «Γ«íαáªáѼδσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó óδíÑαÑ-
- ΓÑ Γ¿»δ, »ÑαѼѡ¡δÑ ¿ »α«µÑñπαδ, á ºáΓѼ íπñÑΓÑ »α«ß¼áΓα¿óáΓ∞
- «íΩÑ¬Γ Location ó »α«úαá¼¼Ñ BREAKOUT.PAS (»α¿¼Ñα ñѼ«¡ßΓαᵿ«¡¡«⌐
- »α«úαá¼¼δ ó ¬áΓὫúÑ EXAMPLES\DOS\BREAKOUT), Γ« πó¿ñ¿ΓÑ ß½ÑñπεΘπε
- ¿¡Σ«α¼áµ¿ε «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ:
-
- ▒File▒Edit▒Search▒▒Run▒▒Compile▒Debug▒Tools▒Options▒Window▒Help▒▒
- ╔═[*]══════════════════════ Browse: Object ════════════════2═[*]╗
- ║ Global Scope ║
- ║─┤ S │ I │ R ├─────────────────────────────────────────────────║
- ║▒var▒▒▒▒Location.X:▒▒Integer▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒^
- ║ var Location.Y: Integer █
- ║ var Location.Visible: Boolean ▒
- ║ var Location.Init(Integer, Integer) ▒
- ║ proc Location.Relocate(Integer, Integer) ▒
- ║ proc Location.MoveTo(Integer, Integer) ▒
- ║ proc Location.Show ▒
- ║ proc Location.Hide ▒
- ║ func Location.GetX: Integer ▒
- ║ func Location.GetY: Integer ▒
- ║ func Location.InVisible: Boolean ▒
- ║ ▒
- ║ ▒
- ║ v
- ╚<█▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒>─┘
- ░F1░Help░<┘░Browse░░Ctrl░<┘░Go░to░source░Space░Track░src░F10░Menu
-
- É¿ß. 4.5 Åα«ß¼«Γα ¿¡Σ«α¼áµ¿¿ «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ.
-
- 櫬αáΘÑ¡¿∩ ß½Ñóá «Γ »ÑαÑτ¿ß½Ñ¡¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó »ÑαÑτ¿ß½∩-
- εΓ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, »αÑñßΓáó½∩εΘ¿Ñ ó¿ñ óδó«ñ¿¼«ú« ¿ñÑ¡Γ¿Σ¿¬áΓ«αá.
- çá¼ÑΓ¿¼, τΓ« ó¬½ετÑ¡¿Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó »α«µÑñπα Γá¬ªÑ ó¬½ετáÑΓ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ Σπ¡¬µ¿⌐.
-
- ┌───────────────┬────────────────────────────────────┐
- │ êñÑ¡Γ¿Σ¿¬áΓ«α │ æ¼δß½ │
- ├───────────────┼────────────────────────────────────┤
- │ const │ è«¡ßΓá¡Γá │
- │ func │ öπ¡¬µ¿∩ │
- │ label │ îÑΓ¬á │
- │ proc │ Åα«µÑñπαá │
- │ type │ Æ¿» │
- │ var │ ÅÑαѼѡ¡á∩ ¿½¿ Γ¿»¿º¿α«óá¡¡á∩ ¬«¡- │
- │ │ ßΓá¡Γá. │
- └───────────────┴────────────────────────────────────┘
-
- ä½∩ óδó«ñá »αÑñδñπΘÑú« «¬¡á »α«ß¼«Γαá óδíÑα¿ΓÑ ¬«¼á¡ñπ
- Search│Previous Browser ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+P.
-
- è«úñá óδ »α«ß¼áΓα¿óáÑΓÑ óδñѽѡ¡δ⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α, «¬¡«
-
- B.Pascal 7 & Objects /UG - 92 -
-
- ObjectBrowser »« π¼«½τá¡¿ε óδó«ñ¿Γ ¿¡Σ«α¼áµ¿ε «í «í½áßΓ¿ ñÑ⌐ß-
- Γó¿∩. àß½¿ óδ »αÑñ»«τ¿ΓáÑΓÑ »« π¼«½τá¡¿ε ó¿ñÑΓ∞ ¿¡Σ«α¼áµ¿ε «
- ßß佬áσ, Γ« ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Browser.
-
- 2. éδíÑα¿ΓÑ ó ¬áτÑßΓóÑ º¡áτÑ¡¿∩ »áαá¼ÑΓαá Preferred Pane
- Reference.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- Å« π¼«½τá¡¿ε ObjectBrowser óδó«ñ¿Γ ñ½∩ »α«óÑα∩Ѽ«ú« ¿ñÑ¡Γ¿-
- Σ¿¬áΓ«αá »«½¡πε ¿¡Σ«α¼áµ¿ε «í «»¿ßá¡¿¿. éδ ¼«ªÑΓÑ »α«ß¼«ΓαÑΓ∞ óßÑ
- »«½∩ ¿ ¼ÑΓ«ñδ ºá»¿ßÑ⌐ ¿ «íΩÑ¬Γ«ó, ó¬½ετá∩ »«½¡«ßΓ∞ε πΓ«τ¡Ñ¡¡δÑ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ. àß½¿ óδ ¡Ñ σ«Γ¿ΓÑ ó¿ñÑΓ∞ »«½¡«ßΓ∞ε πΓ«τ¡Ñ¡¡δÑ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, Γ« ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Browser.
- 2. ÄΓ¼Ñ¡¿ΓÑ »áαá¼ÑΓα óδó«ñá Qualified Symbols.
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- Åα¿¼Ñτá¡¿Ñ: éδ ¡Ñ πó¿ñ¿ΓÑ ó¿ñÑΓ∞ »«½¡«ßΓ∞ε πΓ«τ¡Ñ¡¡δÑ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, »«¬á ¡Ñ πßΓá¡«ó¿ΓÑ ¡áß½Ññ«óá¡¿Ñ ó ñ¿á½«ú«-
- ó«¼ «¬¡Ñ Browser Options (Options│Browser).
-
- Å« π¼«½τá¡¿ε ObjectBrowser óδó«ñ¿Γ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ ó «í½áßΓ¿
- Scope ó Γ«¼ »«α∩ñ¬Ñ, ó ¬á¬«¼ «¡¿ «»¿ßá¡δ. àß½¿ óδ »αÑñ»«τ¿ΓáÑΓÑ
- ß«αΓ¿α«óáΓ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ ó á½Σáó¿Γ¡«¼ »«α∩ñ¬Ñ, Γ« ßñѽá⌐ΓÑ ß½Ñ-
- ñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Browser.
- 2. ôßΓá¡«ó¿ΓÑ »áαá¼ÑΓα óδó«ñá Sort Always.
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- êñÑ¡Γ¿Σ¿¬áΓ«αδ íπñπΓ ß«αΓ¿α«óáΓ∞ß∩ Γ«½∞¬« »« ¿¼Ñ¡á¼, á ¡Ñ
- »« »«½¡«ßΓ∞ε πΓ«τ¡Ñ¡¡δ¼ ¿¼Ñ¡á¼. ìá»α¿¼Ñα, ßτ¿ΓáÑΓß∩, τΓ«
- ß½ÑñπεΘ¿⌐ ß»¿ß«¬ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó «Γß«αΓ¿α«óá¡ ó á½Σáó¿Γ-
- ¡«¼ »«α∩ñ¬Ñ:
-
- THELPFILE.DONE
- TOBJECT.FREE
- THELPFILE.INDEX: PHELP
-
- è«úñá óδ «Γ¬αδóáÑΓÑ «¬¡« »α«ß¼«Γαá, ºáΓѼ »α«ß¼áΓα¿óáÑΓÑ »Ñ-
- αÑτ¿ß½Ñ¡¡δ⌐ ó ¡Ñ¼ ¿ñÑ¡Γ¿Σ¿¬áΓ«α, Γ« «Γ¬αδóáÑΓß∩ ¡«ó«Ñ «¬¡« »α«ß-
- ¼«Γαá, ¡« »αÑñδñπΘÑÑ «¬¡« «ßΓáÑΓß∩. éδ ¼«ªÑΓÑ ¿º¼Ñ¡¿Γ∞ φΓ« »«óÑ-
- ñÑ¡¿Ñ Γᬿ¼ «íαẫ¼, τΓ« ¡«ó«Ñ «¬¡« »α«ß¼«Γαá íπñÑΓ ºá¼Ñ¡∩Γ∞ »αÑ-
- ñδñπΘÑÑ:
-
-
- B.Pascal 7 & Objects /UG - 93 -
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Browser.
-
- 2. ôßΓá¡«ó¿ΓÑ »áαá¼ÑΓα Replace Current sub-browsing.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- ùΓ«íδ ΓѬπΘÑÑ «¬¡« »α«ß¼«Γαá ß«σαá¡∩½«ß∞, ¬«úñá óδ óδí¿αáÑΓÑ
- »ÑαÑτ¿ß½Ñ¡¡δ⌐ ó Ñú« ß»¿ß¬Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«α, ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Browser.
-
- 2. ôßΓá¡«ó¿ΓÑ »áαá¼ÑΓα New Browser sub-browsing.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- 髺¼«ª¡«, ó í«½∞Φ¿¡ßΓóÑ ß½πτáÑó óδ »αÑñ»«τ¿ΓáÑΓÑ ¿ß»«½∞º«-
- óáΓ∞ »áαá¼ÑΓα Replace Current ¿½¿ New Browser, ¡« ¿¡«úñá ¿ß»«½∞-
- ºπÑΓÑ á½∞ΓÑα¡áΓ¿ó¡δ⌐ »áαá¼ÑΓαδ. üδßΓα« óδíαáΓ∞ á½∞ΓÑα¡áΓ¿ó¡δ⌐ »á-
- αá¼ÑΓα ¼«ª¡« ß½ÑñπεΘ¿¼ «íαẫ¼:
-
- 1. ì᪼¿ΓÑ ¿ πñÑনóá⌐ΓÑ ó ¡áªáΓ«¼ ß«ßΓ«∩¡¿¿ ¬½áó¿Φπ Shift.
-
- 2. éδíÑα¿ΓÑ ß½ÑñπεΘÑÑ ñÑ⌐ßΓó¿Ñ »α«ß¼«Γαá.
-
- ìá»α¿¼Ñα, Ñß½¿ ñÑ⌐ßΓóπÑΓ »áαá¼ÑΓα New Browser, Γ« »α¿ ¡á-
- ªáΓ¿¿ ¬½áó¿Φ¿ Shift ß½ÑñπεΘÑÑ «Γ¬αδóáѼ«Ñ «¬¡« »α«ß¼«Γαá
- íπñÑΓ ºá¼ÑΘáΓ∞ ΓѬπΘÑÑ.
-
- ÄΓ߽Ѫ¿óá¡¿Ñ ¿ αÑñá¬Γ¿α«óá¡¿Ñ ßß佫¬ ¡á ßΓ᫬¿
-
- è«úñá ObjectBrowser óδó«ñ¿Γ ßß佫τ¡πε ¿¡Σ«α¼áµ¿ε, óδ ¼«ªÑΓÑ
- óδí¿αáΓ∞ ¿ αÑñá¬Γ¿α«óáΓ∞ óδó«ñ¿¼δÑ ó ßßδ½¬Ñ ßΓ᫬¿ »α«úαá¼¼δ ¿½¿
- «Γ߽Ѫ¿óáΓ∞ ßß佬¿ ¡á ¿ñÑ¡Γ¿Σ¿¬áΓ«α. ÄΓ߽Ѫ¿óá¡¿Ñ «º¡áτáÑΓ, τΓ«
- IDE, »α¿ »ÑαѼÑΘÑ¡¿¿ »« ßßδ½¬á¼ ó «¬¡Ñ »α«ß¼«Γαá, »«ñßóÑτ¿óáÑΓ ó
- »α«úαá¼¼Ñ «ñ¡π ßΓ᫬π ºá ñαπú«⌐.
-
- ùΓ«íδ «ΓαÑñá¬Γ¿α«óáΓ∞ óδó«ñ¿¼πε ó ßßδ½¬Ñ ßΓ᫬π »α«úαá¼¼δ,
- ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδñѽ¿ΓÑ ßß佬π ó «¬¡Ñ »α«ß¼«Γαá.
-
- 2. ì᪼¿ΓÑ ¬½áó¿Φ¿ Ctrl+Enter ¿½¿ Ctrl+G.
-
- éáΦ ¬παß«α »ÑαѼÑΘáÑΓß∩ ¡á ßΓ᫬π »α«úαá¼¼δ ó ¿ßσ«ñ¡«¼
- ¬«ñÑ, ßßδ½¬á ¡á ¬«Γ«απε ß«ñÑনΓß∩ ó «¬¡Ñ »α«ß¼«Γαá. ÆÑ-
- »Ñα∞ óδ ¼«ªÑΓÑ αÑñá¬Γ¿α«óáΓ∞ ßΓ᫬π »α«úαá¼¼δ.
-
- Å« π¼«½τá¡¿ε, ¬«úñá óáΦ ¬παß«α »ÑαѼÑΘáÑΓß∩ ¡á ßΓ᫬π ¿ß-
- σ«ñ¡«ú« ¬«ñá »α«úαá¼¼δ, «¬¡« ObjectBrowser ºá¬αδóáÑΓß∩.
- àß½¿ óδ »αÑñ»«τ¿ΓáÑΓÑ, τΓ«íδ «¬¡« »α«ß¼«Γαá «ßΓáóὫß∞
- «Γ¬αδΓδ¼, Γ« «Γ¼Ñ¡¿ΓÑ »áαá¼ÑΓα Close On Go To Source ó
- ñ¿á½«ú«ó«¼ «¬¡Ñ Preferences.
-
-
- B.Pascal 7 & Objects /UG - 94 -
-
- Åα¿¼Ñτá¡¿Ñ: Åáαá¼ÑΓα Close On Go To Source ó½¿∩ÑΓ
- Γá¬ªÑ ¡á «¬¡« ß««íΘÑ¡¿⌐ Messages (ß¼. ¡¿ªÑ).
-
- ä½∩ «Γ߽Ѫ¿óá¡¿∩ ßΓ᫬ »α«úαá¼¼δ:
-
- 1. é «¬¡Ñ »α«ß¼«Γαá óδñѽ¿ΓÑ ßß佬π, ¬«Γ«απε óδ σ«Γ¿ΓÑ «Γß-
- ½Ñª¿óáΓ∞.
-
- 2. ì᪼¿ΓÑ ¬½áó¿Φπ »α«íѽá.
-
- àß½¿ óδ óßÑúñá σ«Γ¿ΓÑ «Γ߽Ѫ¿óáΓ∞ ßß佬¿ »« ¿ßσ«ñ¡«¼π ¬«-
- ñπ, πßΓá¡«ó¿ΓÑ »áαá¼ÑΓα Auto Track Source ¿ úαπ»»Ñ
- Options ñ¿á½«ú«ó«ú« «¬¡á Preferences. Æ«úñá »α¿ »α«¬απΓ¬Ñ
- ßß佫¬ ßΓ᫬¿ ó ¿ßσ«ñ¡«¼ ¬«ñÑ »α«úαá¼¼δ íπñπΓ »α«¬απτ¿-
- óáΓ∞ß∩ áóΓ«¼áΓ¿τÑ߬¿, ¿ »α«íѽ óá¼ ¡áª¿¼áΓ∞ ¡Ñ ¡πª¡«.
-
- Åα¿¼Ñτá¡¿Ñ: Åáαá¼ÑΓα Auto Track Source ó½¿∩ÑΓ ΓᬪÑ
- ¡á «¬¡« ß««íΘÑ¡¿⌐ Messages (ß¼. ¡¿ªÑ).
-
- ÆÑ»Ñα∞ ßΓ᫬¿ »α«úαá¼¼δ, ¡á ¬«Γ«αδÑ ¿¼ÑεΓß∩ ßß佬¿ ó «¬¡Ñ
- »α«ß¼«Γαá, «Γ߽Ѫ¿óáεΓß∩ ó ºáó¿ß¿¼«ßΓ¿ «Γ Γ«ú«, ¬á¬ óδ πßΓᡫ󿽿
- »áαá¼ÑΓαδ «Γ߽Ѫ¿óá¡¿∩ ó ñ¿á½«ú«ó«¼ «¬¡Ñ Options│Enviroment│
- Preferences: Ñß½¿ Σá⌐½, ¡á ¬«Γ«αδ⌐ ¿¼ÑÑΓß∩ ßß佬á, ¡Ñ ¡áσ«ñ¿Γß∩ ó
- «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩, Γ« IDE «Γ¬αδóáÑΓ Σá⌐½, ¿ «¡ óδó«ñ¿Γß∩ ½¿í« ó
- ¡«ó«¼, ½¿í« ó ΓѬπΘѼ «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩.
-
- * àß½¿ óδ σ«Γ¿ΓÑ, τΓ«íδ Σá⌐½ óδó«ñ¿½ß∩ ó ¡«ó«¼ «¬¡Ñ αÑñá¬Γ¿-
- α«óá¡¿∩, óδíÑα¿ΓÑ ó ¬áτÑßΓóÑ º¡áτÑ¡¿∩ »áαá¼ÑΓαá Source
- Tracking New Window.
-
- * àß½¿ óδ σ«Γ¿ΓÑ, τΓ«íδ Σá⌐½ ºá¼ÑΘá½ ΓѬπΘ¿⌐ ó á¬Γ¿ó¡«¼ «¬¡Ñ
- αÑñá¬Γ¿α«óá¡¿∩, óδíÑα¿ΓÑ ó ¬áτÑßΓóÑ º¡áτÑ¡¿∩ »áαá¼ÑΓαá
- Source Tracking Current Window.
-
- Åα¿¼Ñτá¡¿Ñ: Åáαá¼ÑΓα Source Tracking ó½¿∩ÑΓ Γá¬ªÑ ¡á
- «¬¡« ß««íΘÑ¡¿⌐ Messages (ß¼. ¡¿ªÑ).
-
- àß½¿ óδíαá¡¡δ⌐ ¼«ñπ½∞ σαá¡¿Γß∩ ó í¿í½¿«ΓÑ¬Ñ ¿ß»«½¡∩εΘÑ⌐ ß¿ß-
- ΓѼδ Borland Pascal ¿½¿ ∩ó½∩ÑΓß∩ «ñ¡¿¼ ¿º ßΓá¡ñáαΓ¡δσ ¼«ñπ½Ñ⌐, Γ«
- óδ ¡Ñ ß¼«ªÑΓÑ »α«ß¼áΓα¿óáΓ∞ ¿½¿ αÑñá¬Γ¿α«óáΓ∞ ¿ßσ«ñ¡δ⌐ ¬«ñ, »«ß-
- ¬«½∞¬π φΓ¿ ¼«ñπ½¿ ß¬«¼»¿½¿α«óá¡δ íѺ ó¬½ετÑ¡¿∩ «Γ½áñ«τ¡«⌐ ¿¡Σ«α-
- ¼áµ¿¿.
-
-
-
- B.Pascal 7 & Objects /UG - 95 -
-
- Åα«ß¼«Γα ¼«ñπ½Ñ⌐
- ─────────────────────────────────────────────────────────────────
-
- 諼á¡ñá Search│Units «Γ¬αδóáÑΓ ñ¿á½«ú«ó«Ñ «¬¡«, ó ¬«Γ«α«¼
- óδó«ñ∩Γß∩ ¿ß»«½∞ºπѼδÑ ó óáΦÑ⌐ »α«úαá¼¼Ñ ¼«ñπ½¿, »ÑαÑτ¿ß½Ñ¡¡δÑ ó
- á½Σáó¿Γ¡«¼ »«α∩ñ¬Ñ. ä½∩ »α«ß¼«Γαá ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó, «»¿ßá¡¡δσ ó
- ¿¡ΓÑαΣÑ⌐ß¡«⌐ τáßΓ¿ ¼«ñπ½∩, óδñѽ¿ΓÑ ¬«¡¬αÑΓ¡δ⌐ ¼«ñπ½∞ ¿ ¡áª¼¿ΓÑ
- ¬½áó¿Φπ Enter ¿½¿ ñóáªñδ Θѽ¬¡¿ΓÑ ¡Ñ ¡Ñ¼ ¬¡«»¬«⌐ "¼δΦ¿". ǡὫ-
- ú¿τ¡« Γ«¼π, ¬á¬ φΓ« ñѽáÑΓß∩ ß «íΩѬΓἿ, óδ ¼«ªÑΓÑ ó¿ñÑΓ∞ «í-
- ½áßΓ∞ ñÑ⌐ßΓó¿∩ ßß佫τ¡«⌐ ¿¡Σ«α¼áµ¿¿ ñ½∩ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá. àß½¿ ¼«-
- ñπ½∞, ¡á ¬«Γ«αδ⌐ ¿¼ÑÑΓß∩ ßß佬á, ¡Ñ ∩ó½∩ÑΓß∩ «ñ¡¿¼ ¿º »«ßΓáó½∩-
- Ѽδσ ß Borland Pascal ßΓá¡ñáαΓ¡δσ ¼«ñπ½Ñ⌐, ¿ ߬«¼»¿½¿α«óá¡ Γᬿ¼
- «íαẫ¼, τΓ« ó¬½ετáÑΓ ó ßÑí∩ óßε ¡Ñ«íσ«ñ¿¼πε ñ½∩ ¿¡ΓÑúα¿α«óá¡¡«⌐
- «Γ½áñ¬¿/»α«ß¼«Γαá ¿¡Σ«α¼áµ¿ε, Γ« óδ ¼«ªÑΓÑ »α¿ ß««ΓóÑΓßΓóπεΘÑ⌐
- ßßδ½¬Ñ «Γ߽Ѫ¿óáΓ∞ ¿ αÑñá¬Γ¿α«óáΓ∞ ¿ßσ«ñ¡δ⌐ ¬«ñ ¼«ñπ½∩.
-
- é ß½ÑñπεΘѼ »α¿¼ÑαÑ ¼«ñπ½∞ Walls «»¿ßδóáÑΓß∩ ó ßΓα«¬Ñ 4 Σá⌐-
- ½á WALLS.PAS ¿ óδºδóáÑΓß∩ ¡á ßΓα«¬Ñ 37 BREAKOUT.PAS.
-
- ┌───────────────── Browse: Units ─────────────2──┐
- │ Global scope │
- ├─┤ S ├──────────────────────────────────────────┤
- │ unit Bounds │
- │ unit Breakout │
- │ unit Bricks │
- │ unit Count │
- │ unit Crt ╔═[*]═════ Browse: Walls ══3═══[^]═╗
- │ unit Dos ║ unit Walls ║
- │ unit Screen ║─┤ S │ R ├─────────────────────────║
- │ unit System ║ WALLS.PAS(4) ║
- │▒unit▒▒Walls▒▒▒▒ ║░BREAKOUT.PAS(37)░░░░░░░░░░░░░░░░░░║
- │ ║ ║
- │ ║ ║
- │ ╚══2/2══════════════════════════════╝
- │ │
- │ │
- └────────────────────────────────────────────────┘
-
- É¿ß. 4.6 Åα«ß¼«Γα ¼«ñπ½Ñ⌐ ó óáΦÑ⌐ »α¿¬½áñ¡«⌐ »α«úαá¼¼Ñ.
-
-
- B.Pascal 7 & Objects /UG - 96 -
-
- Åα«ß¼«Γα ú½«íá½∞¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó
- ─────────────────────────────────────────────────────────────────
-
- 諼á¡ñá Search│Global «Γ¬αδóáÑΓ «¬¡«, ó ¬«Γ«α«¼ óδó«ñ∩Γß∩
- ¿ß»«½∞ºπѼδÑ ó »α«úαá¼¼Ñ ú½«íá½∞¡δÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, »ÑαÑτ¿ß½Ñ¡¡δÑ
- ó á½Σáó¿Γ¡«¼ »«α∩ñ¬Ñ. èᬠ¿ ó ß½πτáÑ «íΩÑ¬Γ«ó, ñ½∩ »α«ß¼«Γαá
- ßΓ᫬ ó »α«úαá¼¼Ñ, ßßδ½áεΘ¿σß∩ ¡á φëà ¿ñÑ¡Γ¿Σ¿¬áΓ«α, «»¿ßá¡¿⌐
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ¿ ¿Ñαáασ¿¿ ¡áß½Ññ«óá¡¿∩ óδ ¼«ªÑΓÑ «Γ¬αδóáΓ∞ ñ«»«½-
- ¡¿Γѽ∞¡δÑ «¬¡á ObjectBrowser. Åα¿ óδó«ñÑ ßß佫τ¡«⌐ ¿¡Σ«α¼áµ¿¿ óδ
- ¼«ªÑΓÑ «Γ߽Ѫ¿óáΓ∞ ¿½¿ αÑñá¬Γ¿α«óáΓ∞ ßΓ᫬¿ »α«úαá¼¼δ. ìá»α¿¼Ñα,
- ¡á ß½ÑñπεΘѼ α¿ßπ¡¬Ñ »«¬áºá¡ ß»¿ß«¬ ú½«íá½∞¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó,
- ¿ß»«½∞ºπѼδσ ó »α«úαá¼¼Ñ BREAKOUTS.PAS:
-
- ╔═[*]══════════════════════ Browse: Object ════════════════2═[^]╗
- ║ Global Scope ║
- ║─┤ S ├─────────────────────────────────────────────────────────║
- ║▒func▒▒▒Abs(..)▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒^
- ║ func Addr(...) █
- ║ const AnyFile = 63 ▒
- ║ proc Append(...) ▒
- ║ const Archive = 32 ▒
- ║ func ArcTan(...) ▒
- ║ proc Assing(...) ▒
- ║ proc AssingCrt(var Text) ▒
- ║ func Assigned(...) ▒
- ║ var b: Ball ▒
- ║ type Ball = object(Block) ▒
- ║ var Balls: DownCounter ▒
- ║ proc Beep ▒
- ║ const Block = 0 ▒
- ║ const Blink = 128 ▒
- ║ type Block = object(Location) ▒
- ║ proc BlockRead(...) ▒
- ║ const Blue = 1 v
- ╚<█▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒>─┘
-
- É¿ß. 4.7 Åα«ß¼«Γα ú½«íá½∞¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó, ¿ß»«½∞ºπѼδσ ó
- »α«úαá¼¼Ñ.
-
- B.Pascal 7 & Objects /UG - 97 -
-
- Åα«ß¼«Γα ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó ó ¿ßσ«ñ¡«¼ ¬«ñÑ
- ─────────────────────────────────────────────────────────────────
-
- éδ ¼«ªÑΓÑ »α«ß¼áΓα¿óáΓ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ ó ßó«Ñ¼ ¿ßσ«ñ¡«¼ ¬«-
- ñÑ. Å«¼ÑßΓ¿ΓÑ ¬παß«α ¡á ¿ñÑ¡Γ¿Σ¿¬áΓ«α ¿ óδíÑα¿ΓÑ «ñ¿¡ ¿º ß½Ññπε-
- Θ¿σ ¼ÑΓ«ñ«ó:
-
- * ä½∩ óδó«ñá ñ¿á½«ú«ó«ú« «¬¡á Browse Symbol óδíÑα¿ΓÑ ó ¼Ñ¡ε
- Search ¬«¼á¡ñπ Symbol. êß»«½∞ºπ⌐ΓÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«α, óδóÑñÑ¡-
- ¡δ⌐ ó ñ¿á½«ú«ó«¼ «¬¡Ñ, ¿½¿ óóÑñ¿ΓÑ ñαπú«⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ¿
- óδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- * ä½∩ óδó«ñá ½«¬á½∞¡«ú« ¼Ñ¡ε «¬¡á αÑñá¬Γ¿α«óá¡¿∩ ¡áª¼¿ΓÑ
- ¬½áó¿Φ¿ Alt+F10 ¿½¿ Θѽ¬¡¿ΓÑ »αáó«⌐ ¬¡«»¬¿ "¼δΦ¿" ¿ óδíÑ-
- α¿ΓÑ ¬«¼á¡ñπ Browse Symbol at Cursor.
-
- * àß½¿ ñ½∩ »α«ß¼«Γαá ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó óδ ºáñ὿ »αáóπε ¬¡«»¬π
- "¼δΦ¿" (óδí«α«¼ ¬«¼á¡ñδ Options│Enviroment│Mouse ¿ Browse
- at Cursor), Γ« ¡áª¼¿ΓÑ ¬½áó¿Φπ Ctrl ¿, πñÑনóá∩ ÑÑ, Θѽ-
- ¬¡¿ΓÑ »αáó«⌐ ¬¡«»¬«⌐ "¼δΦ¿".
-
- Æ¿» ¿¡Σ«α¼áµ¿¿, ¬«Γ«απε óδ ó¿ñ¿ΓÑ, ºáó¿ß¿Γ «Γ Γ¿»á ¿¡Σ«α¼á-
- µ¿¿, ñ«ßΓπ»¡«⌐ ñ½∩ óδíαá¡¡«ú« ¿ñÑ¡Γ¿Σ¿¬áΓ«αá:
-
- * àß½¿ ñ½∩ óδñѽѡ¡«ú« óἿ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ¿¡Σ«α¼áµ¿∩ «í «í-
- ½áßΓ¿ ñÑ⌐ßΓó¿∩ ¡Ññ«ßΓπ»¡á, Γ« ObjectBrowser óδó«ñ¿Γ ñ½∩
- ¡Ñú« ßß佫τ¡πε ¿¡Σ«α¼áµ¿ε. ìá»α¿¼Ñα, ñ½∩ »α«ßΓ«⌐ ¬«¡ßΓá¡Γδ
- ñ«ßΓπ»¡á Γ«½∞¬« ßß佫τ¡á∩ ¿¡Σ«α¼áµ¿∩.
-
- * àß½¿ óδñѽѡ¡δ⌐ óἿ ¿ñÑ¡Γ¿¬áΓ«α ¡Ñ ¿¼ÑÑΓ ñ«ßΓπ»¡«⌐ ¿¡Σ«α-
- ¼áµ¿¿ «í «í½áßΓ¿ ñÑ⌐ßΓó¿∩, ObjectBrowser óδó«ñ¿Γ ñ½∩ φΓ«ú«
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ¿¡Σ«α¼áµ¿ε «í «í½áßΓ¿ ñÑ⌐ßΓó¿∩. Ä¡ ΓᬪÑ
- ñáÑΓ óἠ󫺼«ª¡«ßΓ∞ ó¿ñÑΓ∞ ßß佫τ¡πε ¿¡Σ«α¼áµ¿ε.
-
- * àß½¿ óδñѽѡ¡δ⌐ óἿ ¿ñÑ¡Γ¿Σ¿¬áΓ«α »αÑñßΓáó½∩ÑΓ ß«í«⌐
- ßΓαπ¬Γπα¡δ⌐ Γ¿», Γ« ObjectBrowser óδó«ñ¿Γ ñ½∩ φΓ«ú« Γ¿»á
- ¿¡Σ«α¼áµ¿ε «í «í½áßΓ¿ ñÑ⌐ßΓó¿∩. Ä¡ ñáÑΓ óá¼ Γá¬ªÑ ó«º¼«ª-
- ¡«ßΓ∞ ó¿ñÑΓ∞ ¿¡Σ«α¼áµ¿ε « ¡áß½Ññ«óá¡¿¿ ¿ ßß佫τ¡πε ¿¡Σ«α-
- ¼áµ¿ε. àß½¿ óδ óδíÑα¿ΓÑ ¿¡Σ«α¼áµ¿ε « ¡áß½Ññ«óá¡¿¿, Γ« πó¿-
- ñ¿ΓÑ ¡Ñ»«ßαÑñßΓóÑ¡¡«ú« »αÑñ¬á φΓ«ú« Γ¿»á ¿ ¡Ñ»«ßαÑñßΓóÑ¡-
- ¡δσ »«Γ«¼¬«ó, Ñß½¿ «¡¿ ¿¼ÑεΓß∩.
-
- àß½¿ óδ óδíα὿ »α«ß¼«Γα ßΓαπ¬Γπα¡«ú« Γ¿»á, ObjectBrowser
- óδó«ñ¿Γ ¡á φ¬αá¡ »«½¡«ßΓ∞ε πΓ«τ¡Ñ¡¡δÑ ¿¼Ñ¡á, Ñß½¿ πñ«ó½ÑΓó«α∩εΓß∩
- ß½ÑñπεΘ¿Ñ ñóá πß½«ó¿∩:
-
- * é ñ¿á½«ú«ó«¼ «¬¡Ñ Browser Options (Options│Browser) ¿½¿ ó
- ñ¿á½«ú«ó«¼ «¬¡Ñ Local Browser Options (½«¬á½∞¡«Ñ ¼Ñ¡ε
- Options «¬¡á »α«ß¼«Γαá) óδíαá¡ »áαá¼ÑΓα Inherited symbol.
-
- * é ñ¿á½«ú«ó«¼ «¬¡Ñ Browser Options (Options│Browser) ¿½¿ ó
- ñ¿á½«ú«ó«¼ «¬¡Ñ Local Browser Options (½«¬á½∞¡«Ñ ¼Ñ¡ε
- Options «¬¡á »α«ß¼«Γαá) óδíαá¡ »áαá¼ÑΓα Qualified Symbols.
-
- B.Pascal 7 & Objects /UG - 98 -
-
-
- ìá»α¿¼Ñα, ¡á ß½ÑñπεΘѼ α¿ßπ¡¬Ñ »«¬áºá¡á »«½¡á∩ ¿¡Σ«α¼áµ¿∩ «í
- «»¿ßá¡¿¿ «í½áßΓ¿ ñÑ⌐ßΓó¿∩ ñ½∩ »ÑαѼѡ¡«⌐ b Γ¿»á Ball:
-
- ▒File▒Edit▒Search▒▒Run▒▒Compile▒Debug▒Tools▒Options▒Window▒Help▒▒
- ╔═[*]══════════════════════ Browse: b ═════════════════════2═[*]╗
- ║ var b: Ball ║
- ║─┤ S │ I │ R ├─────────────────────────────────────────────────║
- ║▒var▒▒▒▒Location.X:▒▒Integer▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒^
- ║ var Location.Y: Integer █
- ║ var Location.Visible: Boolean ▒
- ║ var Location.Init(Integer, Integer) ▒
- ║ proc Location.Relocate(Integer, Integer) ▒
- ║ proc Location.MoveTo(Integer, Integer) ▒
- ║ func Location.GetX: Integer ▒
- ║ func Location.GetY: Integer ▒
- ║ func Location.InVisible: Boolean ▒
- ║ var Block.Color: Integer ▒
- ║ var Block.Width: Integer ▒
- ║ var Block.BChar: Char ▒
- ║ proc Block.Show ▒
- ║ proc Block.Hide ▒
- ║ var Ball.XVel: Integer ▒
- ║ var Ball.YVel: Integer ▒
- ║ proc Ball.Init(Integer, Integer, Integer, Integer, Integer) ▒
- ║ func Ball.NextX: Integer ▒
- ║ func Ball.NextY: Integer ▒
- ║ proc Ball.MoveX v
- ╚<█▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒>─┘
- ░F1░Help░<┘░Browse░░Ctrl░<┘░Go░to░source░Space░Track░src░F10░Menu
-
- É¿ß. 4.8 Åα«ß¼«Γα »«½¡«⌐ ¿¡Σ«α¼áµ¿¿ «»¿ßá¡¿∩ «í½áßΓ¿ ñÑ⌐ß-
- Γó¿∩.
-
- àß½¿ ObjectBrowser óδó«ñ¿Γ ß««íΘÑ¡¿Ñ, ú«ó«α∩ΘÑÑ, τΓ« ¬á-
- ¬«⌐-Γ« ¿ñÑ¡Γ¿Σ¿¬áΓ«α ¡Ñ ¡á⌐ñÑ¡, »α«óÑα∞ΓÑ ¿ πíÑñ¿ΓÑß∞, τΓ« óδ ºá-
- ñ὿ ó ObjectBrowser »α«óÑα¬π ñ«»πßΓ¿¼«ú« ¿ñÑ¡Γ¿Σ¿¬áΓ«αá, ¿ τΓ«
- ¿ñÑ¡Γ¿Σ¿¬áΓ«α ¡áσ«ñ¿Γß∩ ó ¡πª¡«⌐ «í½áßΓ¿ ñÑ⌐ßΓó¿∩. ìá»α¿¼Ñα, »α¿
- óδí«αÑ ¬«¼á¡ñδ Search│Symbol ¬παß«α ¼«ªÑΓ íδΓ∞ »«º¿µ¿«¡¿α«óá¡ ¡á
- ¬«¼¼Ñ¡Γáα¿¿. ï¿í« ¬παß«α ¼«ªÑΓ ¡áσ«ñ¿Γ∞ß∩ ó¡Ñ «í½áßΓ¿ ñÑ⌐ßΓó¿∩, ó
- ¬«Γ«α«⌐ ObjectBrowser ¼«ªÑΓ ¡á⌐Γ¿ ¿¡Σ«α¼áµ¿ε «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αÑ.
- ìá»α¿¼Ñα, ¬παß«α ¼«ªÑΓ ¡áσ«ñ¿Γ∞ß∩ ¡á Σ«α¼á½∞¡«¼ »áαá¼ÑΓαÑ ó «»¿-
- ßá¡¿¿ Σπ¡¬µ¿¿, á ¡Ñ ó αÑ὿ºáµ¿¿ Σπ¡¬µ¿¿. é φΓ«¼ ß½πτáÑ
- ObjectBrowser ¡Ñ ¼«ªÑΓ ¡á⌐Γ¿ ¿ñÑ¡Γ¿Σ¿¬áΓ«α, ¡« Ñß½¿ óδ ¡á⌐ñÑΓÑ
- »áαá¼ÑΓα ó αÑ὿ºáµ¿¿ Σπ¡¬µ¿¿, Γ« ß¼«ªÑΓÑ »α«ß¼«ΓαÑΓ∞ Ñú«.
-
-
-
- B.Pascal 7 & Objects /UG - 99 -
-
- Åα«ß¼«Γα Σπ¡¬µ¿⌐ ObjectBrowser
- ─────────────────────────────────────────────────────────────────
-
- é Æáí½¿µÑ 4.5 »ÑαÑτ¿ß½Ñ¡δ ¬½áó¿Φ¿ ¿ ¬«¼á¡ñδ ¼Ñ¡ε, á¬Γ¿ó¿º¿-
- απεΘ¿Ñ Σπ¡¬µ¿¿ ObjectBrowser:
-
- öπ¡¬µ¿¿ ObjectBrowser Æáí½¿µá 4.5
- ┌───────────────────────────┬───────────────────────────────────┐
- │ ùΓ«íδ óδ»«½¡¿Γ∞: │ æñѽá⌐ΓÑ ß½ÑñπεΘÑÑ: │
- ├───────────────────────────┼───────────────────────────────────┤
- │ Åα«ß¼«Γα «íΩÑ¬Γ«ó │ éδíÑα¿ΓÑ ¬«¼á¡ñπ Search│Objects. │
- ├───────────────────────────┼───────────────────────────────────┤
- │ Åα«ß¼«Γα ¼«ñπ½Ñ⌐ │ éδíÑα¿ΓÑ ¬«¼á¡ñπ Search│Units. │
- ├───────────────────────────┼───────────────────────────────────┤
- │ Åα«ß¼«Γα ú½«íá½∞¡δσ │ éδíÑα¿ΓÑ ¬«¼á¡ñπ Search│Globals. │
- │ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó │ │
- ├───────────────────────────┼───────────────────────────────────┤
- │ Åα«ß¼«Γα ¿ñÑ¡Γ¿Σ¿¬áΓ«αá │ Å«¼ÑßΓ¿ΓÑ ¬παß«α ¡á ¿ñÑ¡Γ¿Σ¿¬áΓ«αÑ│
- │ │ ßó«Ñ⌐ »α«úαá¼¼δ, óδíÑα¿ΓÑ ¬«¼á¡ñπ│
- │ │ Search│Symbol ¿½¿ πñÑনóá⌐ΓÑ ¡á-│
- │ │ ªáΓ«⌐ ¬½áó¿Φπ Ctrl ¿ Θѽ¬¡¿ΓÑ »αá-│
- │ │ ó«⌐ ¬¡«»¬«⌐ "¼δΦ¿". │
- ├───────────────────────────┼───────────────────────────────────┤
- │ éδíαáΓ∞ Browser Options │ éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Browser. │
- ├───────────────────────────┼───────────────────────────────────┤
- │ éδíαáΓ∞ »áαá¼ÑΓα Source │ éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviro-│
- │ Tracking Options │ ment│Preferences. │
- ├───────────────────────────┼───────────────────────────────────┤
- │ éδíαáΓ∞ Mouse Options │ éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviro-│
- │ │ mrnt│Mouse. │
- ├───────────────────────────┼───────────────────────────────────┤
- │ ÄΓ¬αδΓ∞ »αÑñδñπΘÑÑ «¬¡« │ éδíÑα¿ΓÑ ¬«¼á¡ñπ Search│Previous│
- │ »α«ß¼«Γαá │ Browser, óδíÑα¿ΓÑ ó ½«¬á½∞¡«¼ ¼Ñ¡ε│
- │ │ «¬¡á »α«ß¼«Γαá ¬«¼á¡ñπ Previous│
- │ │ ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+P. │
- ├───────────────────────────┼───────────────────────────────────┤
- │ éδíαáΓ∞ Local Browser │ ì᪼¿ΓÑ ¬½áó¿Φ¿ Ctrl+O ¿½¿ óδíÑα¿-│
- │ Options │ ΓÑ ¬«¼á¡ñπ Options ó ½«¬á½∞¡«¼ │
- │ │ ¼Ñ¡ε «¬¡á »α«ß¼«Γαá. │
- ├───────────────────────────┼───────────────────────────────────┤
- │ ÄΓαÑñá¬Γ¿α«óáΓ∞ ¿ßσ«ñ¡δ⌐ │ ì᪼¿ΓÑ Ctrl+Enter ó ObjectBrowser│
- │ ¬«ñ │ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+G ¿½¿ óδíÑα¿-│
- │ │ ΓÑ ó ½«¬á½∞¡«¼ ¼Ñ¡ε «¬¡á »α«ß¼«Γαá│
- │ │ ¬«¼á¡ñπ Goto Source. │
- ├───────────────────────────┼───────────────────────────────────┤
- │ ÄΓ߽Ѫ¿óáΓ∞ ¿ßσ«ñ¡δ⌐ │ ì᪼¿ΓÑ ó ObjectBrowser »α«íѽ│
- │ ¬«ñ │ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+T ¿½¿ óδíÑα¿-│
- │ │ ΓÑ ó ½«¬á½∞¡«¼ ¼Ñ¡ε «¬¡á »α«ß¼«Γαá│
- │ │ Track Source. │
- ├───────────────────────────┼───────────────────────────────────┤
- │ éδóÑßΓ¿ ßß佫τ¡πε │ ì᪼¿ΓÑ ó ObjectBrowser ¬½áó¿Φ¿│
- │ ¿¡Σ«α¼áµ¿ε │ Ctrl+R ¿½¿ Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á│
- │ │ íπ¬óÑ R ó αá¼¬Ñ «¬¡á. │
-
- B.Pascal 7 & Objects /UG - 100 -
-
- ├───────────────────────────┼───────────────────────────────────┤
- │ éδóÑßΓ¿ ¿¡Σ«α¼áµ¿ε │ ì᪼¿ΓÑ ó ObjectBrowser ¬½áó¿Φ¿│
- │ «í «í½áßΓ¿ ñÑ⌐ßΓó¿∩ │ Ctrl+S ¿½¿ Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á│
- │ │ íπ¬óÑ S ó αá¼¬Ñ «¬¡á. │
- ├───────────────────────────┼───────────────────────────────────┤
- │ éδó«ñ ¿¡Σ«α¼áµ¿¿ « │ ì᪼¿ΓÑ ó ObjectBrowser ¬½áó¿Φ¿│
- │ ¡áß½Ññ«óá¡¿¿ │ Ctrl+I ¿½¿ Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á│
- │ │ íπ¬óÑ I ó αá¼¬Ñ «¬¡á. │
- ├───────────────────────────┼───────────────────────────────────┤
- │ 꺼ѡ¿Γ∞ ¡á «íαáΓ¡δ⌐ │ ì᪼¿ΓÑ ¬½áó¿Φπ Shift, ¿, πñÑন-│
- │ αѪ¿¼ óδó«ñá »«ñ«¬¡á │ óá∩ ÑÑ, óδ»«½¡¿ΓÑ ß½ÑñπεΘÑÑ ñÑ⌐ßΓ-│
- │ │ ó¿Ñ. │
- └───────────────────────────┴───────────────────────────────────┘
-
-
-
- B.Pascal 7 & Objects /UG - 101 -
-
- éδ»«½¡Ñ¡¿Ñ ó IDE ñαπú¿σ »α«úαá¼¼
- ─────────────────────────────────────────────────────────────────
-
- üѺ óδσ«ñá ¿º IDE óδ ¼«ªÑΓÑ ºá»π߬áΓ∞ ñαπú¿Ñ »α«úαá¼¼δ ¿
- πΓ¿½¿Γδ. Åα¿ πßΓá¡«ó¬Ñ »á¬ÑΓá Borland Pascal IDE πßΓá¡áó½¿óáÑΓß∩
- ñ½∩ óδ»«½¡Ñ¡¿∩ Γá¬¿σ ¿¡ßΓαπ¼Ñ¡Γá½∞¡δσ »α«úαá¼¼¡δσ ßαÑñßΓó ¬á¬
- GREP, Turbo Assembler, Turbo Debugger ¿ Turbo Profiler.
-
- ùΓ«íδ ºá»πßΓ¿Γ∞ ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ¿¡ΓÑαá¬Γ¿ó¡«⌐ ßαÑñÑ »α«ú-
- αá¼¼π, ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. ÄΓ¬α«⌐ΓÑ ¼Ñ¡ε Tools (ê¡ßΓαπ¼Ñ¡Γá½∞¡δÑ ßαÑñßΓóá).
-
- éδ πó¿ñ¿ΓÑ ß»¿ß«¬ »α«úαá¼¼ ¿ πΓ¿½¿Γ, ¬«Γ«αδÑ ¼«ªÑΓ ºá»πß-
- ¬áΓ∞.
-
- 2. éδíÑα¿ΓÑ ó ¼Ñ¡ε Tools »α«úαá¼¼π, ¬«Γ«απε óδ σ«Γ¿ΓÑ ºá»πß-
- Γ¿Γ∞.
-
- Åα¿ óδí«αÑ »α«úαá¼¼δ Ñ⌐ »ÑαÑñáÑΓß∩ π»αáó½Ñ¡¿Ñ. Å«ß½Ñ óδ»«½-
- ¡Ñ¡¿∩ »α«úαá¼¼δ π»αáó½Ñ¡¿Ñ ó«ºóαáΘáÑΓß∩ «íαáΓ¡« ó IDE.
-
-
- ìáßΓα«⌐¬á ¼Ñ¡ε Tools
- ─────────────────────────────────────────────────────────────────
-
- Åα«úαá¼¼δ, ¬«Γ«αδÑ óδ ¡á⌐ñÑΓÑ »«½Ñº¡δ¼¿, ¼«ª¡« ñ«íáó¿Γ∞ ó
- ¼Ñ¡ε Tools ¿ ºá»π߬áΓ∞ ¿σ »«Γ«¼ ¿º IDE.
-
- ùΓ«íδ ñ«íáó¿Γ∞ »α«úαá¼¼δ ó ¼Ñ¡ε Tools, ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. ä½∩ óδó«ñá ñ¿á½«ú«ó«ú« «¬¡á Tools óδíÑα¿ΓÑ ¬«¼á¡ñπ
- Options│Tools.
-
- é í½«¬Ñ ß»¿ß¬á ºáú«½«ó¬«ó »α«úαá¼¼ Program Titles óδ πó¿-
- ñ¿ΓÑ ¬αáΓ¬«Ñ «»¿ßá¡¿Ñ πªÑ ¿¡ßΓá½½¿α«óá¡¡δσ ¿ ú«Γ«óδσ ¬
- óδ»«½¡Ñ¡¿ε »α«úαá¼¼.
-
- 2. ä½∩ óδó«ñá ñ¿á½«ú«ó«ú« «¬¡á Modify/New Tool (î«ñ¿Σ¿¬á-
- µ¿∩/ì«ó«Ñ ¿¡ßΓαπ¼Ñ¡Γá½∞¡«Ñ ßαÑñßΓó«) óδíÑα¿ΓÑ ¬«¼á¡ñπ
- New.
-
- 3. é í½«¬Ñ óó«ñá ºáú«½«ó¬á »α«úαá¼¼δ Program Title ¡áíÑα¿ΓÑ
- ¿¼∩ »α«úαá¼¼δ, ¬á¬ óδ σ«Γ¿ΓÑ óδó«ñ¿Γ∞ Ñú« ó ¼Ñ¡ε Tools.
-
- àß½¿ óδ σ«Γ¿ΓÑ, τΓ«íδ »α«úαá¼¼á óδºδóá½áß∞ »« «»ÑαáΓ¿ó¡δ¼
- ¬½áó¿Φá¼, π¬áª¿ΓÑ ¡Ñ»«ßαÑñßΓóÑ¡¡« »ÑαÑñ ¿ »«ß½Ñ Γ«ú« ß¿¼-
- ó«½á, ¬«Γ«αδ⌐ ñ«½ªÑ¡ ¿ß»«½∞º«óáΓ∞ß∩ ó ¬áτÑßΓóÑ «»ÑαáΓ¿ó-
- ¡«⌐ ¬½áó¿Φ¿, ß¿¼ó«½ Γ¿½∞ñδ (~). ¥Γ«Γ ß¿¼ó«½ íπñÑΓ óδó«-
- ñ¿Γ∞ß∩ ó ¼Ñ¡ε Tools ª¿α¡δ¼ Φα¿ΣΓ«¼ ¿ ߻ѵ¿á½∞¡δ¼ Φα¿ΣΓ«¼,
- ¿ »α¿ ¡áªáΓ¿¿ φΓ«⌐ ¬½áó¿Φ¿ óδ óδíÑαÑΓÑ »α«úαá¼¼π. ìá»α¿-
- ¼Ñα, τΓ«íδ ñ«íáó¿Γ∞ ó ¼Ñ¡ε Tools αÑñá¬Γ«α Brief ¿ ßñѽáΓ∞
- «»ÑαáΓ¿ó¡«⌐ ¬½áó¿ΦÑ⌐ ¬½áó¿Φπ B, ¡áíÑα¿ΓÑ:
-
- B.Pascal 7 & Objects /UG - 102 -
-
-
- ~B~rief
-
- 4. àß½¿ óδ σ«Γ¿ΓÑ, τΓ«íδ óáΦá »α«úαá¼¼á ¿¼Ñ½á ßó∩ºá¡¡πε ß
- ¡Ñ⌐ «»ÑαáΓ¿ó¡πε ¬½áó¿Φπ, óδíÑα¿ΓÑ «ñ¿¡ ¿º »áαá¼ÑΓα«ó Hot
- Key. è«úñá óδ ¡áª¼ÑΓÑ »α¿ßó«Ñ¡¡πε «»ÑαáΓ¿ó¡πε ¬½áó¿Φπ,
- »α«úαá¼¼á ¡áτ¿¡áÑΓ αáí«ΓáΓ∞. ìá»α¿¼Ñα, πΓ¿½¿ΓÑ GREP »α¿ß-
- ó«Ñ¡δ «»ÑαáΓ¿ó¡δÑ ¬½áó¿Φ¿ Shift+F2. é ½εí«⌐ ¼«¼Ñ¡Γ, τΓ«íδ
- ¿ß»«½∞º«óáΓ∞ GREP, »α«ßΓ« ¡áª¼¿ΓÑ Shift+F2.
-
- 5. é í½«¬Ñ óó«ñá Program Path (îáαΦαπΓ »α«úαá¼¼δ) ¡áíÑα¿ΓÑ
- ¿¼∩ »α«úαá¼¼δ.
-
- àß½¿ óδ ¡Ñ óóÑñÑΓÑ »«½¡«ú« ¿¼Ñ¡¿, Γ« ¼«úπΓ íδΓ∞ ¡á⌐ñÑ¡δ
- Γ«½∞¬« »α«úαá¼¼δ ó ΓѬπΘѼ ¬áΓὫúÑ ¿½¿ »α«úαá¼¼δ »«
- «íδτ¡«¼π ¼áαΦαπΓπ DOS.
-
- 6. é í½«¬Ñ óó«ñá Command Line (諼á¡ñ¡á∩ ßΓ᫬á) ¡áíÑα¿ΓÑ
- »áαá¼ÑΓαδ ¿½¿ ¼á¬α«¬«¼á¡ñδ, ¬«Γ«αδÑ óδ σ«Γ¿ΓÑ »ÑαÑñáΓ∞
- »α«úαá¼¼Ñ.
-
- Å«½¡πε ß»αáó«τ¡πε ¿¡Σ«α¼áµ¿ε »« ¼á¬α«¬«¼á¡ñá¼, ¬«Γ«αδÑ
- ¼«ª¡« ¿ß»«½∞º«óáΓ∞ ó í½«¬Ñ Command Line ó Modify/New Tool
- óδ ¼«ªÑΓÑ ¡á⌐Γ¿ ó «»ÑαáΓ¿ó¡«¼ ß»αáó«τ¡¿¬Ñ Help Borland
- Pascal.
-
- 7. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- ä½∩ αÑñá¬Γ¿α«óá¡¿∩ ¿¼ÑεΘÑ⌐ß∩ ó ¼Ñ¡ε Tools »α«úαá¼¼δ ßñѽá⌐ΓÑ
- ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Tools.
-
- 2. é í½«¬Ñ ß»¿ß¬á Program Titles óδíÑα¿ΓÑ ¡πª¡πε »α«úαá¼¼π
- ñ½∩ αÑñá¬Γ¿α«óá¡¿∩.
-
- 3. éδíÑα¿ΓÑ Edit (ÉÑñá¬Γ¿α«óá¡¿Ñ).
-
- 4. é¡Ñß¿ΓÑ ¿º¼Ñ¡Ñ¡¿∩ ó ºáú«½«ó«¬ »α«úαá¼¼δ, ¼áαΦαπΓ »α«úαá¼-
- ¼δ ¿½¿ ¬«¼á¡ñ¡πε ßΓ᫬π.
-
- 5. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- ùΓ«íδ πñ὿Γ∞ π¬áºá¡¡πε ó ¼Ñ¡ε Tools »α«úαá¼¼π:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Tools.
-
- 2. éδíÑα¿ΓÑ »α«úαá¼¼π, ¬«Γ«απε óδ σ«Γ¿ΓÑ πñ὿Γ∞.
-
- 3. éδíÑα¿ΓÑ Delete (ôñá½Ñ¡¿Ñ).
-
- 4. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
-
- B.Pascal 7 & Objects /UG - 103 -
-
-
- Éáí«Γá ß «¬¡«¼ Messages
-
- ìѬ«Γ«αδÑ ¿¡ßΓαπ¼Ñ¡Γá½∞¡δÑ ßαÑñßΓóá »«ßδ½áεΓ óδó«ñ »α«úαá¼¼δ
- τÑαÑñ Σ¿½∞Γα DOS - »α«úαá¼¼π, ¬«¡óÑαΓ¿απεΘπε óδó«ñ ó Σ«α¼áΓ, ¬«-
- Γ«αδ⌐ ¼«ª¡« óδó«ñ¿Γ∞ ó «¬¡Ñ ß««íΘÑ¡¿⌐ Messages. ü«½ÑÑ »«ñα«í¡πε
- ¿¡Σ«α¼áµ¿ε «í ¿ß»«½∞º«óá¡¿¿ ¿ ¡á»¿ßá¡¿¿ óáΦ¿σ ß«íßΓóÑ¡¡δσ Σ¿½∞-
- Γα«ó DOS óδ ¼«ªÑΓÑ »«½πτ¿Γ∞ ó «»ÑαáΓ¿ó¡«¼ ß»αáó«τ¡¿¬Ñ Help. Äñ¡¿¼
- ¿º Γá¬¿σ ¿¡ßΓαπ¼Ñ¡Γá½∞¡δσ ßαÑñßΓó, ¿ß»«½∞ºπεΘ¿σ «¬¡« Messages,
- ∩ó½∩ÑΓß∩ GREP, á ÑÑ Σ¿½∞Γα ¡áºδóáÑΓß∩ GREP2MSG.EXE. êßσ«ñ¡δ⌐ ¬«ñ
- CREP2MSG.PAS óδ ¼«ªÑΓÑ ¡á⌐Γ¿ ó ¬áΓὫúÑ UTILS.
-
- Åα¿ αáí«ΓÑ Γᬫú« ¿¡ßΓαπ¼Ñ¡Γá½∞¡«ú« ßαÑñßΓóá ¬á¬ GREP óδó«-
- ñ¿¼á∩ ¿¡Σ«α¼áµ¿∩ »ÑαÑñáÑΓß∩ ó »«∩ó½∩εΘÑÑß∩ «¬¡« ß««íΘÑ¡¿⌐
- Messages. éδó«ñ¿¼δÑ ß««íΘÑ¡¿∩ óδ ¼«ªÑΓÑ »α«¬απτ¿óáΓ∞. é «¬¡Ñ
- Messages óδ ¼«ªÑΓÑ óδí¿αáΓ∞ ¿ αÑñá¬Γ¿α«óáΓ∞ ßΓ᫬π »α«úαá¼¼δ, ¡á
- ¬«Γ«απε ¿¼ÑÑΓß∩ ßß佬á ó ß««íΘÑ¡¿¿, ½¿í« óδ ¼«ªÑΓÑ «Γ߽Ѫ¿óáΓ∞
- ßó«¿ ß««íΘÑ¡¿∩ (»«ñßóÑτ¿óáΓ∞ «ñ¡π ºá ñαπú«⌐ ßΓ᫬¿ ¿ßσ«ñ¡«ú« ¬«ñá
- »α«úαá¼¼δ, »α¿ »α«σ«ªñÑ¡¿¿ ß««íΘÑ¡¿⌐ ó φΓ«¼ «¬¡Ñ).
-
- ùΓ«íδ «ΓαÑñá¬Γ¿α«óáΓ∞ ßΓ᫬π »α«úαá¼¼δ, ¡á ¬«Γ«απε ¿¼ÑÑΓß∩
- ßß佬á ó ß««íΘÑ¡¿¿, ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- * àß½¿ óδ ¿ß»«½∞ºπÑΓÑ "¼δΦ∞", ñóáªñδ Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ¿¡-
- ΓÑαÑßπεΘѼ óá¼ ß««íΘÑ¡¿¿.
-
- * Åα¿ αáí«ΓÑ ß ¬½áó¿áΓπα«⌐ óδíÑα¿ΓÑ ß««íΘÑ¡¿Ñ ß« ßß佬«⌐ ¡á
- ¡πª¡πε ßΓ᫬π »α«úαá¼¼δ ¿ ¡áª¼¿ΓÑ Enter.
-
- * éáΦ ¬παß«α »ÑαѼÑΘáÑΓß∩ ¡á ßΓ᫬π »α«úαá¼¼δ ó ¿ßσ«ñ¡«¼ ¬«-
- ñÑ, ¡á ¬«Γ«απε ßßδ½áÑΓß∩ ß««íΘÑ¡¿Ñ ó «¬¡Ñ Messages. ÆÑ»Ñα∞
- óδ ¼«ªÑΓÑ «ΓαÑñá¬Γ¿α«óáΓ∞ ßΓ᫬π »α«úαá¼¼δ.
-
- Å« π¼«½τá¡¿ε, ¬«úñá ¬παß«α »ÑαÑσ«ñ¿Γ ¡á ßΓ᫬π ¿ßσ«ñ¡«ú«
- ¬«ñá »α«úαá¼¼δ, «¬¡« Messages ºá¬αδóáÑΓß∩. àß½¿ óδ »αÑñ»«-
- τ¿ΓáÑΓÑ, τΓ«íδ «¬¡« Messages «ßΓáóὫß∞ «Γ¬αδΓδ¼, «Γ¼Ñ¡¿ΓÑ
- óδí«α »áαá¼ÑΓαá Close On Go To Source ó ñ¿á½«ú«ó«¼ «¬¡Ñ
- Preferences.
-
- Åα¿¼Ñτá¡¿Ñ: Åáαá¼ÑΓα Close On Go To Source ó½¿∩ÑΓ
- Γá¬ªÑ ¡á ObjectBrowser (ß¼. óδΦÑ).
-
- ùΓ«íδ «Γ߽Ѫ¿óáΓ∞ ßΓ᫬¿ »α«úαá¼¼δ:
-
- 1. é «¬¡Ñ Messages óδíÑα¿ΓÑ ß««íΘÑ¡¿Ñ ß« ßß佬«⌐ ¡á ßΓ᫬π
- »α«úαá¼¼δ, ¬«Γ«απε óδ σ«Γ¿ΓÑ «Γ߽Ѫ¿óáΓ∞ »Ñαó«⌐.
-
- 2. ì᪼¿ΓÑ ¬½áó¿Φπ »α«íѽá.
-
- àß½¿ óδ óßÑúñá σ«Γ¿ΓÑ «Γ߽Ѫ¿óáΓ∞ ß««íΘÑ¡¿∩ ó ¿ßσ«ñ¡«¼
- ¬«ñÑ, πßΓá¡«ó¿ΓÑ ó úαπ»»Ñ Options ñ¿á½«ú«ó«ú« «¬¡á
- Preferences »áαá¼ÑΓα Auto Track Source. Å«ß½Ñ φΓ«ú« »α¿
- »α«¬απ⪥ «¬¡á ß««íΘÑ¡¿⌐ ó óáΦѼ ¿ßσ«ñ¡«¼ ¬«ñÑ áóΓ«¼áΓ¿-
-
- B.Pascal 7 & Objects /UG - 104 -
-
- τÑ߬¿ íπñπΓ »«ñßóÑτ¿óáΓ∞ß∩ ß««ΓóÑΓßΓóπεΘ¿Ñ ßΓ᫬¿; óá¼ ¡Ñ
- ¡πª¡« íπñÑΓ ¡áª¿¼áΓ∞ ¡á ¬½áó¿Φπ »α«íѽá.
-
- Åα¿¼Ñτá¡¿Ñ: Åáαá¼ÑΓα Auto Track Source ó½¿∩ÑΓ ΓᬪÑ
- ¡á ObjectBrowser (ß¼. óδΦÑ).
-
- ÆÑ»Ñα∞ ßΓ᫬¿ »α«úαá¼¼δ, ¡á ¬«Γ«αδÑ ÑßΓ∞ ßß佬¿ ó ß««íΘÑ¡¿-
- ∩σ, «Γ߽Ѫ¿óáεΓß∩ ó ºáó¿ß¿¼«ßΓ¿ «Γ πßΓá¡«ó½Ñ¡¡δσ ó ñ¿á½«ú«ó«¼ «¬-
- ¡Ñ Options│Enviroment│Preferences »áαá¼ÑΓα«ó. àß½¿ ß««ΓóÑΓßΓóπε-
- Θ¿⌐ Σá⌐½ ¡Ñ ¡áσ«ñ¿Γß∩ ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩, IDE «Γ¬αδóáÑΓ Σá⌐½ ¿
- óδó«ñ¿Γ Ñú« ó ¡«ó«¼ «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩ ¿½¿ ó ΓѬπΘѼ «¬¡Ñ αÑñá¬-
- Γ¿α«óá¡¿∩.
-
- * àß½¿ óδ σ«Γ¿ΓÑ, τΓ«íδ Σá⌐½ óδó«ñ¿½ß∩ ó ¡«ó«¼ «¬¡Ñ αÑñá¬Γ¿-
- α«óá¡¿∩, óδíÑα¿ΓÑ ó ¬áτÑßΓóÑ º¡áτÑ¡¿∩ »áαá¼ÑΓαá Source
- Tracking New Window.
-
- Åα¿¼Ñτá¡¿Ñ: Åáαá¼ÑΓα Source Tracking ó½¿∩ÑΓ Γá¬ªÑ ¡á
- ObjectBrowser (ß¼. óδΦÑ).
-
- * àß½¿ óδ σ«Γ¿ΓÑ, τΓ«íδ Σá⌐½ ºá¼ÑΘá½ ΓѬπΘ¿⌐ Σá⌐½ ó «ñ¡«¼ ¿º
- á¬Γ¿ó¡δσ «¬«¡ αÑñá¬Γ¿α«óá¡¿∩, óδíÑα¿ΓÑ ó ¬áτÑßΓóÑ º¡áτÑ¡¿∩
- »áαá¼ÑΓαá Source Tracking Current Window.
-
- àß½¿ «¬¡« ß««íΘÑ¡¿⌐ ºá¬αδΓ«, ß »«¼«Θ∞ε ¬«¼á¡ñδ Tools│
- Messages óδ ¼«ªÑΓÑ «Γ¬αδΓ∞ Ñú« ß¡«óá.
-
-
- B.Pascal 7 & Objects /UG - 105 -
-
- ìáßΓα«⌐¬á ¬«¡Σ¿úπαᵿ¿ IDE
- ─────────────────────────────────────────────────────────────────
-
- Åα¿ ¡á»¿ßá¡¿¿ ¿ αÑñá¬Γ¿α«óá¡¿¿ »α«úαá¼¼ óδ ¼«ªÑΓÑ πßΓá¡«ó¿Γ∞
- »áαá¼ÑΓαδ αÑñá¬Γ¿α«óá¡¿∩ ¿ »α¿ó¿½Ñú¿α«óá¡¡δÑ »áαá¼ÑΓαδ, óδíαáΓ∞
- »áαá¼ÑΓαδ ¬«¼»¿½∩Γ«αá ¿ ¬«¼»«¡«óΘ¿¬á ¿½¿ ¿º¼Ñ¡¿Γ∞ »« ßó«Ñ¼π πß-
- ¼«ΓαÑ¡¿ε αáß»«½«ªÑ¡¿Ñ ¿ αẼÑα «¬«¡ αÑñá¬Γ¿α«óá¡¿∩. IDE ¼«ªÑΓ ºá-
- »«¼¿¡áΓ∞ πßΓá¡«ó½Ñ¡¡δÑ º¡áτÑ¡¿∩ ¿ Σá⌐½δ ¿ ¿ß»«½∞º«óáΓ∞ ¿σ ó ß½Ñ-
- ñπεΘѼ ßÑá¡ßÑ αÑñá¬Γ¿α«óá¡¿∩.
-
-
- æ«σαá¡Ñ¡¿Ñ αáí«τÑ⌐ «»Ñαᵿ«¡¡«⌐ ßαÑñδ
- ─────────────────────────────────────────────────────────────────
-
- æ »«¼«Θ∞ε Auto Save óδ ¼«ªÑΓÑ ß«σαá¡¿Γ∞ »áαá¼ÑΓαδ Editor
- Files, Desktop ¿ Enviroment ó ñ¿á½«ú«ó«¼ «¬¡Ñ Options│Enviroment.
-
- * àß½¿ πßΓá¡«ó½Ñ¡ »áαá¼ÑΓα Editor Files, IDE »α¿ óδσ«ñÑ ¿º
- ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñδ, óδí«αÑ ¬«¼á¡ñδ File│DOS Shell, óδ-
- »«½¡Ñ¡¿¿ ¿½¿ «Γ½áñ¬Ñ »α«úαá¼¼δ ß«σαá¡∩ÑΓ óßÑ ¼«ñ¿Σ¿µ¿α«-
- óá¡¡δÑ Σá⌐½δ, «Γ¬αδΓδÑ ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩.
-
- * àß½¿ πßΓá¡«ó½Ñ¡ »áαá¼ÑΓα Desktop, IDE »α¿ óδσ«ñÑ ¿º ¿¡ΓÑú-
- α¿α«óá¡¡«⌐ ßαÑñδ, óδí«αÑ ¬«¼á¡ñδ File│DOS Shell, óδ»«½¡Ñ-
- ¡¿¿ ¿½¿ «Γ½áñ¬Ñ »α«úαá¼¼δ ß«σαá¡∩ÑΓ ¿¼Ñ¡á óßÑσ Σá⌐½«ó, ß
- ¬«Γ«α묨 óδ αáí«Γ὿ ó «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿.
-
- * àß½¿ πßΓá¡«ó½Ñ¡ »áαá¼ÑΓα Enviroment, IDE »α¿ óδσ«ñÑ ¿º ¿¡-
- ΓÑúα¿α«óá¡¡«⌐ ßαÑñδ, óδí«αÑ ¬«¼á¡ñδ File│DOS Shell, óδ»«½-
- ¡Ñ¡¿¿ ¿½¿ «Γ½áñ¬Ñ »α«úαá¼¼δ ß«σαá¡∩ÑΓ ó Σá⌐½Ñ ¬«¡Σ¿úπαᵿ¿
- óδíαá¡¡δÑ óἿ óßÑ »áαá¼ÑΓαδ αÑñá¬Γ¿α«óá¡¿∩, ¬«¼»«¡«ó¬¿ ¿
- ¬«¼»¿½∩µ¿¿.
-
-
- êß»«½∞º«óá¡¿Ñ Σá⌐½á ¬«¡Σ¿úπαᵿ¿
-
- öá⌐½ ¬«¡Σ¿úπαᵿ¿ ß«σαá¡∩ÑΓ óßÑ »áαá¼ÑΓαδ, πßΓá¡«ó½Ñ¡¡δÑ ó
- ¼Ñ¡ε »áαá¼ÑΓα«ó Options, óδíαá¡¡δÑ ó ñ¿á½«ú«ó«¼ «¬¡Ñ Find Text,
- «Γ߽Ѫ¿óáÑΓ óßÑ «íΩÑñ¿¡Ñ¡¡δÑ Σá⌐½δ Help, µÑ½Ñóπε »½áΓΣ«α¼π ¿ ¿¼∩
- «ß¡«ó¡«ú« Σá⌐½á (Ñß½¿ «¡ ¿¼ÑÑΓß∩). àß½¿ ó ñ¿á½«ú«ó«¼ «¬¡Ñ
- Options│Enviroment│Preferences πßΓá¡«ó½Ñ¡ »áαá¼ÑΓα Auto Save
- Enviroment, Γ« Σá⌐½ ¬«¡Σ¿úπαᵿ¿ «í¡«ó½∩ÑΓß∩ »α¿ óδσ«ñÑ ¿º ¿¡ΓÑú-
- α¿α«óá¡¡«⌐ ßαÑñδ, óδí«αÑ ¬«¼á¡ñδ File│DOS Shell, óδ»«½¡Ñ¡¿¿ ¿½¿
- «Γ½áñ¬Ñ »α«úαá¼¼δ. Åα¿ ¿ß»«½∞º«óá¡¿¿ ¬«¼»¿½∩Γ«α«ó BP.EXE ¿½¿
- TURBO.EXE »« π¼«½τá¡¿ε Σá⌐½ ¬«¼»¿½∩Γ«α«¼ ¡áºδóáÑΓß∩ TP.EXE.
-
- ùΓ«íδ ß«ºñáΓ∞ ¡«óδ⌐ Σá⌐½ ¬«¡Σ¿úπαᵿ¿ ñ½∩ ñαπú«ú« »α«Ñ¬Γá,
- ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Save As.
-
- 2. é »«½Ñ óó«ñá Options File Name ¡áíÑα¿ΓÑ ¡«ó«Ñ ¿¼∩.
-
-
- B.Pascal 7 & Objects /UG - 106 -
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- Åα¿¼Ñτá¡¿Ñ: Äí ¿ß»«½∞º«óá¡¿¿ Σá⌐½á ¬«¡Σ¿úπαᵿ¿ ñ½∩
- π»αáó½Ñ¡¿∩ »α«úαá¼¼¡δ¼ »α«Ñ¬Γ«¼ αáß߬áºδóáÑΓß∩ ó ß½ÑñπεΘÑ⌐
- ú½áóÑ.
-
- ùΓ«íδ »ÑαѬ½ετ¿Γ∞ß∩ ¡á ñαπú«⌐ ßπΘÑßΓóπεΘ¿⌐ Σá⌐½ ¬«¡Σ¿úπαá-
- 樨:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Open.
-
- 2. çáñá⌐ΓÑ ¿¼∩ ßπΘÑßΓóπεΘÑú« Σá⌐½á ¬«¡Σ¿úπαᵿ¿.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- ùΓ«íδ ¼«ñ¿Σ¿µ¿α«óáΓ∞ ßπΘÑßΓóπεΘπε ¬«¡Σ¿úπαᵿε:
-
- 1. 꺼ѡ¿ΓÑ ¡πª¡δÑ »áαá¼ÑΓαδ.
-
- 2. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Save.
-
- IDE ß«σαá¡∩ÑΓ óßÑ ¿º¼Ñ¡Ñ¡¿∩ ó ΓѬπΘѼ Σá⌐½Ñ ¬«¡Σ¿úπαᵿ¿.
-
-
- êß»«½∞º«óá¡¿Ñ Σá⌐½á «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ ó ñ¿á½«ú«ó«¼ «¬¡Ñ Options│Envioroment│Preferences óδ
- πßΓᡫ󿽿 »áαá¼ÑΓα Auto Save Desktop, IDE »α¿ óδσ«ñÑ ¿º ¿¡ΓÑúα¿-
- α«óá¡¡«⌐ ßαÑñδ, óδí«αÑ ¬«¼á¡ñδ File│DOS Shell, óδ»«½¡Ñ¡¿¿ ¿½¿ «Γ-
- ½áñ¬Ñ »α«úαá¼¼δ «í¡«ó½∩ÑΓ Σá⌐½ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿. öá⌐½ «»Ñαá-
- Γ¿ó¡«⌐ «í½áßΓ¿ «Γ߽Ѫ¿óáÑΓ óßÑ Σá⌐½δ, ¬«Γ«αδÑ óδ «Γ¬αδó὿, ¿
- Σá⌐½δ, ß ¬«Γ«α묨 óδ αáí«Γ὿, ¡« ºá¬α뫨 ¿σ ó σ«ñÑ ßÑá¡ßá »α«ú-
- αá¼¼¿α«óá¡¿∩ (¬α«¼Ñ Σá⌐½«ó NONAMExx.PAS). è«úñá óδ ¡áτ¡ÑΓÑ ¡«óδ⌐
- ßÑá¡ß αÑñá¬Γ¿α«óá¡¿∩, óáΦ¿ «¬¡á αÑñá¬Γ¿α«óá¡¿∩ óδó«ñ∩Γß∩ ó Γ«¼
- ó¿ñÑ, ¬á¬«⌐ «¡¿ ¿¼Ñ½¿ »α¿ óδσ«ñÑ. è«úñá óδ «Γ¬α«ÑΓÑ ¼Ñ¡ε File, Γ«
- ß»¿ß«¬ ºá¬αδΓδσ Σá⌐½«ó ó ¼Ñ¡ε File »α«ñ«½ªáÑΓ πóѽ¿τ¿óáΓ∞ß∩ (¼á¬-
- ß¿¼π¼ ñ« 5 º¡áτÑ¡¿⌐).
-
- èᬠ«»αÑñѽ¿Γ∞, ¬á¬«⌐ Σá⌐½ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿ ¿ß»«½∞º«óáΓ∞?
- éδ ¼«ªÑΓÑ ¡Ñ»«ßαÑñßΓóÑ¡¡« óδíαáΓ∞ ¡«óδ⌐ Σá⌐½ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿,
- ¡« ¬áªñδ⌐ αáº, ¬«úñá óδ ß«ºñáÑΓÑ Σá⌐½ ¬«¡Σ¿úπαᵿ¿, IDE ß«ºñáÑΓ
- ¡«óδ⌐ Σá⌐½ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿. ê¼∩ Σá⌐½á íπñÑΓ ΓѼ ªÑ ßá¼δ¼, ¡«
- ¿¼∩ Σá⌐½á «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿ ó¼ÑßΓ« αáßΦ¿αÑ¡¿∩ .TP ¿¼ÑÑΓ αáßΦ¿-
- αÑ¡¿Ñ .DSK. ìá»α¿¼Ñα, Ñß½¿ óáΦ Σá⌐½ ¬«¡Σ¿úπαᵿ¿ ¡áºδóáÑΓß∩
- MY.TP, Γ« Σá⌐½ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿ íπñÑΓ ¡áºδóáΓ∞ß∩ MY.DSK.
-
- Å« π¼«½τá¡¿ε IDE ß«σαá¡∩ÑΓ Σá⌐½ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿ ó Γ«¼ ªÑ
- ¬áΓὫúÑ, τΓ« ¿ ΓѬπΘ¿⌐ Σá⌐½ ¬«¡Σ¿úπαᵿ¿. àß½¿ σ«Γ¿ΓÑ, Γ« ¼«ªÑΓÑ
- ß«σαá¡∩Γ∞ Σá⌐½δ ¬«¡Σ¿úπαᵿ¿ ó ΓѬπΘѼ ¬áΓὫúÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Preferences.
-
-
- B.Pascal 7 & Objects /UG - 107 -
-
- 2. é úαπ»»Ñ Desktop File óδíÑα¿ΓÑ »áαá¼ÑΓα Current
- Directory.
-
- àß½¿ óδ σ«Γ¿ΓÑ ß«σαá¡∩Γ∞ ΓѬπΘ¿Ñ »áαá¼ÑΓαδ ¬«¡Σ¿úπαᵿ¿, ¡«
- «τ¿ΘáΓ∞ «»ÑαáΓ¿ó¡πε «í½áßΓ∞, ΓᬠτΓ« IDE íπñÑΓ "ºáíδóáΓ∞" ß»¿ß«¬
- óßÑσ Σá⌐½«ó, ß ¬«Γ«α묨 óδ αáí«Γ὿, «τ¿ΘáΓ∞ óßÑ ß»¿ß¬¿ »α«Γ«¬«-
- ½«ó ¿ ºá¬αδóáΓ∞ óßÑ «¬¡á, ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Preferences.
-
- 2. ôíÑñ¿ΓÑß∞, τΓ« ó ñ¿á½«ú«ó«¼ «¬¡Ñ Preferences πßΓá¡«ó½Ñ¡
- »áαá¼ÑΓα Desktop, á »áαá¼ÑΓα Enviroment ó䬽ετÑ¡.
-
- 3. ÅÑαѺá»πßΓ¿ΓÑ IDE.
-
- IDE ºá¬αδóáÑΓ óßÑ óáΦ¿ «¬¡á ¿ ß«σαá¡∩ÑΓ ΓѬπΘ¿Ñ »áαá¼ÑΓ-
- αδ, ¡« óáΦá «»ÑαáΓ¿ó¡á∩ «í½áßΓ∞, ß»¿ß¬¿ »α«Γ«¬«½«ó ¿
- ß»¿ß¬¿ ºá¬αδΓδσ Σá⌐½«ó íπñπΓ «τ¿ΘÑ¡δ.
-
- æ«σαá¡Ñ¡¿Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó «Γ «ñ¡«ú« ßÑá¡ßá ¬ ñαπú«¼π
-
- Äñ¡«óαѼѡ¡« ß ß«σαá¡Ñ¡¿Ñ¼ Σá⌐½á «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿ óδ ¼«-
- ªÑΓÑ óδíαáΓ∞ ß«σαá¡Ñ¡¿Ñ ¿¡Σ«α¼áµ¿¿ «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ ó Σá⌐½Ñ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó (Σá⌐½ ß αáßΦ¿αÑ¡¿Ñ¼ .PSM). Æ«úñá »α¿ ß½ÑñπεΘѼ
- ºá»π᪥ IDE ¿¡Σ«α¼áµ¿∩ «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ, úÑ¡Ñα¿απѼá∩ »α¿ »«ß-
- ½Ññ¡Ñ⌐ ¬«¼»¿½∩µ¿¿, íπñÑΓ ñ«ßΓπ»¡á, í½áú«ñáα∩ τѼπ óδ ¼«ªÑΓÑ óδ-
- »«½¡∩Γ∞ ¡Ñ¼Ññ½Ñ¡¡δ⌐ »α«ß¼«Γα ¿ «Γ½áñ¬π.
-
- ùΓ«íδ ß«σαá¡∩Γ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ ¼Ñªñπ ßÑá¡ßἿ, ßñѽá⌐ΓÑ ß½Ñ-
- ñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Preferences.
-
- 2. ôíÑñ¿ΓÑß∞, τΓ« πßΓá¡«ó½Ñ¡ »áαá¼ÑΓα Auto Save Desktop.
-
- 3. é úαπ»»Ñ Desktop File Options óδíÑα¿ΓÑ »áαá¼ÑΓαδ Desktop
- ¿ Symbols.
-
- 4. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
-
- B.Pascal 7 & Objects /UG - 108 -
-
- ô»αáó½Ñ¡¿Ñ »α«Ñ¬Γ«¼
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ óδ σ«Γ¿ΓÑ ßñѽáΓ∞ ßó«Ñ »α«úαá¼¼¿α«óá¡¿Ñ »α«Ñ¬Γá ¼«ñπ½∞-
- ¡δ¼ ¿ í«½ÑÑ ½Ñú¬« π»αáó½∩Ѽδ¼, ¿ß»«½∞ºπ⌐ΓÑ «ß¡«ó¡«⌐ Σá⌐½. çáñá⌐ΓÑ
- ó ¬áτÑßΓóÑ «ß¡«ó¡«ú« Σá⌐½á ú½áó¡δ⌐ Σá⌐½ »α«úαá¼¼δ ¿ ßñѽá⌐ΓÑ Γá¬,
- τΓ«íδ «¡ ¿ß»«½∞º«óá½ ¡Ñ߬«½∞¬« ¼«ñπ½Ñ⌐ ¿½¿ ó¬½ετáѼδσ Σá⌐½«ó, úñÑ
- óδ ¼«ªÑΓÑ σαá¡¿Γ∞ í«½∞Φ¿Ñ Σαáú¼Ñ¡Γδ ¬«ñá.
-
- ùΓ«íδ ºáñáΓ∞, ¬á¬«⌐ Σá⌐½ íπñÑΓ «ß¡«ó¡δ¼, óδ»«½¡¿ΓÑ ß½ÑñπεΘ¿Ñ
- Φáú¿:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Compile│Primary File.
-
- 2. è«úñá óδóÑñÑΓß∩ ñ¿á½«ú«ó«Ñ «¬¡«, ¡áíÑα¿ΓÑ ¿¼∩ ßó«Ñú« Σá⌐-
- ½á ¿½¿ óδíÑα¿ΓÑ Ñú« ¿º «¬¡á ß»¿ß¬á Files.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- ÆÑ»Ñα∞, ¬«úñá óδ ¿ß»«½∞ºπÑΓÑ ¬«¼á¡ñπ Compile│Make ¿½¿ Build,
- ¬«¼»¿½¿απÑΓß∩ «ß¡«ó¡«⌐ Σá⌐½, ñáªÑ Ñß½¿ «¡ ¡Ñ ∩ó½∩ÑΓß∩ Σá⌐½«¼ ó
- á¬Γ¿ó¡«¼ «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩.
-
- èáªñδ⌐ »α«Ñ¬Γ, ß ¬«Γ«αδ¼ óδ αáí«ΓáÑΓÑ ß IDE, ¿¼ÑÑΓ π¡¿¬á½∞-
- ¡δÑ ΓαÑí«óá¡¿∩. ìá»α¿¼Ñα, ¬áªñδ⌐ »α«Ñ¬Γ ¿¼ÑÑΓ αẽ¿τ¡δ⌐ «ß¡«ó¡«⌐
- ¿ αẽ¿τ¡δÑ ¬áΓὫú¿, úñÑ ¡áσ«ñ∩Γß∩ óáΦ¿ Σá⌐½δ. éδ ¼«ªÑΓÑ ¡áßΓα«-
- ¿Γ∞ IDE ó ß««ΓóÑΓßΓó¿¿ ß« ßó«¿¼ »α«Ñ¬Γ«¼.
-
- ô»αáó½Ñ¡¿Ñ ¡Ñ߬«½∞¬¿¼¿ »α«Ñ¬ΓἿ
- ß Σá⌐½«¼ ¬«¡Σ¿úπαᵿ¿ ñ½∩ ¬áªñ«ú« ¿º ¡¿σ
-
- æÑ¬αÑΓ π»αáó½Ñ¡¿∩ »α«Ñ¬ΓἿ ó IDE ß«ßΓ«¿Γ ó ¿ß»«½∞º«óá¡¿¿
- ñ½∩ ¬áªñ«ú« »α«Ñ¬Γá ßó«Ñú« Σá⌐½á ¬«¡Σ¿úπαᵿ¿. è«úñá óδ ¡áτ¿¡áÑΓÑ
- ¡«óδ⌐ »α«Ñ¬Γ, ß«ºñá⌐ΓÑ ¡«óδ⌐ Σá⌐½ ¬«¡Σ¿úπαᵿ¿:
-
- 1. ôßΓá¡«ó¿ΓÑ óßÑ »áαá¼ÑΓαδ Γá¬, ¬á¬ φΓ« ΓαÑíπÑΓß∩ ñ½∩ ¡«ó«-
- ú« »α«Ñ¬Γá.
-
- 2. çáñá⌐ΓÑ «ß¡«ó¡«⌐ Σá⌐½.
-
- 3. ä½∩ ºáñá¡¿∩ ¬áΓὫú«ó, úñÑ ¬«¼»¿½∩Γ«α íπñÑΓ ¿ß¬áΓ∞ Σá⌐½δ
- ñ½∩ óáΦÑú« »α«Ñ¬Γá ¿ß»«½∞ºπ⌐ΓÑ ¬«¼á¡ñπ Options│
- Directories.
-
- 4. é ¼Ñ¡ε Options óδíÑα¿ΓÑ ¬«¼á¡ñπ Save As.
-
- é ñ¿á½«ú«ó«¼ «¬¡Ñ óδó«ñ¿Γß∩ »«ñ߬Ậá ñ½∩ óó«ñá ¿¼Ñ¡¿ ¡«-
- ó«ú« Σá⌐½á ¬«¡Σ¿úπαᵿ¿.
-
- 5. çáñá⌐ΓÑ ¿¼∩ ¡«ó«ú« Σá⌐½á ¬«¡Σ¿úπαᵿ¿.
-
- 6. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
-
- B.Pascal 7 & Objects /UG - 109 -
-
- àß½¿ óδ ó φëà ¼«¼Ñ¡Γ óδ⌐ñ¿ΓÑ ¿º IDE, á »áαá¼ÑΓαδ Auto Save
- Desktop ¿ Enviroment Options (Options│Enviroment│Preferences) πß-
- Γá¡«ó½Ñ¡δ, Γ«, ¬«úñá óδ ¡áτ¿¡áÑΓÑ ¡«óδ⌐ ßÑá¡ß, IDE ¿ß»«½∞ºπÑΓ ¡«-
- óδ⌐ Σá⌐½ ¬«¡Σ¿úπαᵿ¿ ¿ Σá⌐½ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿. öá⌐½δ, ß ¬«Γ«-
- α묨 óδ αáí«ΓáÑΓÑ, íπñπΓ ñ«ßΓπ»¡δ ñ½∩ óáß ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩
- ¿½¿ ó ß»¿ß¬Ñ ºá¬αδΓδσ Σá⌐½«ó ó ¼Ñ¡ε File, »«ß¬«½∞¬π ñ½∩ óáΦÑú«
- »α«Ñ¬Γá ß«ºñáÑΓß∩ ¡«óδ⌐ Σá⌐½ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿.
-
- àß½¿ óδ σαá¡¿ΓÑ ¬áªñδ⌐ »α«Ñ¬Γ Åá߬á½∩ ó «Γñѽ∞¡«¼ ¬áΓὫúÑ,
- Γ« ¡¿ªÑ ñá¡δ αѬ«¼Ñ¡ñᵿ¿ »« πñ«í¡«¼π π»αáó½Ñ¡¿ε »α«Ñ¬Γ«¼. è«úñá
- óδ πßΓá¡«ó¿ΓÑ óßÑ »áαá¼ÑΓαδ Γá¬, ¬á¬ φΓ« ΓαÑíπÑΓß∩ ñ½∩ »α«Ñ¬Γá, ¿
- ºáñáñ¿ΓÑ «ß¡«ó¡«⌐ Σá⌐½ (Ñß½¿ «¡ ¿¼ÑÑΓß∩), ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. é ¼Ñ¡ε Options óδíÑα¿ΓÑ ¬«¼á¡ñπ Save As.
-
- 2. çáñá⌐ΓÑ ¡«ó«Ñ ¿¼∩ Σá⌐½á ¬«¡Σ¿úπαᵿ¿, ó¬½ετ¿ó ó ¬áΓὫú
- »α«Ñ¬Γá »«½¡δ⌐ ¼áαΦαπΓ.
-
- * àß½¿ óδ ¿ß»«½∞ºπÑΓÑ BP.EXE, ºáñá⌐ΓÑ ó ¬áτÑßΓóÑ ¡«ó«ú«
- Σá⌐½á ¬«¡Σ¿úπαᵿ¿ BP.TP.
-
- * àß½¿ óδ ¿ß»«½∞ºπÑΓÑ TURBO.EXE, ºáñá⌐ΓÑ ó ¬áτÑßΓóÑ ¡«ó«-
- ú« Σá⌐½á ¬«¡Σ¿úπαᵿ¿ TURBO.TP.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- æ«σαá¡¿ó ó ¬áΓὫúÑ »α«Ñ¬Γá Σá⌐½ BP.TP ¿½¿ TURBO.TP, óδ
- ¼«ªÑΓÑ »ÑαÑ⌐Γ¿ ó ¬áΓὫú »α«Ñ¬Γá, ºá»πßΓ¿Γ∞ IDE, ¿ IDE
- áóΓ«¼áΓ¿τÑ߬¿ ºáúαπº¿Γ ó Σá⌐½ ¬«¡Σ¿úπαᵿ¿ ó φΓ«¼ ¬áΓὫ-
- úÑ.
-
- àß½¿ óδ ¡Ñ σ«Γ¿ΓÑ í«½∞ΦÑ αáí«ΓáΓ∞ ß Σá⌐½«¼, ºáñá¡¡δ¼ ó ¬á-
- τÑßΓóÑ «ß¡«ó¡«ú« Σá⌐½á, Γ« ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ñ½∩ «τ¿ßΓ¬¿ φΓ«ú«
- Σá⌐½á ß½ÑñπεΘ¿Ñ ñóá ¼ÑΓ«ñá:
-
- * éδíÑα¿ΓÑ ¬«¼á¡ñπ Compile│Clear Primary File.
-
- * éδíÑα¿ΓÑ ó ñ¿á½«ú«ó«¼ «¬¡Ñ Primary File »áαá¼ÑΓα Primary
- File ¿ Clear (Äτ¿ßΓ¬á).
-
- àß½¿ óδ σ«Γ¿ΓÑ αáí«ΓáΓ∞ ß ñαπú¿¼ »α«Ñ¬Γ«¼, ß »«¼«Θ∞ε ¬«¼á¡ñδ
- Options│Open ºáúαπº¿ΓÑ ¡«óδ⌐ Σá⌐½ ¬«¡Σ¿úπαᵿ¿ »α«Ñ¬Γá.
-
-
-
- B.Pascal 7 & Objects /UG - 110 -
-
- ────────────────────────────────────────────────────────────────────────────
- â½áóá 5. Åα«úαá¼¼¿α«óá¡¿Ñ ó
- ¿¡ΓÑúα¿α«óá¡¡«⌐ ¿¡ΓÑαá¬Γ¿ó¡«⌐ ßαÑñÑ ñ½∩ Windows
- ─────────────────────────────────────────────────────────────────
-
- ê¡ΓÑúα¿α«óá¡¡á∩ ßαÑñá (IDE) ñ½∩ Windows «τÑ¡∞ »«σ«ªá ¡á IDE
- ñ½∩ DOS Borland Pascal. ü«½∞Φ¿¡ßΓó« Σπ¡¬µ¿⌐, ¬«Γ«αδÑ óδ óδ»«½¡∩Ñ-
- ΓÑ ó IDE ñ½∩ DOS, á¡á½«ú¿τ¡δ¼ «íαẫ¼ óδ»«½¡∩ÑΓß∩ ó IDE ñ½∩
- Windows. àß½¿ óδ ¡Ñ τ¿Γ὿ »αÑñδñπΘπε ú½áóπ, »«ΓαáΓ∞ΓÑ ¡Ñ¬«Γ«α«Ñ
- óαѼ∩ ¿ ßñѽá⌐ΓÑ φΓ«.
-
- Åα¿¼Ñτá¡¿Ñ: IDE ñ½∩ Windows ¼«ªÑΓ ß«ºñáóáΓ∞ »α¿¬½áñ¡δÑ
- »α«úαá¼¼δ ñ½∩ Windows, ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á DOS ¿ αÑá½∞¡«ú«
- αѪ¿¼á DOS.
-
- é ñá¡¡«⌐ ú½áóÑ «ß¡«ó¡«Ñ ó¡¿¼á¡¿Ñ πñѽ∩ÑΓß∩ π¡¿¬á½∞¡δ¼ ßαÑñß-
- Γóá¼ IDE ñ½∩ Windows ¿ »«∩ß¡∩ÑΓß∩ ¡Ñ¬«Γ«α«Ñ αẽ¿τ¿Ñ ¼Ñªñπ IDE
- ñ½∩ DOS ¿ ñ½∩ Windows.
-
- Æá¬ ¬á¬ Borland Pascal for Windows αáí«ΓáÑΓ »«ñ Windows, ¼δ
- »«ñαáºπ¼ÑóáѼ, τΓ« óδ πªÑ º¡á¬«¼δ ß Windows. àß½¿ óδ π¼ÑÑΓÑ αáí«-
- ΓáΓ∞ ß Windows, Γ« ß¼«ªÑΓÑ αáí«ΓáΓ∞ ¿ ß IDE Borland Pascal for
- Windows.
-
- çá»π߬ IDE ñ½∩ Windows
- ─────────────────────────────────────────────────────────────────
-
- ä½∩ ºá»π߬á IDE ñ½∩ Windows ¡Ñ«íσ«ñ¿¼« ñóáªñδ Θѽ¬¡πΓ∞
- "¼δΦ∞ε" ¡áñ »¿¬Γ«úαá¼¼«⌐ Borland Pascal for Windows ó áñ¼¿¡¿ßΓαá-
- Γ«αÑ »α«úαá¼¼ ¿½¿ óδíαáΓ∞ ÑÑ ß »«¼«Θ∞ε ¬½áó¿áΓπαδ ¿ ¡áªáΓ∞ ¬½áó¿-
- Φπ Enter.
-
- éδ ¼«ªÑΓÑ Γá¬ªÑ ºá»πßΓ¿Γ∞ IDE ñ½∩ Windows ó «ΓóÑΓ ¡á »«ñß-
- ¬áº¬π DOS. ìáíÑα¿ΓÑ:
-
- WIN BWP
-
- Åα«ñó¿úá∩ß∞ ¡á Φáú ñá½∞ΦÑ, óδ ¼«ªÑΓÑ ó «ΓóÑΓ ¡á »«ñ߬Ậπ
- DOS ºáñáΓ∞, ¬á¬¿Ñ Σá⌐½δ ¡πª¡« «Γ¬αδΓ∞ ó «¬¡áσ αÑñá¬Γ¿α«óá¡¿∩, ¿
- ¬á¬«⌐ ¡πª¡« ¿ß»«½∞º«óáΓ∞ Σá⌐½ ¬«¡Σ¿úπαᵿ¿. Åα¿ φΓ«¼ ¿ß»«½∞ºπÑΓß∩
- ß½ÑñπεΘ¿⌐ ß¿¡Γá¬ß¿ß:
-
- WIN BWP [/CΣá⌐½_¬«¡Σ¿úπαᵿ¿]Σá⌐½δ
-
- ìá»α¿¼Ñα, ¡á ß½ÑñπεΘÑ⌐ ßΓα«¬Ñ ºá»π߬áÑΓß∩ Windows, ¿ ¡áτ¿¡á-
- ÑΓ αáí«ΓáΓ∞ IDE ñ½∩ Windows, ¿ß»«½∞ºπ∩ »áαá¼ÑΓαδ ó Σá⌐½Ñ ¬«¡Σ¿úπ-
- αᵿ¿ MYCONFIG.CFG ¿ «Γ¬αδóá∩ ñóá «¬¡á, «ñ¡« ¿º ¬«Γ«αδσ ß«ñÑনΓ
- Σá⌐½ MYFILE.PAS, á ñαπú«Ñ - YOURFILE.INC:
-
- WIN BWP /Cmyconfig myfile yourfile
-
-
-
-
- B.Pascal 7 & Objects /UG - 111 -
-
- êß»«½∞º«óá¡¿Ñ «»ÑαáΓ¿ó¡«⌐ »«½«ßδ
- ─────────────────────────────────────────────────────────────────
-
- æ »«¼«Θ∞ε «»ÑαáΓ¿ó¡«⌐ »«½«ßδ SpeedBar ¿ "¼δΦ¿" óδ ¼«ªÑΓÑ
- íδßΓα« óδí¿αáΓ∞ ¬«¼á¡ñδ ¿ ñαπú¿Ñ ñÑ⌐ßΓó¿∩.
-
- 諼á¡ñ¡δÑ ¬¡«»¬¿ ó «»ÑαáΓ¿ó¡«⌐ »«½«ßÑ »αÑñßΓáó½∩εΓ ¬«¼á¡ñδ.
- ¥Γ« «»ÑαáΓ¿ó¡δÑ ¬¡«»¬¿ ñ½∩ "¼δΦ¿", á¡á½«ú¿τ¡« Γ«¼π, ¬á¬ «»αÑñÑ-
- ½Ñ¡¡δÑ ¬«¼í¿¡áµ¿¿ ¬½áó¿Φ ¡á ¬½áó¿áΓπαÑ ∩ó½∩εΓß∩ «»ÑαáΓ¿ó¡δ¼¿ ¬½á-
- ó¿ΦἿ. ùΓ«íδ óδíαáΓ∞ ¬«¼á¡ñπ, Θѽ¬¡¿ΓÑ ¡á ß««ΓóÑΓßΓóπεΘÑ⌐ ¬«-
- ¼á¡ñ¡«⌐ ¬¡«»¬Ñ "¼δΦ∞ε". ìá»α¿¼Ñα, Ñß½¿ óδ Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ¬«-
- ¼á¡ñ¡«⌐ ¬¡«»¬Ñ Open a File (ÄΓ¬αδΓ∞ Σá⌐½), Γ« αÑᬵ¿∩ IDE íπñÑΓ
- Γᬫ⌐ ªÑ, ¬á¬ »α¿ óδí«αÑ ¬«¼á¡ñδ Open ¼Ñ¡ε File.
-
- Ä»ÑαáΓ¿ó¡á∩ »«½«ßá ¬«¡ΓѬßΓ¡«-ºáó¿ß¿¼á. Æ«, ¬á¬¿Ñ ¬«¼á¡ñ¡δÑ
- ¬¡«»¬¿ ¬ ¡Ñ⌐ óδó«ñ∩Γß∩, ºáó¿ß¿Γ «Γ Γ«ú«, ¬á¬«Ñ «¬¡« á¬Γ¿ó¡« - «¬-
- ¡« «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿ ¿½¿ «¬¡« αÑñá¬Γ¿α«óá¡¿∩.
-
- Ä»ÑαáΓ¿ó¡δÑ »«½«ßá «¬¡á αáí«τÑ⌐ «í½áßΓ¿ óδó«ñ¿Γß∩, ¬«úñá ó
- IDE ¡Ñ «Γ¬αδΓδ «¬¡á αÑñá¬Γ¿α«óá¡¿∩. é «»ÑαáΓ¿ó¡«⌐ »«½«ßÑ αáí«τÑ⌐
- «í½áßΓ¿ óδó«ñ∩Γß∩ ß½ÑñπεΘ¿Ñ ¬«¼á¡ñ¡δÑ ¬¡«»¬¿:
-
- ┌───────────┐ ┌───────────┐
- │ │ │ │
- │ │ │ │
- │ │ │ │
- └───────────┘ └───────────┘
-
- Help (è«¡ΓѬßΓ¡δÑ φ¬αá¡δ Make (ö«α¼¿α«óá¡¿Ñ)
- ß»αáó«τ¡«⌐ ß¿ßΓѼδ)
-
- B.Pascal 7 & Objects /UG - 112 -
-
-
- ┌───────────┐ ┌───────────┐
- │ │ │ │
- │ │ │ │
- │ │ │ │
- └───────────┘ └───────────┘
-
- Open a File Make and Run
- (ÄΓ¬αδΓ∞ Σá⌐½) (ö«α¼¿α«óá¡¿Ñ ¿
- ºá»π߬)
-
- ┌───────────┐ ┌───────────┐
- │ │ │ │
- │ │ │ │
- │ │ │ │
- └───────────┘ └───────────┘
-
- Exit the IDE Make and Run under
- (éδσ«ñ ¿º IDE) Turbo Debugger
- (ö«α¼¿α«óá¡¿Ñ ¿
- ºá»π߬ ß «Γ½áñτ¿¬«¼)
-
- É¿ß. 5.1 諼á¡ñ¡δÑ ¬¡«»¬¿ «»ÑαáΓ¿ó¡«⌐ »«½«ßδ αáí«τÑ⌐ «í½áß-
- Γ¿.
-
-
- æ½ÑñπεΘ¿Ñ ¬«¼á¡ñ¡δÑ ¬¡«»¬¿ óδó«ñ∩Γß∩ ó «»ÑαáΓ¿ó¡«⌐ »«½«ßÑ
- «¬¡á αÑñá¬Γ¿α«óá¡¿∩.
-
- ┌───────────┐ ┌───────────┐
- │ │ │ │
- │ │ │ │
- │ │ │ │
- └───────────┘ └───────────┘
-
- Help on Editor Paste from Clipboard
- (æ»αáó¬á »« αÑñá¬Γ«απ) (éßΓáó¬á ¿º íπΣÑαá)
-
- B.Pascal 7 & Objects /UG - 113 -
-
-
- ┌───────────┐ ┌───────────┐
- │ │ │ │
- │ │ │ │
- │ │ │ │
- └───────────┘ └───────────┘
-
- Open a File Undo (ÄΓ¼Ñ¡á)
- (ÄΓ¬αδΓ¿Ñ Σá⌐½á)
-
- ┌───────────┐ ┌───────────┐
- │ │ │ │
- │ │ │ │
- │ │ │ │
- └───────────┘ └───────────┘
-
- Save a file Compile
- (æ«σαá¡Ñ¡¿Ñ Σá⌐½á) (諼»¿½∩µ¿∩)
-
- ┌───────────┐ ┌───────────┐
- │ │ │ │
- │ │ │ │
- │ │ │ │
- └───────────┘ └───────────┘
-
- Search for text Make (ö«α¼¿α«óá¡¿Ñ)
- (Å«¿ß¬ ΓѬßΓá)
-
- ┌───────────┐ ┌───────────┐
- │ │ │ │
- │ │ │ │
- │ │ │ │
- └───────────┘ └───────────┘
-
- Search again Make and Run
- (Å«óΓ«α¡δ⌐ »«¿ß¬) (ö«α¼¿α«óá¡¿Ñ ¿ ºá»π߬)
-
-
- B.Pascal 7 & Objects /UG - 114 -
-
-
- ┌───────────┐ ┌───────────┐
- │ │ │ │
- │ │ │ │
- │ │ │ │
- └───────────┘ └───────────┘
-
- Cut to Clipboard Make and Run under
- (éδαÑºá¡¿Ñ ó íπΣÑα) Turbo Debugger
- (ö«α¼¿α«óá¡¿Ñ ¿
- ºá»π߬ ß «Γ½áñτ¿¬«¼)
-
- ┌───────────┐
- │ │
- │ │
- │ │
- └───────────┘
-
- Copy to Clipboard
- (è«»¿α«óá¡¿Ñ ó íπΣÑα
- óδαѺᡡ«ú« ¿º«íαáªÑ¡¿∩)
-
- É¿ß. 5.2 諼á¡ñ¡δÑ ¬¡«»¬¿ «»ÑαáΓ¿ó¡«⌐ »«½«ßδ «¬¡á αÑñá¬Γ¿α«-
- óá¡¿∩.
-
- ê¡«úñá «»αÑñѽѡ¡δÑ ¬«¼á¡ñ¡δÑ ¬¡«»¬¿ «»ÑαáΓ¿ó¡«⌐ »«½«ßδ óδ-
- ó«ñ∩Γß∩ Γπ߬½δ¼¿. ¥Γ« «º¡áτáÑΓ, τΓ« ¬«¼á¡ñá, »αÑñßΓáó½∩Ѽá∩ ñá¡-
- ¡«⌐ ¬¡«»¬«⌐, ó ΓѬπΘѼ ¬«¡ΓѬßΓÑ ñ½∩ óáß ¡Ññ«ßΓπ»¡á. ìá»α¿¼Ñα,
- Ñß½¿ «¬¡« αÑñá¬Γ¿α«óá¡¿∩ «Γ¬αδΓ«, ¿ íπΣÑα óδαѺᡡ«ú« ¿º«íαáªÑ¡¿∩
- »πßΓ, Γ« ¬¡«»¬á Paste Text from Clipboard íπñÑΓ Γπ߬½«⌐.
-
-
- ìáßΓα«⌐¬á ¬«¡Σ¿úπαᵿ¿ «»ÑαáΓ¿ó¡«⌐ »«½«ßδ
- ─────────────────────────────────────────────────────────────────
-
- Åα¿ »Ñαó«¼ ºá»π᪥ IDE «»ÑαáΓ¿ó¡á∩ »«½«ßá »αÑñßΓáó½∩ÑΓ ß«í«⌐
- ú«α¿º«¡Γá½∞¡πε úαπ»»π ¬«¼á¡ñ¡δÑ ¬¡«»«¬, ¬«Γ«αá∩ óδó«ñ¿Γß∩ ¡Ñ»«ß-
- αÑñßΓóÑ¡¡« »« ßΓ᫬«⌐ ¼Ñ¡ε. Ä»ÑαáΓ¿ó¡á∩ »«½«ßá ¼«ªÑΓ íδΓ∞:
-
- * ú«α¿º«¡Γá½∞¡«⌐ »«½«ß«⌐;
-
- * óÑαΓ¿¬á½∞¡«⌐ »«½«ß«⌐ ó ½Ñó«⌐ τáßΓ¿ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿
- IDE;
-
- * óß»½δóáεΘ¿¼ ¡áí«α«¼, ¬«Γ«αδ⌐ óδ ¼«ªÑΓÑ »ÑαѼÑΘáΓ∞ ó ½εíπε
- τáßΓ∞ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿.
-
- éδ ¼«ªÑΓÑ Γá¬ªÑ ó䬽ετ¿Γ∞ «»ÑαáΓ¿ó¡πε »«½«ßπ.
-
- ùΓ«íδ ¿º¼Ñ¡¿Γ∞ ¬«¡Σ¿úπαáµ¿ε «»ÑαáΓ¿ó¡«⌐ »«½«ßδ, óδíÑα¿ΓÑ ¬«-
- ¼á¡ñπ Options│Enviroment│Preferences ¿ óδíÑα¿ΓÑ ¡πª¡δ⌐ »áαá¼ÑΓα
- «»ÑαáΓ¿ó¡«⌐ »«½«ßδ.
-
-
- B.Pascal 7 & Objects /UG - 115 -
-
- êß»«½∞º«óá¡¿Ñ ß»αáó«τ¡«⌐ ß¿ßΓѼδ Help
- ─────────────────────────────────────────────────────────────────
-
- æ»αáó«τ¡á∩ ß¿ßΓѼá Help ñáÑΓ óἠ󫺼«ª¡«ßΓ∞ ½Ñú¬«ú« ñ«ßΓπ»á
- ¬ »«ñα«í¡«⌐ ¿¡Σ«α¼áµ¿¿ « ∩ºδ¬Ñ Borland Pascal, ¿¡ΓÑúα¿α«óá¡¡«⌐
- ßαÑñÑ, í¿í½¿«ΓÑ¬Ñ ñ¿¡á¼¿τÑ߬«⌐ ¬«¼»«¡«ó¬¿, ObjectWindows, ¿¡ΓÑα-
- ΣÑ⌐ßÑ »α¿¬½áñ¡δσ »α«úαá¼¼ Windows (API) ¿ ñ«»«½¡¿Γѽ∞¡δσ πΓ¿½¿-
- Γáσ, »αÑñπß¼«ΓαÑ¡¡δσ ó Borland Pascal. éδ ¼«ªÑΓÑ »α«ß¼áΓα¿óáΓ∞
- óßÑ φΓ¿ ΓѼδ ó ß»αáó«τ¡«¼ «¬¡Ñ Help ¿½¿ »«½πτáΓ∞ ¬«¡ΓѬßΓ¡«-ºáó¿-
- ß¿¼πε ß»αáó«τ¡πε ¿¡Σ«α¼áµ¿ε «í IDE ¿½¿ ΓÑନ¡áσ, ¡áí¿αáѼδσ óἿ
- ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩. ¥Γ«Γ αáºñѽ º¡á¬«¼¿Γ óáß ß« ß»αáó«τ¡«⌐
- ß¿ßΓѼ«⌐ Borland Pascal for Windows.
-
- æ»αáó«τ¡πε ß¿ßΓѼπ Borland Pascal for Windows óδ ¼«ªÑΓÑ ¿ß-
- »«½∞º«óáΓ∞ á¡á½«ú¿τ¡« ß»αáó«τ¡«⌐ ß¿ßΓÑ¼Ñ Windows. ùΓ«íδ πº¡áΓ∞ «
- αáí«ΓÑ Help Windows, óδíÑα¿ΓÑ ¬«¼á¡ñπ Help│Using Help. éδ πº¡áÑΓÑ
- «í «íΘ¿σ ßαÑñßΓóáσ Help Windows (Γᬿσ ¬á¬ á¡¡«Γ¿α«óá¡¿Ñ, ¿ß»«½∞-
- º«óá¡¿Ñ ¼ÑΓ«¬ ΓѬßΓá, »α«ß¼«Γα ¿ »ÑτáΓ∞), « ¬«Γ«αδσ ¡Ñ π»«¼¿¡áÑΓ-
- ß∩ ó ñá¡¡«¼ απ¬«ó«ñßΓóÑ.
-
- é ß½ÑñπεΘ¿σ αáºñѽáσ «»¿ßδóáεΓß∩ ß»«ß«íδ, ß »«¼«Θ∞ε ¬«Γ«αδσ
- óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ß»αáó«τ¡πε ß¿ßΓѼπ Borland Pascal for
- Windows »α¿ αáºαáí«Γ¬Ñ ó IDE ßó«¿σ »α¿¬½áñ¡δσ »α«úαá¼¼.
-
- ùΓ«íδ í«½∞ΦÑ πº¡áΓ∞ « ß»αáó«τ¡¿¬Ñ Help, óδíÑα¿ΓÑ ¬«¼á¡ñπ
- Help│Using Help ¿½¿ ¡áª¼¿ΓÑ úñÑ-½¿í« ó ß»αáó«τ¡«⌐ ß¿ßΓÑ¼Ñ ¬½áó¿Φπ
- F1.
-
-
- ÅÑαѼÑΘÑ¡¿Ñ »« ß»αáó«τ¡«⌐ ß¿ßΓѼÑ
- ─────────────────────────────────────────────────────────────────
-
- è«úñá óδ ß¼«Γα¿ΓÑ ¡á φ¬αá¡δ Help, Γ« ó¿ñ¿ΓÑ »«ñτÑભπΓδ⌐
- ΓѬßΓ, µóÑΓ ¬«Γ«α«ú« «Γ½¿τáÑΓß∩ «Γ «¬απªáεΘÑú« ΓѬßΓá. ¥Γ« ßßδ½-
- ¬¿. æß佬¿ ¼«úπΓ »αÑñßΓáó½∩Γ∞ß∩ ΓѬßΓ«¼, »¿¬Γ«úαἼἿ ¿½¿ úαáΣ¿-
- ¬«⌐, ¿ óδ ¼«ªÑΓÑ óδí¿αáΓ∞ ¿σ ñ½∩ »«½πτÑ¡¿∩ í«½ÑÑ »«ñα«í¡«⌐ ¿¡Σ«α-
- ¼áµ¿¿. æß佬¿ ¼«úπΓ ¿ß»«½∞º«óáΓ∞ß∩ ñ½∩ óδó«ñá ¡«ó«ú« φ¬αá¡á Help,
- »αÑñßΓáó½∩εΘÑú« ¡«óπε ¿¡Σ«α¼áµ¿ε »« «Γ¼ÑτÑ¡¡«⌐ ΓѼÑ. éδíαáΓ∞
- ßßδ½¬π ¼«ª¡« ß½ÑñπεΘ¿¼¿ ñóπ¼∩ ß»«ß«íἿ:
-
- * Öѽ¬¡πó ¡á ¡Ñ⌐ ¬¡«»¬«⌐ "¼δΦ¿".
-
- * ìᪿ¼á∩ »«óΓ«α¡« ¬½áó¿Φ¿ Tab, »«¬á ßßδ½¬á ¡Ñ íπñÑΓ »«ñßóÑ-
- τÑ¡á, ºáΓѼ ¡áªáó ¬½áó¿Φπ Enter.
-
- ì«óδ⌐ ß»αáó«τ¡δ⌐ φ¬αá¡ óδó«ñ¿Γß∩ ß ¿¡Σ«α¼áµ¿Ñ⌐ »« óδíαá¡¡«⌐
- ΓѼÑ: óδ »ÑαÑΦ½¿ ¡á ¡«ó«Ñ ¼ÑßΓ« ó ß»αáó«τ¡«⌐ ß¿ßΓѼÑ. é φΓ«¼ φ¬-
- αá¡Ñ óδ ¼«ªÑΓÑ ó¿ñÑΓ∞ ñαπú¿Ñ ßó∩º¿, ¬«Γ«αδÑ óδ ¼«ªÑΓÑ óδíαáΓ∞ ñ½∩
- óδó«ñá ñαπú«⌐ ¿¡Σ«α¼áµ¿¿.
-
- ùΓ«íδ óÑα¡πΓ∞ß∩ ¬ »αÑñδñπΘѼπ ß»αáó«τ¡«¼π φ¬αá¡π, óδíÑα¿ΓÑ
- «ñ¿¡ ¿º ñóπσ «»¿ßá¡¡δσ ¡¿ªÑ ß»«ß«í«ó:
-
-
- B.Pascal 7 & Objects /UG - 116 -
-
- * ä½∩ ó«ºóαáΓá ¬ »«ß½Ññ¡Ñ¼π φ¬αá¡π óδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π
- Back.
-
- * ùΓ«íδ πó¿ñÑΓ∞ ß»¿ß«¬ »«ß½Ññ¡¿σ ß»αáó«τ¡δσ φ¬αá¡«ó, óδíÑα¿-
- ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π History. éδíÑα¿ΓÑ ¿º ß»¿ß¬á φ¬αá¡
- Help, ¬«Γ«αδ⌐ óδ σ«Γ¿ΓÑ óδóÑßΓ¿.
-
- éδ ¼«ªÑΓÑ Γá¬ªÑ ó¿ñÑΓ∞ ΓѬßΓ, »«ñτÑભπΓδ⌐ ½¿¡¿Ñ⌐ ¿º Γ«τѬ,
- µóÑΓ ¬«Γ«α«ú« «Γ½¿τáÑΓß∩ «Γ «¬απªáεΘÑú« ΓѬßΓá. ¥Γ«Γ Γ¿» ßß佬¿
- óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ñ½∩ óδó«ñá óß»½δóáεΘÑú« «¬¡á ß ñá½∞¡Ñ⌐ΦÑ⌐
- ¿¡Σ«α¼áµ¿Ñ⌐, ó«ß»«½∞º«óáóΦ¿ß∞ ß½ÑñπεΘ¿¼¿ ß»«ß«íἿ:
-
- * Öѽ¬¡πó ¡á ¡Ñ⌐ ¬¡«»¬«⌐ "¼δΦ¿".
-
- * ìᪿ¼á∩ »«óΓ«α¡« ¬½áó¿Φ¿ Tab, »«¬á ßßδ½¬á ¡Ñ íπñÑΓ »«ñßóÑ-
- τÑ¡á, ºáΓѼ ¡áªáó ¬½áó¿Φπ Enter.
-
- éδó«ñ¿Γß∩ óß»½δóáεΘÑÑ «¬¡«, ß«ñÑαªáΘÑÑ ¿¡Σ«α¼áµ¿ε »« óδíαá¡-
- ¡«⌐ ΓѼÑ. Ä¡« «ßΓáÑΓß∩ ¡á φ¬αá¡Ñ, »«¬á óδ ¡Ñ Θѽ¬¡¿ΓÑ ¬¡«»¬«⌐
- "¼δΦ¿" ¿½¿ ¡Ñ ¡áª¼ÑΓÑ ¬½áó¿Φπ Enter. è«úñá «¬¡« ¿ßτѺ¡ÑΓ, óδ «ß-
- Γá¡ÑΓÑß∞ ó Γ«¼ ªÑ ¼ÑßΓÑ ß»αáó«τ¡«⌐ ß¿ßΓѼδ.
-
-
- çá»α«ß »«¼«Θ¿
- ─────────────────────────────────────────────────────────────────
-
- Å«½πτ¿Γ∞ ñ«ßΓπ» ¬ ß»αáó«τ¡«⌐ ¿¡Σ«α¼áµ¿¿ Help óδ ¼«ªÑΓÑ ß½Ñ-
- ñπεΘ¿¼¿ ß»«ß«íἿ:
-
- * Öѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ¬«¼á¡ñÑ Help »«½«ßδ ¼Ñ¡ε ¿½¿ ñ½∩ óδó«-
- ñá ¼Ñ¡ε Help ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Alt+H.
-
- IDE óδó«ñ¿Γ ¼Ñ¡ε Help. é φΓ«¼ ¼Ñ¡ε óδ ¼«ªÑΓÑ óδíαáΓ∞ φ¬αá¡
- Contents (Äú½áó½Ñ¡¿Ñ) ß¿ßΓѼδ Help, »«½πτ¿Γ∞ ß»αáó¬π »«
- ¿ß»«½∞º«óá¡¿ε ß»αáó«τ¡«⌐ ß¿ßΓѼδ Help, óδóÑßΓ¿ ¿¡Σ«α¼áµ¿ε
- »« ΓѼÑ, ¡á ¬«Γ«α«⌐ »«º¿µ¿«¡¿α«óá¡ ¬παß«α ó «¬¡Ñ αÑñá¬Γ¿-
- α«óá¡¿∩, ¿½¿ óδóÑßΓ¿ Γá¬πε ߻ѵ¿Σ¿τÑ߬πε ñ½∩ Borland
- Pascal ¿¡Σ«α¼áµ¿ε, ¬á¬ ß»αáó¬á »« ∩ºδ¬π, ß««íΘÑ¡¿∩¼ «í
- «Φ¿í¬áσ Borland Pascal, »α¿¼Ñαáσ »α«úαá¼¼ ¿ Γ.ñ.
-
- * ä½∩ óδó«ñá φ¬αá¡á «ú½áó½Ñ¡¿∩ ß»αáó«τ¡«⌐ ß¿ßΓѼδ Borland
- Pascal ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Shift+F1.
-
- ¥¬αá¡ «ú½áó½Ñ¡¿∩ Contents á¡á½«ú¿τÑ¡ «ú½áó½Ñ¡¿ε ¬¡¿ú¿, ¡«
- ó¼ÑßΓ« Γ«ú«, τΓ«íδ ½¿ßΓáΓ∞ ßΓαá¡¿µδ, óδ ¼«ªÑΓÑ »α«ßΓ«
- Θѽ¬¡πΓ∞ "¼δΦ∞ε" ¡á »«ñτÑભπΓ«⌐ ΓÑ¼Ñ ¿½¿ ¡áªáΓ∞ ñ½∩ »ÑαÑ-
- σ«ñá ¬ ¡πª¡«⌐ ΓÑ¼Ñ ¬½áó¿Φπ Tab, á ºáΓѼ ¡áªáΓ∞ ¬½áó¿Φπ
- Enter.
-
- * ì᪼¿ΓÑ ¬½áó¿Φπ F1.
-
- - àß½¿ óδ ¡áσ«ñ¿ΓÑß∞ ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩, Γ« φ¬αá¡ Help
- óδó«ñ¿Γß∩ ß« ß»αáó«τ¡«⌐ ¿¡Σ«α¼áµ¿Ñ⌐ «í ¿ß»«½∞º«óá¡¿¿ αÑ-
-
- B.Pascal 7 & Objects /UG - 117 -
-
- ñá¬Γ«αá. ùΓ«íδ πó¿ñÑΓ∞ ñÑΓ὿, óδíÑα¿ΓÑ «ñ¡π ¿º ßß佫¬.
-
- - àß½¿ óδíαá¡á ¬«¼á¡ñá ¼Ñ¡ε, ¬«¡ΓѬßΓ¡«-ºáó¿ß¿¼δ⌐ φ¬αá¡
- Help óδó«ñ¿Γß∩ ß í«½ÑÑ »«ñα«í¡«⌐ ¿¡Σ«α¼áµ¿Ñ⌐ «í φΓ« φ½Ñ-
- ¼Ñ¡ΓÑ ¼Ñ¡ε.
-
- * éδíÑα¿ΓÑ ó ñ¿á½«ú«ó«¼ «¬¡Ñ ¬«¼á¡ñ¡πε ¬¡«»¬π Help.
-
- éδó«ñ¿Γß∩ φ¬αá¡ ß ¬αáΓ¬¿¼ »«∩ߡѡ¿Ñ¼ »« óßѼ ¬«¼á¡ñá¼,
- ñ«ßΓπ»¡δ¼ ó ñá¡¡«¼ ñ¿á½«ú«ó«¼ «¬¡Ñ. àß½¿ óδ Θѽ¬¡¿ΓÑ
- "¼δΦ∞ε" ¡á »«ñτÑભπΓ«⌐ ΓÑ¼Ñ ¿½¿ óδíÑα¿ΓÑ ÑÑ »«¼«Θ∞ε ¬½á-
- ó¿áΓπαδ ¿ ¡áª¼ÑΓÑ Enter, Γ« πó¿ñ¿ΓÑ í«½ÑÑ »«ñα«í¡πε ¿¡Σ«α-
- ¼áµ¿ε « óδíαá¡¡«⌐ ¬«¼á¡ñÑ.
-
- * Å«¼ÑßΓ¿ΓÑ ¬παß«α ¡á ΓÑନ¡ ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩ ¿ óδíÑα¿-
- ΓÑ Topic Search. êß»«½∞ºπ⌐ΓÑ ½εí«⌐ ¿º ß½ÑñπεΘ¿σ ¼ÑΓ«ñ«ó:
-
- - ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+F1;
-
- - óδíÑα¿ΓÑ ¬«¼á¡ñπ Help│Topic Search;
-
- - πñÑনóá∩ ¬½áó¿Φπ Ctrl, Θѽ¬¡¿ΓÑ »αáó«⌐ ¬¡«»¬«⌐ "¼δΦ¿"
- (¬«¼í¿¡áµ¿∩ ¡áªáΓ¿⌐ Ctrl+»αáóá∩ ¬¡«»¬á "¼δΦ¿" ñ«½ª¡á
- íδΓ∞ »αÑñóáα¿Γѽ∞¡« ¡áßΓα«Ñ¡á - óδíÑα¿ΓÑ ¬«¼á¡ñπ
- Options│Enviroment│Mouse ¿ óδíÑα¿ΓÑ ¬«¼á¡ñπ Topic
- Search).
-
- - óδíÑα¿ΓÑ ¬«¼á¡ñπ Topic Search ó ½«¬á½∞¡«¼ ¼Ñ¡ε «¬¡á αÑ-
- ñá¬Γ¿α«óá¡¿∩.
-
- Åα¿¼Ñτá¡¿Ñ: Ä ½«¬á½∞¡δσ ¼Ñ¡ε αáß߬áºδóáÑΓß∩ ó â½áóÑ 4.
-
-
- B.Pascal 7 & Objects /UG - 118 -
-
- éδó«ñ¿Γß∩ ß»αáó«τ¡δ⌐ φ¬αá¡ ß ¿¡Σ«α¼áµ¿Ñ⌐ « ¬½ετÑó«¼ ß½«óÑ,
- ¡á ¬«Γ«α«¼ ¡áσ«ñ¿Γß∩ ¬παß«α ó á¬Γ¿ó¡«¼ «¬¡Ñ αÑñá¬Γ¿α«óá-
- ¡¿∩.
-
- * é ß»αáó«τ¡«¼ «¬¡Ñ Help óδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π Search
- (Å«¿ß¬).
-
- éδó«ñ¿Γß∩ ñ¿á½«ú«ó«Ñ «¬¡« »«¿ß¬á Search. é Ñú« óÑασ¡Ñ¼
- í½«¬Ñ ß»¿ß¬á óδ ¼«ªÑΓÑ »α«¬απτ¿óáΓ∞ ¬áªñπε ΓѼπ ó ß»αáó«τ-
- ¡«⌐ ß¿ßΓÑ¼Ñ Borland Pascal. àß½¿ óδ º¡áÑΓÑ, ¬á¬πε ΓѼπ óδ
- ¿ΘÑΓÑ, ¡áτ¡¿ΓÑ ¡áí¿αáΓ∞ φΓπ ΓѼπ ó í½«¬Ñ óó«ñá, ¿ óδ πó¿-
- ñ¿ΓÑ ñá¡¡πε ΓѼπ ó í½«¬Ñ ß»¿ß¬á. éδñѽ¿ΓÑ ΓÑ¼π ¿ óδíÑα¿ΓÑ
- Show Topic.
-
- Åα¿¼Ñτá¡¿Ñ: àß½¿ óδ º¡áÑΓÑ, τΓ« ¡πª¡« ¡á⌐Γ¿, Γ« ¬«-
- ¼á¡ñ¡á∩ ¬¡«»¬á Search ñáÑΓ óἠ߬«αÑ⌐Φ¿⌐ ß»«ß«í ñ½∩ óδó«ñá
- ¡πª¡«ú« φ¬αá¡á Help.
-
- àß½¿ óáΦá ΓÑ¼á ¿¼ÑÑΓ í«½ÑÑ ñÑΓá½∞¡«Ñ αáºí¿Ñ¡¿Ñ, óδ πó¿ñ¿ΓÑ
- ó ¡¿ª¡Ñ¼ í½«¬Ñ ß»¿ß¬á ñαπú¿Ñ ΓѼδ. éδñѽ¿ΓÑ ¡πª¡δÑ ΓÑ¼δ ¿
- óδíÑα¿ΓÑ Go To. éδó«ñ¿Γß∩ ß»αáó«τ¡δ⌐ φ¬αá¡ »« ¡πª¡«⌐ ΓѼÑ.
-
- * éδíÑα¿ΓÑ »¿¬Γ«úαá¼¼π Help ó «»ÑαáΓ¿ó¡«⌐ »«½«ßÑ.
-
- éδó«ñ¿Γß∩ ß»αáó«τ¡δ⌐ φ¬αá¡ Help.
-
-
-
-
- B.Pascal 7 & Objects /UG - 119 -
-
- è«»¿α«óá¡¿Ñ »α¿¼Ñα«ó ¬«ñá
- ─────────────────────────────────────────────────────────────────
-
- æ»αáó«τ¡á∩ ß¿ßΓѼá Help ß«ñÑαª¿Γ »α¿¼Ñα ¬«ñá ñ½∩ ¬áªñ«⌐ »α«-
- µÑñπαδ ¿ Σπ¡¬µ¿¿. éδ ¼«ªÑΓÑ ß¬«»¿α«óáΓ∞ φΓ¿ »α¿¼Ñαδ ¿º ß»αáó«τ¡«⌐
- ß¿ßΓѼδ ó ßó«Ñ «¬¡« αÑñá¬Γ¿α«óá¡¿∩. ùΓ«íδ ߬«»¿α«óáΓ∞ »α¿¼Ñα,
- ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδóÑñ¿ΓÑ φ¬αá¡ Help »« ¡πª¡«⌐ »α«µÑñπαÑ ¿½¿ Σπ¡¬µ¿¿.
-
- éδ πó¿ñ¿ΓÑ ¿¼∩ ¿ »α¿¼Ñα ¿ßσ«ñ¡«ú« ¬«ñá ó ¡¿ª¡Ñ⌐ τáßΓ¿ «¬-
- ¡á Help.
-
- 2. ä½∩ óδó«ñá »α¿¼Ñαá Θѽ¬¡¿ΓÑ ¬¡«»¬«⌐ "¼δΦ¿" ¡á ¿¼Ñ¡¿ »α¿-
- ¼Ñαá ¬«ñá.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñπ Edit│Copy.
-
- éδó«ñ¿Γß∩ ñ¿á½«ú«ó«Ñ «¬¡« ß »α¿¼Ñα«¼ ¬«ñá. éδ ¼«ªÑΓÑ óδ-
- ñѽ¿Γ∞ τáßΓ∞ ¬«ñá ñ½∩ ¬«»¿α«óá¡¿∩ ó íπΣÑα óδαѺᡡ«ú«
- ¿º«íαáªÑ¡¿∩. àß½¿ óδ φΓ«ú« ¡Ñ ßñѽáÑΓÑ, »α¿¼Ñα íπñÑΓ ß¬«-
- »¿α«óá¡ µÑ½¿¬«¼.
-
- 4. éδíÑα¿ΓÑ ¬«¼á¡ñπ Copy (è«»¿α«óá¡¿Ñ).
-
- 5. éÑα¡¿ΓÑß∞ ó «¬¡« αÑñá¬Γ¿α«óá¡¿∩ ¿ óδíÑα¿ΓÑ ¬«¼á¡ñπ
- Edit│Paste, ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Shift+Ins ¿½¿ Θѽ¬¡¿ΓÑ
- "¼δΦ∞ε" ¡á ¬«¼á¡ñ¡«⌐ ¬¡«»¬Ñ Paste ó íπΣÑαÑ óδαѺᡡ«ú«
- ¿º«íαáªÑ¡¿∩ ¿½¿ «»ÑαáΓ¿ó¡«⌐ »«½«ßÑ.
-
-
- éδσ«ñ ¿º ß»αáó«τ¡«⌐ ß¿ßΓѼδ
- ─────────────────────────────────────────────────────────────────
-
- éδ ¼«ªÑΓÑ óδíαáΓ∞ αѪ¿¼ ß«σαá¡Ñ¡¿∩ óδó«ñá φ¬αá¡á Help »α¿
- ó«ºóαáΓÑ ó IDE ¿½¿ ß«óßѼ ºá¬αδΓ∞ «ß¡«ó¡«Ñ «¬¡« Help.
-
- * ä½∩ ó«ºóαáΓá ó »α«úαá¼¼π ¿ ß«σαá¡Ñ¡¿∩ Σ«¡«ó«ú« óδó«ñá ΓÑ-
- ¬πΘÑú« «¬¡á Help Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á «¬¡Ñ, ¬«Γ«α«Ñ óδ σ«-
- Γ¿ΓÑ ßñѽáΓ∞ á¬Γ¿ó¡δ¼. è«úñá óδ ºáσ«Γ¿ΓÑ óδóÑßΓ¿ «¬¡« Help
- ¡á »ÑαÑñ¡Ñ¼ »½á¡Ñ, Θѽ¬¡¿ΓÑ ¡á ¡Ñ¼ "¼δΦ∞ε" - «¡« ß¡«óá
- ßΓá¡ÑΓ á¬Γ¿ó¡δ¼.
-
- * ùΓ«íδ ºá¬αδΓ∞ «ß¡«ó¡«Ñ «¬¡« Help ¿ óÑα¡πΓ∞ß∩ ó »α¿¬½áñ¡πε
- »α«úαá¼¼π, óδíÑα¿ΓÑ ó ¼Ñ¡ε «¬¡á Help ¬«¼á¡ñπ File│Exit ¿½¿
- ñóáªñδ Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á Ñú« ¬«¼á¡ñ¡«⌐ ¬¡«»¬Ñ Cancel.
-
-
- çỿß∞ ¿ αÑñá¬Γ¿α«óá¡¿Ñ ¿ßσ«ñ¡«ú« ¬«ñá
- ─────────────────────────────────────────────────────────────────
-
- ū߬«½∞¬π αÑñá¬Γ«α IDE óÑñÑΓ ßÑí∩ á¡á½«ú¿τ¡« óßѼ ñαπú¿¼ αÑ-
- ñá¬Γ«αá¼ Windows, óÑα«∩Γ¡« óδ πªÑ º¡áÑΓÑ, ¬á¬ αÑñá¬Γ¿α«óáΓ∞
-
- B.Pascal 7 & Objects /UG - 120 -
-
- ΓѬßΓ. é αÑñá¬Γ«αÑ ß«í½εñáÑΓß∩ ßΓá¡ñáαΓ «íΘÑú« ñ«ßΓπ»á »«½∞º«óá-
- Γѽ∩ CUA (Common User Access), ¬«Γ«αδ⌐ ¿ß»«½∞ºπÑΓß∩ ó í«½∞Φ¿¡ßΓóÑ
- »α«úαá¼¼ Windows. ÆÑ ªÑ ¬«¼á¡ñδ αÑñá¬Γ¿α«óá¡¿∩, ¬«Γ«αδÑ óδ ¿ß-
- »«½∞º«ó὿ ó ñαπú¿σ »α¿½«ªÑ¡¿∩ Windows, αáí«ΓáεΓ Γá¬ªÑ ¿ ó αÑñá¬-
- Γ«αÑ IDE. Å«½¡δ⌐ »ÑαÑτÑ¡∞ ¬«¼á¡ñ αÑñá¬Γ«αá óδ ¡á⌐ñÑΓÑ ó Åα¿½«ªÑ-
- ¡¿¿ A "Éπ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá".
-
- Åα¿¼Ñτá¡¿Ñ: ÉÑñá¬Γ«α »«ºó«½∩ÑΓ óá¼ «Γ¬αδóáΓ∞ ñ« 32
- «¬«¡ αÑñá¬Γ¿α«óá¡¿∩ (τΓ« «»αÑñѽ∩ÑΓß∩ ñ«ßΓπ»¡«⌐ »á¼∩Γ∞ε).
-
-
- ìáßΓα«⌐¬á ¬«¡Σ¿úπαᵿ¿ αÑñá¬Γ«αá
- ─────────────────────────────────────────────────────────────────
-
- ä½∩ ¼«ñ¿Σ¿¬áµ¿¿ »«óÑñÑ¡¿∩ αÑñá¬Γ«αá Borland Pascal ¿¼ÑÑΓß∩
- ¡Ñ߬«½∞¬« »áαá¼ÑΓα«ó. ä½∩ óδó«ñá ñ¿á½«ú«ó«ú« «¬¡á Editor óδíÑα¿ΓÑ
- ¬«¼á¡ñπ Options│Enviroment│Editor.
-
- ùΓ«íδ »«ñα«í¡ÑÑ πº¡áΓ∞ « ¬áªñ«¼ »áαá¼ÑΓαÑ, óδñѽ¿ΓÑ ñá¡¡δ⌐
- »áαá¼ÑΓα ¿ ¡áª¼¿ΓÑ ¬½áó¿Φπ F1. æ»αáó«τ¡á∩ ß¿ßΓѼá Help »«∩ß¡∩ÑΓ,
- τΓ« ñѽáÑΓ ñá¡¡δ⌐ »áαá¼ÑΓα.
-
- Åα¿¼Ñτá¡¿Ñ: Ä óδñѽѡ¿¿ ß¿¡Γá¬ß¿ßá ó αÑñá¬Γ«αÑ αáß߬á-
- ºδóáÑΓß∩ ¡¿ªÑ.
-
-
-
- B.Pascal 7 & Objects /UG - 121 -
-
- ìáí«α ¬«¼á¡ñ
- ─────────────────────────────────────────────────────────────────
-
- ÉÑñá¬Γ«α IDE ñ½∩ Windows ¿¼ÑÑΓ ñóá ¡áí«αá ¬«¼á¡ñ: ¡áí«α ¬«-
- ¼á¡ñ CUA, »α¿ ¬«Γ«α«¼ »«óÑñÑ¡¿Ñ αÑñá¬Γ«αá á¡á½«ú¿τ¡« »«óÑñÑ¡¿ε
- ñαπú¿σ αÑñá¬Γ«α«ó Windows, ¿ á½∞ΓÑα¡áΓ¿ó¡δ⌐ ¡áí«α ¬«¼á¡ñ, ¬«Γ«αδ⌐
- »αÑóαáΘáÑΓ αÑñá¬Γ«α ó αÑñá¬Γ«α ó ßΓ¿½Ñ Borland. èα«¼Ñ Γ«ú«, ¼¡«-
- ú¿Ñ ¬«¼á¡ñδ ñ«ßΓπ»¡δ ó «í«¿σ ¡áí«αáσ.
-
- Åα¿¼Ñτá¡¿Ñ: ùΓ«íδ óδíαáΓ∞ ¡áí«α ¬«¼á¡ñ, «íαáΓ¿ΓÑß∞ ¬
- Åα¿½«ªÑ¡¿ε A "æ»αáó«τ¡«ú« απ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá" ¿½¿ ¿ß-
- »«½∞ºπ⌐ΓÑ ß»αáó«τ¡¿¬ Help. Æá¼ óδ ¡á⌐ñÑΓÑ »«½¡δ⌐ »ÑαÑτÑ¡∞
- ¬«¼á¡ñ «ñ¡«ú« ¿ ñαπú«ú« ¡áí«αá.
-
- Åα¿ »Ñαó«¡áτá½∞¡«¼ ºá»π᪥ IDE ñ½∩ Windows αÑñá¬Γ«α ¿ß»«½∞-
- ºπÑΓ ¡áí«α ¬«¼á¡ñ CUA, ¬«Γ«αδ⌐ »«ññÑনóáÑΓ óßÑ ßΓá¡ñáαΓ¡δÑ ¬«-
- ¼á¡ñδ αÑñá¬Γ¿α«óá¡¿∩, «íΘ¿Ñ ñ½∩ »α«úαá¼¼ Windows, ¿ ¼¡«ú¿Ñ ¿º ¬«-
- ¼á¡ñ αÑñá¬Γ¿α«óá¡¿∩, º¡á¬«¼δÑ ΓѼ, ¬Γ« πªÑ αáí«Γá½ ß ∩ºδ¬á¼¿ ¿
- »α«úαá¼¼¡δ¼¿ »α«ñπ¬ΓἿ Borland.
-
- ùΓ«íδ ¿ß»«½∞º«óáΓ∞ á½∞ΓÑα¡áΓ¿ó¡δ⌐ ¡áí«α ¬«¼á¡ñ, óδíÑα¿ΓÑ ¬«-
- ¼á¡ñπ Options│Enviroment│Preferences ¿ »áαá¼ÑΓα Alternate ó úαπ»-
- Ȅ Command Set.
-
- éδíαá¡¡δ⌐ ¡áí«α ¬«¼á¡ñ ó½¿∩ÑΓ ¡Ñ Γ«½∞¬« ¡á αÑñá¬Γ«α. ìá»α¿-
- ¼Ñα, ¡Ñ¬«Γ«αδÑ ¬«¼á¡ñδ ¼Ñ¡ε ¿¼ÑεΓ «»ÑαáΓ¿ó¡δÑ ¬½áó¿Φ¿, ß »«¼«Θ∞ε
- ¬«Γ«αδσ óδ ¼«ªÑΓÑ óδí¿αáΓ∞ ¬«¼á¡ñπ, ¡Ñ »α¿íÑúá∩ ¬ ¼Ñ¡ε. é á½∞ΓÑα-
- ¡áΓ¿ó¡«¼ ¡áí«αÑ ¬«¼á¡ñ F2 ñáÑΓ íδßΓαδ⌐ ß»«ß«í ß«σαá¡Ñ¡¿∩ Σá⌐½á. é
- ¡áí«αÑ ¬«¼á¡ñ CUA «»ÑαáΓ¿ó¡«⌐ ¬½áó¿Φ¿ ñ½∩ ß«σαá¡Ñ¡¿∩ Σá⌐½á ¡ÑΓ.
-
-
- êß»«½∞º«óá¡¿Ñ αÑñá¬Γ«αá
- ─────────────────────────────────────────────────────────────────
-
- é IDE ñ½∩ DOS ¿ ó IDE ñ½∩ Windows ¿ß»«½∞ºπÑΓß∩ «ñ¿¡ αÑñá¬-
- Γ«α. àß½¿ óδ º¡áÑΓÑ, ¬á¬ αáí«ΓáΓ∞ ß αÑñá¬Γ«α«¼ ó «ñ¡«⌐ ¿¡ΓÑúα¿α«-
- óá¡¡«⌐ ßαÑñÑ, Γ« ß¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ Ñú« ó ñαπú«⌐. ùΓ«íδ πº¡áΓ∞
- «í «Γ¼Ñ¡Ñ «Φ¿í«¬, αáí«ΓÑ ß í½«¬á¼¿ ΓѬßΓá, »«¿ß¬Ñ ΓѬßΓá ¿ «úαá-
- ¡¿τ¿ΓѽÑ⌐ ¿ »«º¿µ¿«¡¿α«óá¡¿¿ ¬παß«αá ¡á ßΓα«¬Ñ ß ¬«¡¬αÑΓ¡δ¼ ¡«¼Ñ-
- α«¼, ß¼, ß««ΓóÑΓßΓóπεΘ¿Ñ αáºñÑ½δ »αÑñδñπΘÑ⌐ ú½áóδ.
-
- ÉÑñá¬Γ«αδ ñ½∩ DOS ¿ Windows ¿¼ÑεΓ ñóá ¡Ñí«½∞Φ¿σ «Γ½¿τ¿∩:
-
- * ÉÑñá¬Γ«α ñ½∩ Windows ¡Ñ ¿¼ÑÑΓ ¬«¼á¡ñδ Find Text at Cursor.
-
- * ÉÑñá¬Γ«α ñ½∩ Windows ¡Ñ ¿¼ÑÑΓ ¬«¼á¡ñδ Block Insert Cursor,
- ¬«Γ«αá∩ ¡áº¡áτáÑΓ ñ½∩ ¬παß«αá αѪ¿¼á óßΓáó¬¿ Σ«α¼π »α∩¼«π-
- ú«½∞¡¿¬á.
-
-
-
- B.Pascal 7 & Objects /UG - 122 -
-
- éδñѽѡ¿Ñ ß¿¡Γá¬ß¿ßá
- ─────────────────────────────────────────────────────────────────
-
- IDE ñ½∩ Windows Γá¬ªÑ «í½áñáÑΓ ß»«ß«í¡«ßΓ∞ε óδñѽѡ¿∩ ß¿¡-
- Γá¬ß¿ßá. èᬠ¿ ó IDE ñ½∩ DOS óδ ¼«ªÑΓÑ óδñѽ∩Γ∞ φ½Ñ¼Ñ¡Γδ ¿ßσ«ñ¡«-
- ú« ¬«ñá µóÑΓ«¼, ¡« ¼«ªÑΓÑ Γá¬ªÑ ¿º¼Ñ¡∩Γ∞ ¿ áΓα¿íπΓδ ΓѬßΓá. ìá»-
- α¿¼Ñα, ¡Ñ Γ«½∞¬« ¿º¼Ñ¡¿Γ∞ µóÑΓ φ½Ñ¼Ñ¡Γá ¬«ñá, ¡« ¿ ßñѽáΓ∞ Ñú«
- ª¿α¡δ¼, ¡á¬½«¡¡δ¼ ¿½¿ »«ñτÑભπΓδ¼.
-
- ä½∩ óδó«ñá ñ¿á½«ú«ó«ú« «¬¡á Highlighting (éδñѽѡ¿Ñ) óδíÑα¿-
- ΓÑ ¬«¼á¡ñπ Options│Enviroment│Highlight.
-
- ╔═══════════════════════════════════════════════════════════════╗
- ║=██████████████████████████Highlighting████████████████████████║
- ║ │ ║
- ║ Element▒▒▒▒▒▒▒▒▒▒ Color▒▒▒▒▒▒▒▒▒▒▒▒ Attribute▒▒▒▒▒│ ║
- ║ ┌────────────────┐┌────────────────┐▒▒▒▒▒▒▒▒▒▒▒▒▒▒│ ┌───────┐║
- ║ │Whitespace▒▒▒▒▒▒││▓FG▓████ ░░░░│▒< >▒Normal▒▒▒│ │ √ OK │║
- ║ │Comment▒▒▒▒▒▒▒▒▒││████ ░░░░████│▒<*>▒Bold▒▒▒▒▒│ └───────┘║
- ║ │█Reserved█Word██││▓▓▓▓████ ░░░░│▒< >▒Italic▒▒▒│ ║
- ║ │Identifier▒▒▒▒▒▒││████ ░░░░████│──────────────│ ║
- ║ │Symbol▒▒▒▒▒▒▒▒▒▒││▓▓▓▓████▒▒▒▒░░░░│▒█▒Underline▒▒│ ║
- ║ │String▒▒▒▒▒▒▒▒▒▒││████ ░░░░████│ │ ║
- ║ │Number▒▒▒▒▒▒▒▒▒▒││▓▓▓▓████ ░░░░│▒▒▒▒▒▒▒▒▒▒▒▒▒▒│ ║
- ║ │Assembler▒▒▒▒▒▒▒││▓▓▓▓▒▒▒▒ ░░░░│▒█▒Default▒FG▒│ ┌───────┐║
- ║ │▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒││████ ░░░░████│▒√▒Default▒BG▒│ │XCancel│║
- ║ └────────────────┘└────────────────┘▒▒▒▒▒▒▒▒▒▒▒▒▒▒│ └───────┘║
- ║┌──────────────────────────────────────────────────┐│ ║
- ║│ {Syntax highlighting} ││ ║
- ║│ Program Sample; ││ ║
- ║│ uses WinCrt; ││ ║
- ║│ var ││ ║
- ║│ Number: integer; ││ ║
- ║│ begin ││ ┌───────┐║
- ║│ Number := 123456; ││ │ ? Help│║
- ║│ Writeln['The number is',Number]; ││ └───────┘║
- ║│ end. ││ ║
- ║└──────────────────────────────────────────────────┘│ ║
- ╚═══════════════════════════════════════════════════════════════╝
-
- É¿ß. 5.3 ä¿á½«ú«ó«Ñ «¬¡« Highlighting.
-
- Element - φ½Ñ¼Ñ¡Γ; Color - µóÑΓ; Attribute - áΓα¿íπΓ;
- Whitespace - αáºñѽ¿Γѽ∞; Normal - «íδτ¡δ⌐ ΓѬßΓ; Comment - ¬«¼-
- ¼Ñ¡Γáα¿⌐; Bold - ª¿α¡δ⌐; Reserved Word - ºáαѺÑαó¿α«óá¡¡«⌐ ß½«ó«;
- Italic - ¡á¬½«¡¡δ⌐; Identifier - ¿ñÑ¡Γ¿Σ¿¬áΓ«α; Symbol - ¿ñÑ¡Γ¿-
- Σ¿¬áΓ«α; Underline - »«ñτÑનóá¡¿Ñ; String - ßΓ᫬á; Number -
- τ¿ß½«; Assembler - ¬«ñ áßßѼí½Ñαá; Default FG - «ß¡«ó¡«⌐ µóÑΓ »«
- π¼«½τá¡¿ε: Default BG - Σ«¡«óδ⌐ µóÑΓ »« π¼«½τá¡¿ε.
-
- ûóÑΓ«ó«Ñ óδñѽѡ¿Ñ ΓѬßΓá
-
- ùΓ«íδ ¿º¼Ñ¡¿Γ∞ µóÑΓ φ½Ñ¼Ñ¡Γá, óδ»«½¡¿ΓÑ ß½ÑñπεΘ¿Ñ Φáú¿:
-
- B.Pascal 7 & Objects /UG - 123 -
-
-
- 1. é í½«¬Ñ ß»¿ß¬á Element óδñѽ¿ΓÑ φ½Ñ¼Ñ¡Γ, ¬«Γ«αδ⌐ ¡πª¡«
- ¿º¼Ñ¡¿Γ∞.
-
- 2. éδíÑα¿ΓÑ ¡πª¡δÑ µóÑΓá ó ¼áΓα¿µÑ µóÑΓ«ó Colors.
-
- ÆÑ¬πΘ¿⌐ «ß¡«ó¡«⌐ µóÑΓ «Γ¼ÑτÑ¡ íπ¬óἿ FG; ΓѬπΘ¿⌐ Σ«¡«óδ⌐
- µóÑΓ «Γ¼ÑτÑ¡ íπ¬óἿ BG. àß½¿ «ß¡«ó¡«⌐ ¿ Σ«¡«óδ⌐ µóÑΓá
- ß«ó»áñáεΓ, Γ« ó µóÑΓ¡«¼ ¬óáñαáΓÑ óδó«ñ¿Γß∩ FB.
-
- * ùΓ«íδ óδíαáΓ∞ «ß¡«ó¡«⌐ µóÑΓ ß »«¼«Θ∞ε "¼δΦ¿", Θѽ¬¡¿ΓÑ
- ¡á ¡Ñ¼ ÑÑ ¬¡«»¬«⌐. ùΓ«íδ óδíαáΓ∞ µóÑΓ ß »«¼«Θ∞ε ¬½áó¿á-
- Γπαδ, ¿ß»«½∞ºπ⌐ΓÑ ñ½∩ »ÑαѼÑΘÑ¡¿∩ »« ¼áΓα¿µÑ µóÑΓ«ó
- ¬½áó¿Φ¿ ßΓαѽ«¬, á ¬«úñá íπñÑΓÑ ¡áσ«ñ¿Γ∞ß∩ ¡á ¡πª¡«¼
- µóÑΓÑ, ¡áª¼¿ΓÑ F.
-
- * ùΓ«íδ óδíαáΓ∞ Σ«¡«óδ⌐ µóÑΓ ß »«¼«Θ∞ε "¼δΦ¿", Θѽ¬¡¿ΓÑ
- ¡á ¡Ñ¼ ÑÑ »αáó«⌐ ¬¡«»¬«⌐. ùΓ«íδ óδíαáΓ∞ µóÑΓ ß »«¼«Θ∞ε
- ¬½áó¿áΓπαδ, ¡áª¿¼á⌐ΓÑ ¬½áó¿Φπ Tab ñ« óδí«αá ¼áΓα¿µδ
- Colors, ºáΓѼ ¿ß»«½∞ºπ⌐ΓÑ ñ½∩ »ÑαѼÑΘÑ¡¿∩ »« ¼áΓα¿µÑ
- µóÑΓ«ó ¬½áó¿Φ¿ ßΓαѽ«¬, á ¬«úñá íπñÑΓÑ ¡áσ«ñ¿Γ∞ß∩ ¡á
- ¡πª¡«¼ µóÑΓÑ, ¡áª¼¿ΓÑ B.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
-
- êß»«½∞º«óá¡¿Ñ ß¿ßΓѼ¡δσ µóÑΓ«ó Windows
-
- Åα¿½«ªÑ¡¿∩ Windows ¿ß»«½∞ºπεΓ «ñ¡¿ ¿ ΓÑ ªÑ µóÑΓá Σ«¡«ó«ú«
- µóÑΓá ¿ µóÑΓá ΓѬßΓá. ùΓ«íδ ¿º¼Ñ¡¿Γ∞ ß¿ßΓѼ¡δÑ µóÑΓá Windows, ¿ß-
- »«½∞ºπ⌐ΓÑ ¬«¡Γα«½∞¡πε »á¡Ñ½∞ áñ¼¿¡¿ßΓαáΓ«αá »α«úαá¼¼.
-
- éδ ¼«ªÑΓÑ óδíαáΓ∞ ß¿ßΓѼ¡δÑ µóÑΓá Windows ó αÑñá¬Γ«αÑ IDE.
- ùΓ«íδ ¿ß»«½∞º«óáΓ∞ ñ½∩ φ½Ñ¼Ñ¡Γá «ß¡«ó¡«⌐ ß¿ßΓѼ¡δ⌐ µóÑΓ, óδ»«½¡¿-
- ΓÑ ß½ÑñπεΘ¿Ñ Φáú¿:
-
- 1. é ñ¿á½«ú«ó«¼ «¬¡Ñ Highlighting óδñѽ¿ΓÑ φ½Ñ¼Ñ¡Γ ó í½«¬Ñ
- ᯨ᪠ Elements.
-
- 2. éδíÑα¿ΓÑ »áαá¼ÑΓα Default FG.
-
- ä½∩ ¡áº¡áτÑ¡¿∩ Σ«¡«ó«ú« µóÑΓá ¿ß»«½∞ºπεΓß∩ ΓÑ ªÑ Φáú¿, ¡«
- óδí¿αáÑΓß∩ »áαá¼ÑΓα Default BG.
-
-
- 꺼ѡѡ¿Ñ áΓα¿íπΓ«ó ΓѬßΓá
-
- ùΓ«íδ óδíαáΓ∞ áΓα¿íπΓ φ½Ñ¼Ñ¡Γá óδ»«½¡¿ΓÑ ß½ÑñπεΘ¿Ñ Φáú¿:
-
- 1. é ñ¿á½«ú«ó«¼ «¬¡Ñ Highlighting óδñѽ¿ΓÑ φ½Ñ¼Ñ¡Γ ó í½«¬Ñ
- ᯨ᪠ Element.
-
- 2. éδíÑα¿ΓÑ áΓα¿íπΓ ó »áαá¼ÑΓαáσ Attributes.
-
- B.Pascal 7 & Objects /UG - 124 -
-
-
- Åα¿¼Ñτá¡¿Ñ: ùΓ«íδ ΓѬßΓ ßΓá½ ª¿α¡δ¼ ¿½¿ ¡á¬½«¡¡δ¼, αÑ-
- ñá¬Γ«α ñ«½ªÑ¡ ¿ß»«½∞º«óáΓ∞ Φα¿ΣΓ Σ¿¬ß¿α«óá¡¡«ú« αẼÑαá.
- ä½∩ ¿º¼Ñ¡Ñ¡¿∩ Φα¿ΣΓ«ó ¿ß»«½∞ºπ⌐ΓÑ ¬«¼á¡ñπ Options│
- Enviroment│Editor ¿ óδíÑα¿ΓÑ ¡πª¡δ⌐ »áαá¼ÑΓα Font.
-
- éδí«α áΓα¿íπΓ«ó «ΓαếΓß∩ ó «¬¡Ñ ß »α¿¼Ñα«¼ ¬«ñá.
-
- éδ ¼«ªÑΓÑ óδíαáΓ∞ φ½Ñ¼Ñ¡Γ ñ½∩ ¿º¼Ñ¡Ñ¡¿∩, Θѽ¬¡πó "¼δΦ∞ε" ¡á
- Ñú« óσ«ªñÑ¡¿¿ ó «¬¡Ñ »α¿¼Ñαá ¬«ñá. ìá»α¿¼Ñα, Ñß½¿ óδ Θѽ¬¡¿ΓÑ
- "¼δΦ∞ε" ¡á ºáαѺÑαó¿α«óá¡¡«¼ ß½«óÑ program, ó í½«¬Ñ ß»¿ß¬á
- Element óδí¿αáÑΓß∩ φ½Ñ¼Ñ¡Γ Reserved Word (çáαѺÑαó¿α«óá¡¡«Ñ ß½«-
- ó«).
-
-
-
-
- B.Pascal 7 & Objects /UG - 125 -
-
- ÅÑτáΓ∞ ¿ßσ«ñ¡«ú« ¬«ñá
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ óδ σ«Γ¿ΓÑ »«½πτ¿Γ∞ »ÑτáΓ¡πε ¬«»¿ε ßó«Ñú« ¿ßσ«ñ¡«ú« ¬«-
- ñá, óδíÑα¿ΓÑ ¬«¼á¡ñπ File│Print. IDE αáßΦ¿α∩ÑΓ ß¿¼ó«½δ Γáíπ½∩µ¿¿
- (ºá¼Ñ¡∩∩ Γáíπ½∩µ¿ε ß««ΓóÑΓßΓóπεΘ¿¼ τ¿ß½«¼ »α«íѽ«ó ¿ ºáΓѼ »Ñτá-
- ΓáÑΓ óáΦ Σá⌐½.
-
- éδñѽѡ¿Ñ φ½Ñ¼Ñ¡Γ«ó ß¿¡Γá¬ß¿ßá »α¿ »ÑτáΓ¿
-
- éδ ¼«ªÑΓÑ ¡á»ÑτáΓáΓ∞ ΓѬßΓ Γᬿ¼ «íαẫ¼, τΓ«íδ ß¿¡Γá¬ß¿τÑß-
- ¬¿Ñ φ½Ñ¼Ñ¡Γδ í뫨 óδñѽѡδ. ÅÑαÑñ »ÑτáΓ∞ε óδ ñ«½ª¡δ »α«»πßΓ¿Γ∞
- óδó«ñ¿¼δ⌐ ¡á »α¿¡ΓÑα ΓѬßΓ τÑαÑñ »α«úαá¼¼π-Σ¿½∞Γα PRNFLTR.EXE:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ File│Printer Setup.
-
- 2. éδíÑα¿ΓÑ »áαá¼ÑΓα Syntax Printing.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- 4. ä½∩ »ÑτáΓ¿ ΓѬßΓá óδíÑα¿ΓÑ ¬«¼á¡ñπ File│Print.
-
- àß½¿ »áαá¼ÑΓα Syntax Highlight πßΓá¡«ó½Ñ¡, óáΦ ΓѬßΓ »Ñ-
- τáΓáÑΓß∩ ß óδñѽѡ¿Ñ¼ ß¿¡Γá¬ß¿τÑ߬¿σ φ½Ñ¼Ñ¡Γ«ó.
-
- Åα¿ πßΓá¡«ó¬Ñ ó ßó«Ñ⌐ ß¿ßΓÑ¼Ñ Windows óδ, óÑα«∩Γ¡«, πßΓá¡«-
- 󿽿 «ñ¿¡ ¿½¿ í«½ÑÑ ñαá⌐óÑα«ó »α¿¡ΓÑα«ó, ß »«¼«Θ∞ε ¬«Γ«αδσ ¼«ª¡«
- óδ»«½¡∩Γ∞ »ÑτáΓ∞ ¿º Windows. 諼á¡ñá File│Printer Setup »«ºó«½∩ÑΓ
- óá¼ óδíαáΓ∞ ¡πª¡δ⌐ »α¿¡ΓÑα ¿ ºáñáΓ∞ Ñú« ñ½∩ »ÑτáΓ¿ ¿º IDE ¿ ñ½∩
- ¬«¡Σ¿úπαᵿ¿. ìá»α¿¼Ñα, óδ ¼«ªÑΓÑ »ÑτáΓáΓ∞ ¡á íπ¼áú¿ ß αạδ¼
- αẼÑα«¼. êº IDE óδ ¼«ªÑΓÑ ß »«¼«Θ∞ε óδí«αá ¬¡«»¬¿ Set Up ó ñ¿á-
- ½«ú«ó«¼ «¬¡Ñ Printed Setup ºáñáΓ∞ ßó«⌐ »α¿¡ΓÑα ñ½∩ »ÑτáΓ¿.
-
- Åα¿¼Ñτá¡¿Ñ: Å«ñα«í¡«ßΓ¿ « ¬«¡Σ¿úπα¿α«óá¡¿¿ »α¿¡ΓÑαá
- Windows ß¼. ó "Éπ¬«ó«ñßΓóÑ »«½∞º«óáΓѽ∩ »« Microsoft
- Windows"
-
-
- B.Pascal 7 & Objects /UG - 126 -
-
- Éáí«Γá ß Σá⌐½á¼¿
- ─────────────────────────────────────────────────────────────────
-
- Åα¿ »α«úαá¼¼¿α«óá¡¿¿ ó IDE óδ ¼«ªÑΓÑ ß«ºñáóáΓ∞ ¡«óδÑ Σá⌐½δ,
- «Γ¬αδóáΓ∞ ßπΘÑßΓóπεΘ¿Ñ Σá⌐½δ ¿ ß«σαá¡∩Γ∞ ¿σ. Äß¡«ó¡δÑ ¬«¼á¡ñδ αá-
- í«Γδ ß Σá⌐½á¼¿ »ÑαÑτ¿ß½Ñ¡δ ó ß½ÑñπεΘÑ⌐ Γáí½¿µÑ:
-
- Ä»Ñαᵿ¿ ß Σá⌐½á¼¿ Æáí½¿µá 5.1
- ┌──────────────────┬──────────────────────────────────┐
- │ 諼á¡ñá │ Ä»¿ßá¡¿Ñ │
- ├──────────────────┼──────────────────────────────────┤
- │ File│New │ ÄΓ¬αδóáÑΓ ¡«ó«Ñ «¬¡« αÑñá¬Γ¿α«-│
- │ │ óá¡¿∩ ¿ »α¿ßóá¿óáÑΓ Ñ¼π óαѼѡ¡«Ñ│
- │ │ ¿¼∩. │
- ├──────────────────┼──────────────────────────────────┤
- │ File│Open │ éδó«ñ¿Γ ñ¿á½«ú«ó«Ñ «¬¡«, ß »«-│
- │ │ ¼«Θ∞ε ¬«Γ«α«ú« ¼«ª¡« «Γ¬αδΓ∞│
- │ │ Σá⌐½. │
- ├──────────────────┼──────────────────────────────────┤
- │ File│Save │ æ«σαá¡∩ÑΓ Σá⌐½ ó á¬Γ¿ó¡«¼ «¬¡Ñ│
- │ │ αÑñá¬Γ«αá ¡á ñ¿ß¬Ñ. │
- ├──────────────────┼──────────────────────────────────┤
- │ File│Save As │ æ«σαá¡∩ÑΓ Σá⌐½ ó á¬Γ¿ó¡«¼ «¬¡Ñ│
- │ │ αÑñá¬Γ«αá »«ñ ñαπú¿¼ ¿¼Ñ¡Ñ¼. │
- ├──────────────────┼──────────────────────────────────┤
- │ File│Save All │ æ«σαá¡∩ÑΓ óßÑ ¼«ñ¿Σ¿µ¿α«óá¡¡δÑ│
- │ │ Σá⌐½δ. │
- └──────────────────┴──────────────────────────────────┘
-
-
- ÄΓ¬αδΓ¿Ñ Σá⌐½«ó
- ─────────────────────────────────────────────────────────────────
-
- ùΓ«íδ «Γ¬αδΓ∞ Σá⌐½, óδ»«½¡¿ΓÑ ß½ÑñπεΘ¿Ñ Φáú¿:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ File│Open ¿½¿ ¬«¼á¡ñ¡πε ¬¡«»¬π open a
- File «»ÑαáΓ¿ó¡«⌐ »«½«ßδ. éδó«ñ¿Γß∩ ñ¿á½«ú«ó«Ñ «¬¡« Open a
- File (ÄΓ¬αδΓ¿Ñ Σá⌐½á). ä½∩ ºáñá¡¿∩ «Γ¬αδóáѼ«ú« Σá⌐½á óδ
- ¼«ªÑΓÑ óδ»«½¡¿Γ∞ «ñ¡« ¿º ß½ÑñπεΘ¿σ ñÑ⌐ßΓó¿⌐.
-
- * é í½«¬Ñ óó«ñá ¡áíÑα¿ΓÑ »«½¡«Ñ ¿¼∩ Σá⌐½á.
-
- * ìáíÑα¿ΓÑ ¿¼∩ Σá⌐½á ß ΓαáΣáαÑΓ¡δ¼¿ ß¿¼ó«½á¼¿. ¥Γ« «Γ-
- Σ¿½∞Γα«óδóáÑΓ ß»¿ß«¬ Σá⌐½«ó ó ß««ΓóÑΓßΓó¿¿ ß óáΦ¿¼¿
- ߻ѵ¿Σ¿¬áµ¿∩¼¿. é ß»¿ß¬Ñ Files óδíÑα¿ΓÑ ¿¼∩ Σá⌐½á, ¬«-
- Γ«αδ⌐ óδ σ«Γ¿ΓÑ αÑñá¬Γ¿α«óáΓ∞.
-
- * ä½∩ óδó«ñá ß»¿ß¬á »α«Γ«¬«½á (߻ѵ¿Σ¿¬áµ¿⌐ ¿¼Ñ¡ Σá⌐½«ó,
- ¬«Γ«αδÑ óδ ºáñáó὿ αá¡ÑÑ) Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ß¿¼ó«½Ñ
- "ßΓαѽ¬á 󡿺". éδíÑα¿ΓÑ ΓαÑíπѼ«Ñ ¿¼∩ Σá⌐½á ¿½¿ ߻ѵ¿-
- Σ¿¬áµ¿ε. éδí«α ߻ѵ¿Σ¿¬áµ¿¿ Σá⌐½á óδó«ñ¿Γ Σá⌐½δ, ß««Γ-
- óÑΓßΓóπεΘ¿Ñ ñá¡¡«⌐ ߻ѵ¿Σ¿¬áµ¿¿.
-
-
- B.Pascal 7 & Objects /UG - 127 -
-
- * äóáªñδ Θѽ¬¡πó "¼δΦ∞ε" ¡á ¿¼Ñ¡¿ ñαπú«ú« ¬áΓὫúá ó
- ß»¿ß¬Ñ Σá⌐½«ó, »α«ß¼«Γα¿ΓÑ ß«ñÑন¼«Ñ φΓ«ú« ¬áΓὫúá.
- éδíÑα¿ΓÑ ¿¼∩ Σá⌐½á, ¬«Γ«αδ⌐ óδ σ«Γ¿ΓÑ αÑñá¬Γ¿α«óáΓ∞.
-
- 2. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
-
- âñÑ ¡áσ«ñ∩Γß∩ Σá⌐½δ?
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ φΓ« óáΦá »Ñαóá∩ »«»δΓ¬á »α«úαá¼¼¿α«óá¡¿∩ »«ñ Windows,
- óδ ¼«ªÑΓÑ ¡Ñ αẫíαáΓ∞ß∩ ó Γ«¼, úñÑ IDE ¿ΘÑΓ ¿ ß«σαá¡∩ÑΓ ßó«¿
- Σá⌐½δ. IDE ¿ß»«½∞ºπÑΓ ΓѬπΘ¿⌐ αáí«τ¿⌐ ¬áΓὫú. èᬠ«»αÑñѽ∩ÑΓß∩
- ΓѬπΘ¿⌐ αáí«τ¿⌐ ¬áΓὫú, »«∩ß¡∩ÑΓß∩ ó ß½ÑñπεΘѼ »ÑαÑτ¡Ñ:
-
- * àß½¿ óδ ºáñáÑΓÑ «ß¡«ó¡«⌐ Σá⌐½, Γ« ¬áΓὫú, ó ¬«Γ«α«¼ «¡
- ¡áσ«ñ¿Γß∩, ßΓá¡«ó¿Γß∩ ΓѬπΘ¿¼ αáí«τ¿¼ ¬áΓὫú«¼. Åα¿ ¡á¿-
- ¼Ñ¡«óá¡¿¿ Σá⌐½á óδ ¼«ªÑΓÑ π¬áºáΓ∞ »«½¡«Ñ ¿¼∩ ¼áαΦαπΓá.
-
- Åα¿¼Ñτá¡¿Ñ: Å«ñα«í¡ÑÑ «í «ß¡«ó¡δσ Σá⌐½áσ αáß߬áºδóá-
- ÑΓß∩ óδΦÑ.
-
- * àß½¿ óδ ¡Ñ ºáñáÑΓÑ «ß¡«ó¡«⌐ Σá⌐½, ¬áΓὫú, ß«ñÑαªáΘ¿⌐ Σá⌐½
- ó á¬Γ¿ó¡«¼ «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩, ßΓá¡«ó¿Γß∩ ΓѬπΘ¿¼ αáí«τ¿¼
- ¬áΓὫú«¼. Åα¿ ß«σαá¡Ñ¡¿¿ Σá⌐½á ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩ óδ
- ¼«ªÑΓÑ π¬áºáΓ∞ »«½¡«Ñ ¿¼∩ ¼áαΦαπΓá.
-
- * Åα¿ «ΓßπΓßΓó¿¿ ΓѬπΘÑú« «¬¡á αÑñá¬Γ¿α«óá¡¿∩ ΓѬπΘ¿¼ αáí«-
- τ¿¼ ¬áΓὫú«¼ ßΓá¡«ó¿Γß∩ ¬áΓὫú, ó ¬«Γ«α«¼ ¡áσ«ñ¿Γß∩
- BPW.EXE.
-
- Å«ß½Ñ «Γ¬αδΓ¿∩ ¿½¿ ß«ºñá¡¿∩ Σá⌐½á Borland Pascal ºá»«¼¿¡áÑΓ
- Ñú« »«½¡δ⌐ ¼áαΦαπΓ, ñáªÑ Ñß½¿ ΓѬπΘ¿⌐ αáí«τ¿⌐ ¬áΓὫú ¿º¼Ñ¡∩ÑΓß∩.
-
- ū߬«½∞¬π ΓѬπΘ¿⌐ αáí«τ¿⌐ ¬áΓὫú «íδτ¡« «»αÑñѽ∩ÑΓß∩ «ß¡«ó-
- ¡δ¼ Σá⌐½«¼ ¿½¿ Σá⌐½«¼ ó á¬Γ¿ó¡«¼ «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩, ¿ φΓ¿ φ½Ñ-
- ¼Ñ¡Γδ ß«σαá¡∩εΓß∩ ó Σá⌐½Ñ ¬«¡Σ¿úπαᵿ¿ ¿ Σá⌐½Ñ «»ÑαáΓ¿ó¡«⌐ «í½áß-
- Γ¿, Σá⌐½ ¬«¡Σ¿úπαᵿ¿ ¿ Σá⌐½ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿ ¡Ñ∩ó¡« «»αÑñѽ∩-
- εΓ ñ½∩ »α«Ñ¬Γá ΓѬπΘ¿⌐ αáí«τ¿⌐ ¬áΓὫú.
-
- Åα¿¼Ñτá¡¿Ñ: Å«ñα«í¡ÑÑ « αáí«τÑ⌐ «»Ñαᵿ«¡¡«⌐ ßαÑñÑ
- αáß߬áºδóáÑΓß∩ óδΦÑ.
-
-
- Éáí«Γá ß Σá⌐½á¼¿ ó ñαπú«¼ ¬áΓὫúÑ
- ─────────────────────────────────────────────────────────────────
-
- ùΓ«íδ «Γ¬αδΓ∞ Σá⌐½ ó ñαπú«¼ ¬áΓὫúÑ, óδíÑα¿ΓÑ ¬«¼á¡ñπ File│
- Open ¿ ¡áíÑα¿ΓÑ ó í½«¬Ñ óó«ñá »«½¡«Ñ ¿¼∩ ¼áαΦαπΓá ¿ ¿¼∩ Σá⌐½á.
- ï¿í« óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ñ½∩ óδó«ñá Σá⌐½á ó ñαπú«¼ ¬áΓὫúÑ
- ß»¿ß«¬ ¬áΓὫú«ó ¿ óδí«α ¡πª¡«ú« Σá⌐½á. Å«ß½Ñ Γ«ú«, ¬á¬ óδ óδíÑ-
- αÑΓÑ ¿¼∩ Σá⌐½á ¿ ¡áª¼ÑΓÑ Enter, »α¿ ß½ÑñπεΘѼ óδí«αÑ ¬«¼á¡ñδ
- File│Open ó Γ«¼ ªÑ ßÑá¡ßÑ óδ πó¿ñ¿ΓÑ Σá⌐½δ ó φΓ«¼ ñαπú«¼ ¬áΓὫ-
-
- B.Pascal 7 & Objects /UG - 128 -
-
- úÑ. Äñ¡á¬« óáΦ ΓѬπΘ¿⌐ αáí«τ¿⌐ ¬áΓὫú ¡Ñ ¿º¼Ñ¡∩ÑΓß∩. àß½¿ óδ
- ß«ºñ὿ ¿ ß«σαá¡¿½¿ ¡«óδ⌐ Σá⌐½, IDE ß«σαá¡∩ÑΓ Ñú« ó ΓѬπΘѼ αáí«-
- τѼ ¬áΓὫúÑ.
-
- àß½¿ óδ σ«Γ¿ΓÑ αáí«ΓáΓ∞ ß Σá⌐½á¼¿ ó ¡Ñ߬«½∞¬¿σ ¬áΓὫúáσ, Γ«
- ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ß»¿ß«¬ »α«Γ«¬«½á ó ñ¿á½«ú«ó«¼ «¬¡Ñ File Open.
- ùΓ«íδ πó¿ñÑΓ∞ »α«Γ«¬«½, Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ßΓαѽ¬Ñ 󡿺 ß»αáóá
- «Γ í½«¬á óó«ñá ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Alt+"ßΓαѽ¬á 󡿺"; ó ß»¿ß¬Ñ
- ¼«ªÑΓ óδó«ñ¿Γ∞ß∩ ¡πª¡δ⌐ óá¼ Σá⌐½.
-
-
- 諼»¿½∩µ¿∩ ¿ óδ»«½¡Ñ¡¿Ñ
- ─────────────────────────────────────────────────────────────────
-
- é IDE ñ½∩ Windows óδ ¼«ªÑΓÑ ¬«¼»¿½¿α«óáΓ∞ ¿ óδ»«½¡∩Γ∞ »α«ú-
- αá¼¼δ á¡á½«ú¿τ¡« Γ«¼π, ¬á¬ φΓ« ñѽáÑΓß∩ ó IDE ñ½∩ DOS. Äí φΓ«¼ óδ
- ¼«ªÑΓÑ »α«τ¿ΓáΓ∞ ó â½áóÑ 4. æΓ«¿Γ «Γ¼ÑΓ¿Γ∞ ß½ÑñπεΘÑÑ:
-
- * àß½¿ óáΦá »α«úαá¼¼á ¿ß»«½∞ºπÑΓ ¼«ñπ½∞ WinCrt, ¬«úñá »α«ú-
- αá¼¼á ºáóÑαΦáÑΓ óδ»«½¡Ñ¡¿Ñ, «¬¡« »α«úαá¼¼δ ßΓá¡«ó¿Γß∩ ¡Ñ-
- á¬Γ¿ó¡δ¼. ùΓ«íδ »α«ñ«½ª¿Γ∞ αáí«Γδ ó IDE, ºá¬α«⌐ΓÑ Ñú«.
-
- ùΓ«íδ »«½∞º«óáΓÑ½ε ¡Ñ ¡πª¡« í佫 ºá¬αδóáΓ∞ «¬¡« WinCrt,
- ¿ß»«½∞ºπ⌐ΓÑ »α«µÑñπαπ DoneWinCrt. Åα«τ¿Γá⌐ΓÑ « DoneWinCrt
- ó â½áóÑ 1 "æ»αáó«τ¡«ú« απ¬«ó«ñßΓóá »α«úαá¼¼¿ßΓá".
-
- * àß½¿ ó »α«úαá¼¼Ñ, ¿ß»«½∞ºπεΘÑ⌐ ¼«ñπ½∞ WinCrt, ó« óαѼ∩ ÑÑ
- óδ»«½¡Ñ¡¿∩ »α«¿ßσ«ñ¿Γ «Φ¿í¬á, «¬¡«, ó ¬«Γ«α«¼ αáí«ΓáÑΓ
- »α«úαá¼¼á, ßΓá¡«ó¿Γß∩ ¡Ñá¬Γ¿ó¡δ¼ »ÑαÑñ ÑÑ ºáóÑαΦÑ¡¿Ñ¼.
- ùΓ«íδ »«ß¼«ΓαÑΓ∞, τΓ« »α«¿º«Φ½«, ºá¬α«⌐ΓÑ «¬¡« »α«úαá¼¼δ.
- Æ«úñá óδ πó¿ñ¿ΓÑ ¿¡Σ«α¼áµ¿«¡¡«Ñ «¬¡«, ó ¬«Γ«α«¼ óδó«ñ¿Γß∩
- ¡«¼Ñα «Φ¿í¬¿ ¿ áñαÑß, ¡á ¬«Γ«α«¼ «¡á »α«¿º«Φ½á.
-
-
- Åα«ß¼«Γα ¿ßσ«ñ¡«ú« ¬«ñá
- ─────────────────────────────────────────────────────────────────
-
- IDE ñ½∩ Windows ß«ñÑαª¿Γ ¡«ó«Ñ »α«úαá¼¼¡«Ñ ¿¡ßΓαπ¼Ñ¡Γá½∞¡«Ñ
- ßαÑñßΓó« »α«ß¼«Γαá «íΩÑ¬Γ«ó - ObjectBrowser. Ä¡« »«ºó«½∩ÑΓ óá¼
- ¿ßß½Ññ«óáΓ∞ »α«úαá¼¼δ ¿ ¼«ñ㫨 ó »α«úαá¼¼áσ ¿ ¼¡«ú«Ñ ñαπú«Ñ. äáªÑ
- Ñß½¿ αáºαáíáΓδóáѼ«Ñ óἿ »α¿½«ªÑ¡¿Ñ ¡Ñ ¿ß»«½∞ºπÑΓ «íΩÑ¬Γ¡«-«α¿-
- Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ, óδ ¡á⌐ñÑΓÑ ObjectBrowser ταѺóδ-
- τá⌐¡« »«½Ñº¡δ¼ ßαÑñßΓó«¼. éδ ¼«ªÑΓÑ »α«ß¼áΓα¿óáΓ∞ ¿Ñαáασ¿ε «íΩѬ-
- Γ«ó, ¼«ñπ½Ñ⌐ ¿ óßÑσ »α«µÑñπα, Σπ¡¬µ¿⌐, »ÑαѼѡ¡δσ, Γ¿»«ó, ¬«¡ß-
- Γá¡Γ ¿ ñαπú¿Ñ ¿ß»«½∞ºπѼδÑ ó »α«úαá¼¼Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ. æ »«¼«Θ∞ε
- ObjectBrowser óδ ¼«ªÑΓÑ ñѽáΓ∞ ß½ÑñπεΘÑÑ:
-
- * Åα«ß¼«ΓαÑΓ∞ ó úαáΣ¿τÑ߬«¼ ó¿ñÑ ó ßó«Ñ⌐ »α¿¬½áñ¡«⌐ »α«úαá¼-
- ¼Ñ ¿Ñαáασ¿ε «íΩÑ¬Γ«ó, ºáΓѼ óδíαáΓ∞ «íΩÑ¬Γ ¿ »α«ß¼«ΓαÑΓ∞
- óßÑ Ñú« »α«µÑñπαδ, Σπ¡¬µ¿¿ ¿ ñαπú¿Ñ ß«ñÑαªáΘ¿Ñß∩ ó »α«ú-
- αá¼¼Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ.
-
- * éδóÑßΓ¿ ß»¿ß«¬ óßÑσ ú½«íá½∞¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó, ¿ß»«½∞ºπÑ-
-
- B.Pascal 7 & Objects /UG - 129 -
-
- ¼δÑ ó óáΦÑ⌐ »α«úαá¼¼Ñ, ¿ πó¿ñÑΓ∞ ¿σ «»¿ßá¡¿∩, óδóÑßΓ¿ óßÑ
- ßß佬¿ ¡á ¡¿σ ó ßó«Ñ⌐ »α«úαá¼¼Ñ ¿½¿ »ÑαÑ⌐Γ¿ Γπñá, úñÑ «¡¿
- «»¿ßδóáεΓß∩ ó ¿ßσ«ñ¡«¼ ¬«ñÑ.
-
- * éδóÑßΓ¿ ß»¿ß«¬ óßÑσ ¿ß»«½∞ºπѼδσ ó »α«úαá¼¼Ñ ¼«ñπ½Ñ⌐, ºá-
- ΓѼ óδíαáΓ∞ «ñ¿¡ ¿º ¡¿σ ¿ »α«ß¼«ΓαÑΓ∞ ß»¿ß«¬ óßÑσ ¿ñÑ¡Γ¿-
- Σ¿¬áΓ«α«ó Ñú« ¿¡ΓÑαΣÑ⌐ß¡«⌐ τáßΓ¿. é φΓ«¼ ß»¿ß¬Ñ óδ ¼«ªÑΓÑ
- óδíαáΓ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ¿ »α«ß¼«ΓαÑΓ∞ Ñú«, ¬á¬ ½εí«⌐ ñαπú«⌐
- ¿ñÑ¡Γ¿Σ¿¬áΓ«α ßó«Ñ⌐ »α«úαá¼¼δ.
-
- * éδíαáΓ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ó ¿ßσ«ñ¡«¼ ¬«ñÑ, ºáΓѼ »α«ß¼«ΓαÑΓ∞
- ñÑΓá½∞¡πε ¿¡Σ«α¼áµ¿ε »« ¡Ñ¼π, Θѽ¬¡πó ¡á φΓ«¼ ¿ñÑ¡Γ¿Σ¿¬á-
- Γ«αÑ »αáó«⌐ ¬¡«»¬«⌐ "¼δΦ¿".
-
- ÅÑαÑñ ¿ß»«½∞º«ó᡿Ѽ ObjectBrowser πíÑñ¿ΓÑß∞, τΓ« ó ñ¿á½«ú«-
- ó«¼ «¬¡Ñ Options│Compiler πßΓá¡«ó½Ñ¡δ ß½ÑñπεΘ¿Ñ »áαá¼ÑΓαδ:
-
- * Debug Information (ê¡Σ«α¼áµ¿∩ ñ½∩ «Γ½áñ¬¿).
-
- * Locals Symbols (﫬á½∞¡δÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ).
-
- * Symbol Information (ê¡Σ«α¼áµ¿∩ «í ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ).
-
- ä½∩ á¬Γ¿ó¿ºáµ¿¿ ObjectBrowser óδíÑα¿ΓÑ ó ¼Ñ¡ε Search (Å«¿ß¬)
- ¬«¼á¡ñπ Objects (ÄíΩѬΓδ), Units (î«ñπ½¿) ¿½¿ Globals (⽫íá½∞¡δÑ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ). àß½¿ »α«úαá¼¼á ¡áσ«ñ¿Γß∩ ó ΓѬπΘѼ «¬¡Ñ, ¿½¿ «ß-
- ¡«ó¡«⌐ Σá⌐½ ÑΘÑ ¡Ñ ߬«¼»¿½¿α«óá¡, Γ« »ÑαÑñ óδó«ñ«¼ «¬¡á »α«ß¼«Γαá
- IDE ¬«¼»¿½¿απÑΓ óáΦπ »α«úαá¼¼π.
-
- àß½¿ »α«úαá¼¼á íπñÑΓ πß»ÑΦ¡« ߬«¼»¿½¿α«óá¡á, ßΣ«α¼¿α«óá¡á
- ¿½¿ »«ßΓα«Ñ¡á, óδ ¼«ªÑΓÑ ó¡ÑßΓ¿ ó ¿ßσ«ñ¡δ⌐ ¬«ñ ¡Ñ¬«Γ«αδÑ ¿º¼Ñ¡Ñ-
- ¡¿∩, á Ñß½¿ ß½ÑñπεΘá∩ ¬«¼»¿½∩µ¿∩ ºáóÑαΦ¿Γ∞ß∩ ¡Ñπñáτ¡«, Γ« óδ óßÑ
- αáó¡« ß¼«ªÑΓÑ »α«ß¼áΓα¿óáΓ∞ ßó«ε »α«úαá¼¼π ó Γ«¼ ó¿ñÑ, ¬á¬ óδΦ½¿
- ¿º ¡ÑÑ »α¿ »«ß½Ññ¡Ñ⌐ πß»ÑΦ¡«⌐ ¬«¼»¿½∩µ¿¿. ùΓ«íδ φΓ« »α«¿ßσ«ñ¿½«,
- ñ«½ªÑ¡ íδΓ∞ πßΓá¡«ó½Ñ¡ »áαá¼ÑΓα Preserve Symbols («¡ πßΓá¡«ó½Ñ¡
- »« π¼«½τá¡¿ε). äá¡¡δ⌐ »áαá¼ÑΓα ¼«ª¡« ¡á⌐Γ¿ ó ñ¿á½«ú«ó«¼ «¬¡Ñ
- Options│Enviroment│Startup. ū߬«½∞¬π Preserve Symbols - φΓ« »á-
- αá¼ÑΓα ºá»π߬á, ¿º¼Ñ¡Ñ¡¿Ñ Ñú« πßΓá¡«ó¬¿ ¡Ñ íπñÑΓ ¿¼ÑΓ∞ ñÑ⌐ßΓó¿Ñ,
- »«¬á óδ ¡Ñ óδ⌐ñ¿ΓÑ ¿º IDE ¿ ¡Ñ ºá»πßΓ¿ΓÑ ÑÑ ß¡«óá.
-
- àß½¿ π óáß ÑßΓ∞ "¼δΦ∞", Γ« ¿ßσ«ñ¡δ⌐ ¬«ñ πñ«í¡ÑÑ »α«ß¼áΓα¿-
- óáΓ∞, Ñß½¿ ºáñáΓ∞ á¬Γ¿ó¿ºáµ¿ε ObjectBrowser »αáó«⌐ ¬¡«»¬«⌐ "¼δ-
- Φ¿". çáΓѼ, πñÑনóá∩ ¡áªáΓ«⌐ ¬½áó¿Φπ Ctrl, óδ ¼«ªÑΓÑ ¿ß»«½∞º«-
- óáΓ∞ »αáóπε ¬¡«»¬π "¼δΦ¿" ñ½∩ π¬áºá¡¿∩ ¿ »α«óÑન «íΩѬΓá, »α«µÑ-
- ñπαδ, Σπ¡¬µ¿¿, »ÑαѼѡ¡«⌐ ¿½¿ ñαπú«ú« ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ó óáΦѼ ¿ß-
- σ«ñ¡«¼ ¬«ñÑ ¿ Ñú« á¡á½¿ºá (óδó«ñá ñÑΓá½∞¡«⌐ ¿¡Σ«α¼áµ¿¿).
-
- Åα¿¼Ñτá¡¿Ñ: ä½∩ íδßΓα«ú« »α«ß¼«Γαá ¿ñÑ¡Γ¿Σ¿¬áΓ«αá, ¡á
- ¬«Γ«α«¼ ó ¿ßσ«ñ¡«¼ ¬«ñÑ »«º¿µ¿«¡¿α«óá¡ ¬παß«α, óδ ¼«ªÑΓÑ
- Γá¬ªÑ óδíαáΓ∞ ó ½«¬á½∞¡«¼ ¼Ñ¡ε «¬¡á αÑñá¬Γ¿α«óá¡¿∩ ¬«¼á¡ñπ
- Browse Symbol at Cursor (Åα«ß¼«Γα ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ó »«º¿µ¿¿
- ¬παß«αá).
-
-
- B.Pascal 7 & Objects /UG - 130 -
-
- ùΓ«íδ ºáñáΓ∞ »α«ß¼«Γα ß »«¼«Θ∞ε "¼δΦ¿", óδ»«½¡¿ΓÑ ß½ÑñπεΘ¿Ñ
- Φáú¿:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Enviroment│Mouse.
-
- 2. éδíÑα¿ΓÑ »áαá¼ÑΓα Browse as the Ctrl + Right Mouse Button
- (Åα«ß¼«Γα »« ¬½áó¿ΦÑ Ctrl + »αáóá∩ ¬¡«»¬á "¼δΦ¿").
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- é óÑασ¡Ñ⌐ τáßΓ¿ «¬¡á ObjectWindows ¡áσ«ñ¿Γß∩ «»ÑαáΓ¿ó¡á∩ »«-
- ½«ßá ObjectBrowser. éδ ¼«ªÑΓÑ óδí¿αáΓ∞ ½εíπε ¬«¼á¡ñ¡πε ¬¡«»¬π
- «»ÑαáΓ¿ó¡«⌐ »«½«ßδ, Θѽ¬á∩ ¡á ¡Ñ⌐ ¬¡«»¬«⌐ "¼δΦ¿" ¿½¿ ¿ß»«½∞ºπ∩
- «»ÑαáΓ¿ó¡πε ¬½áó¿Φπ. éδíαáó ¬¡«»¬π ¿½¿ ß««ΓóÑΓßΓóπεΘπε «»ÑαáΓ¿ó-
- ¡πε ¬½áó¿Φπ, óδ π¬áºδóáÑΓÑ ObjectBrowser ¡á óδ»«½¡Ñ¡¿Ñ ¡Ñ¬«Γ«α«ú«
- ñÑ⌐ßΓó¿∩. éδ íπñÑΓÑ ó¿ñÑΓ∞ ß½ÑñπεΘ¿Ñ ¬«¼á¡ñ¡δÑ ¬¡«»¬¿, ¿σ ¬½áó¿á-
- Γπα¡δÑ φ¬ó¿óá½Ñ¡Γδ ¿ ß««ΓóÑΓßΓóπεΘ¿Ñ ñÑ⌐ßΓó¿∩:
-
- ┌───────────┐
- │ │
- │ │
- │ │
- └───────────┘
-
- F1 Help (éδó«ñ ß»αáó«τ¡«⌐ ¿¡Σ«α¼áµ¿¿)
-
- ┌───────────┐
- │ │
- │ │
- │ │
- └───────────┘
-
- Ctrl+G Go to (ÅÑαÑσ«ñ ¡á ¿ßσ«ñ¡δ⌐ ¬«ñ ñ½∩ óδíαá¡¡«ú«
- φ½Ñ¼Ñ¡Γá)
-
- ┌───────────┐
- │ │
- │ │
- │ │
- └───────────┘
-
- Ctrl+B Browse (Åα«ß¼«Γα ñÑΓá½∞¡«⌐ ¿¡Σ«α¼áµ¿¿ »« óδí-
- αá¡¡«¼π φ½Ñ¼Ñ¡Γπ)
-
- ┌───────────┐
- │ │
- │ │
- │ │
- └───────────┘
-
- Ctrl+V View (éδó«ñ »αÑñδñπΘÑú« «¬¡á »α«ß¼«Γαá):
-
- B.Pascal 7 & Objects /UG - 131 -
-
-
- ┌───────────┐
- │ │
- │ │
- │ │
- └───────────┘
-
- Ctrl+O Display (éδó«ñ ¿Ñαáασ¿¿ «íΩÑ¬Γ«ó)
-
- ┌───────────┐
- │ │
- │ │
- │ │
- └───────────┘
-
- Ctrl+R List (ÅÑαÑτÑ¡∞ óßÑσ ßß佫¬ ¡á ¿ñÑ¡Γ¿Σ¿¬áΓ«α)
-
- ┌───────────┐
- │ │
- │ │
- │ │
- └───────────┘
-
- Ctrl+P Print (ÅÑτáΓ∞ ¿Ñαáασ¿¿ «íΩÑ¬Γ«ó)
-
- ┌───────────┐
- │ │
- │ │
- │ │
- └───────────┘
-
- Ctrl+W Replace (çá¼Ñ¡á ΓѬπΘÑú« «¬¡á »α«ß¼«Γαá)
-
- ┌───────────┐
- │ │
- │ │
- │ │
- └───────────┘
-
- Ctr+W Open (ÄΓ¬αδΓ¿Ñ ¡«ó«ú« «¬¡á »α«ß¼«Γαá)
-
- É¿ß. 5.4 諼á¡ñ¡δÑ ¬¡«»¬¿ «»ÑαáΓ¿ó¡«⌐ »«½«ßδ ObjectBrowser.
-
- Åα¿¼Ñτá¡¿Ñ: ÄΓ Γ«ú«, ß ¬á¬¿¼ ¿¼Ñ¡¡« «¬¡«¼
- ObjectBrowser óδ αáí«ΓáÑΓÑ, ºáó¿ß¿Γ, ¬á¬¿Ñ ó Γ«τ¡«ßΓ¿ ¬¡«»-
- ¬¿ óδó«ñ∩Γß∩ ó «»ÑαáΓ¿ó¡«⌐ »«½«ßÑ.
-
- B.Pascal 7 & Objects /UG - 132 -
-
-
- ū߽Ññ¡¿Ñ ñóÑ ¬¡«»¬¿ »«¬áºδóáεΓ ó ñÑ⌐ßΓó¿Γѽ∞¡«ßΓ¿ ñóá αáº-
- ½¿τ¡δσ »αÑñßΓáó½Ñ¡¿∩ «ñ¡«⌐ ¬¡«»¬¿. Åα¿ »Ñαó«¼ ¿ß»«½∞º«óá¡¿¿
- ObjectBrowser óδ πó¿ñ¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π «ñ¿¡«τ¡«ú« «¬¡á. Öѽ¬-
- ¡¿ΓÑ ¡á ¡Ñ⌐ "¼δΦ∞ε", ¿ óδ πó¿ñ¿ΓÑ ¬¡«»¬π ¼¡«ªÑßΓóÑ¡¡δσ «¬«¡.
-
- è«úñá óδ óδí¿αáÑΓÑ ¬¡«»¬π «ñ¿¡«τ¡«ú« «¬¡á ¿ ¡áτ¿¡áÑΓÑ »α«ß-
- ¼«Γα, ¡«ó«Ñ «¬¡« »α«ß¼«Γαá »α¿ ¬áªñ«¼ ñÑ⌐ßΓó¿¿ »α«ß¼«Γαá ºá¼Ñ¡∩ÑΓ
- ΓѬπΘÑÑ «¬¡« »α«ß¼«Γαá. Åα¿ óδí«αÑ ¬¡«»¬¿ ¼¡«ªÑßΓóÑ¡¡δσ «¬«¡ «¬¡á
- «ßΓáεΓß∩ ¡á φ¬αá¡Ñ, »«¬á óδ ¿σ ¡Ñ ºá¬α«ÑΓÑ.
-
- éδ ¼«ªÑΓÑ íδßΓα« ¿º¼Ñ¡¿Γ∞ ñÑ⌐ßΓó¿Ñ φΓ¿σ ¬¡«»«¬ ¡á «íαáΓ¡«Ñ:
- πñÑনóá∩ ¡áªáΓ«⌐ ¬¡«»¬π Shift, óδíÑα¿ΓÑ ß½ÑñπεΘÑÑ ñÑ⌐ßΓó¿Ñ »α«ß-
- ¼«Γαá. ìá»α¿¼Ñα, Ñß½¿ óδó«ñ¿Γß∩ ¬¡«»¬á ¼¡«ªÑßΓóÑ¡¡δσ «¬«¡, Γ« »α¿
- ¡áªáΓ¿¿ ¬½áó¿Φ¿ Shift ß½ÑñπεΘÑÑ «¬¡« »α«ß¼«Γαá íπñÑΓ ºá¼ÑΘáΓ∞ ΓÑ-
- ¬πΘÑÑ.
-
- B.Pascal 7 & Objects /UG - 133 -
-
- Åα«ß¼«Γα «íΩÑ¬Γ«ó
- ─────────────────────────────────────────────────────────────────
-
- ObjectBrowser »«ºó«½∩ÑΓ óá¼ πó¿ñÑΓ∞ "«íΘ¿⌐ »½á¡" ¿Ñαáασ¿¿
- «íΩÑ¬Γ«ó, á Γá¬ªÑ ¼Ñ½¬¿Ñ ñÑΓ὿. ùΓ«íδ á¬Γ¿ó¿º¿α«óáΓ∞
- ObjectBrowser ¿ úαáΣ¿τÑ߬¿ »«¬áºáΓ∞ ¡á φ¬αá¡Ñ «íΩѬΓδ, óδíÑα¿ΓÑ
- ¬«¼á¡ñπ Search│Object. ObjectBrowser α¿ßπÑΓ óáΦ «íΩÑ¬Γ ¿ »«¬áºδ-
- óáÑΓ ó ó¿ñÑ ú«α¿º«¡Γá½∞¡«ú« ñÑαÑóá Ñú« ß««Γ¡«ΦÑ¡¿∩ "»αÑñ«¬-»«Γ«-
- ¼«¬". èαáß¡δÑ ½¿¡¿¿ ó ¿Ñαáασ¿¿ »«¼«úáεΓ óá¼ ∩ß¡« πó¿ñÑΓ∞ ¡Ñ»«ß-
- αÑñßΓóÑ¡¡δÑ «Γ¡«ΦÑ¡¿∩ "»αÑñ«¬-»«Γ«¼«¬" ΓѬπΘÑú« «íΩѬΓá.
-
- ╔═══════════════════════════════════════════════════════════════╗
- ║ = │ ? │ ╬ │ ╧ │ * │ █ │█████████Browsing Objects██████████│v│^║
- ║───┴───┴───┴───┴───┴───┴───────────────────────────────────┴─┴─║
- ║ │ ^
- ║ ┌┤▒TWindowsObject▒├┬┤▒TWindow▒├─┴─┬┬┬┤▒TMDIClient▒│█
- ║ │ │ │││ ▒
- ║ │ │ ││└┤▒TListBox▒├┤▒▒
- ║ │ │ ││ ▒
- ║ │ │ │└─┤▒TGroupBox▒├─▒
- ║ │ │ │ ▒
- ║ │ │ └──┤▒TButton▒├┤▒T▒
- ║│▒TObject▒▒├┼┬┬┐ │ ▒
- ║ ││││ └┤▒TDialog▒├┤▒TDglWindow▒│ ▒
- ║ ││││ ▒
- ║ │││└┤▒TStream▒├┬┤▒TEmsStream▒│ ▒
- ║ │││ │ ▒
- ║ │││ └┤▒TDosStream▒├─┤▒TBufSteram▒│ ▒
- ║ │││ ▒
- ║ ││└─┤▒TScroller▒│ ▒
- ║ ││ ▒
- ║ │└──┤▒TCollection▒├┤▒TSortedCollection▒├┬┤▒TStringC▒
- ║ │ │ ▒
- ║ │ └┤▒TStrColl▒
- ║ └───┤█Application█├┤▒THelloApp▒│ ▒
- ║ v
- ╚<▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒>▒
-
- É¿ß. 5.5 Åα«ß¼«Γα ¿Ñαáασ¿¿ «íΩÑ¬Γ«ó »α¿¬½áñ¡«⌐ »α«úαá¼¼δ.
-
-
- B.Pascal 7 & Objects /UG - 134 -
-
-
- ùΓ«íδ πó¿ñÑΓ∞ í«½ÑÑ »«ñα«í¡πε ¿¡Σ«α¼áµ¿ε « ¬«¡¬αÑΓ¡«¼ «íΩѬ-
- ΓÑ, ñóáªñδ Θѽ¬¡¿ΓÑ ¡á ¡Ñ¼ ¬¡«»¬«⌐ "¼δΦ¿". àß½¿ óδ ¡Ñ ¿ß»«½∞ºπÑΓÑ
- "¼δΦ∞", óδíÑα¿ΓÑ «íΩÑ¬Γ ß »«¼«Θ∞ε ¬½áó¿Φ π»αáó½Ñ¡¿∩ ¬παß«α«¼
- (ßΓαѽ«¬) ¿ ¡áª¼¿ΓÑ Enter. ObjectBrowser »ÑαÑτ¿ß½∩ÑΓ ¿ß»«½∞ºπѼδÑ
- ó «íΩѬΓÑ ß¿¼ó«½δ (»α«µÑñπαδ, Σπ¡¬µ¿¿, »ÑαѼѡ¡δÑ ¿ Γ.ñ.)
-
- ╔═══════════════════════════════════════════════════════════════╗
- ║ = │ ? │ ╬ │ ╧ │ * │ █ │█████████Browsing TApplication█████│v│^║
- ║───┴───┴───┴───┴───┴───┴───────────────────────────────────┴─┴─║
- ║ ║
- ║ Browsing TApplication ║
- ║ ┌───────────────────────────────────┐ ║
- ║ │v▒▒▒▒▒▒Status:Integer▒▒▒▒▒▒▒▒▒▒▒▒▒^│ ║
- ║ │v Name:PChar ▒│ ║
- ║ │v MainWindow:PWindowsObject ▒│ ║
- ║ ┌───────┐ │v HAccTable:Word ▒│ ┌──────────┐ ║
- ║ │TObject├─┤v KBHandleWnd:PWindowsObject ▒├─┤THelloAppl│ ║
- ║ └───────┘ │p Init[PChar] ▒│ └──────────┘ ║
- ║ │p √ Done ▒│ ║
- ║ │f √ IdleAction:Boolean ▒│ ║
- ║ │p √ InitApplication v│ ║
- ║ │<█▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒>▒│ ║
- ║ └───────────────────────────────────┘ ║
- ║ ║
- ║ Filters: √ F P V │ p v ║
- ║ X │ │ │ ║ │ │ ║
- ║ ║
- ╚═══════════════════════════════════════════════════════════════╝
-
- É¿ß. 5.6 Åα«ß¼«Γα ñÑΓá½∞¡«⌐ ¿¡Σ«α¼áµ¿¿ »« «íΩѬΓπ.
-
- æ½Ñóá «Γ ¬áªñ«ú« ¿ñÑ¡Γ¿Σ¿¬áΓ«αá «íΩѬΓá óδó«ñ∩Γß∩ «ñ¡á ¿½¿
- í«½ÑÑ íπ¬ó. æ¿¼ó«½ «»¿ßδóáÑΓ ó¿ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá.
-
- üπ¬óÑ¡¡δÑ ß¿¼ó«½δ ó ObjectBrowser
- Æáí½¿µá 5.2
- ┌────────────┬────────────────────────────┐
- │ üπ¬óá │ öπ¡¬µ¿∩ │
- ├────────────┼────────────────────────────┤
- │ F │ öπ¡¬µ¿∩ │
- │ P │ Åα«µÑñπαá │
- │ T │ Æ¿» │
- │ V │ ÅÑαѼѡ¡á∩ │
- │ C │ è«¡ßΓá¡Γá │
- │ L │ îÑΓ¬á │
- │ I │ ìáß½Ññ«óá¡¿Ñ «Γ »αÑñ¬á │
- │ p │ Åα¿óáΓ¡δ⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α │
- │ v │ é¿αΓπá½∞¡δ⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α │
- └────────────┴────────────────────────────┘
-
-
- B.Pascal 7 & Objects /UG - 135 -
-
- ö¿½∞Γαδ
-
- ÆÑ ªÑ ß¿¼ó«½δ, τΓ« ¿ñÑ¡Γ¿Σ¿µ¿απεΓ ó¿ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá, óδó«-
- ñ∩Γß∩ ó ¼áΓα¿µÑ Σ¿½∞Γα«ó Filters ó ¡¿ª¡Ñ⌐ τáßΓ¿ «¬¡á
- ObjectBrowser. éδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ Σ¿½∞Γαδ ñ½∩ óδí«αá Γ¿»á
- ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó, ß»¿ß«¬ ¬«Γ«αδσ σ«Γ¿ΓÑ ó¿ñÑΓ∞.
-
- îáΓα¿µá Σ¿½∞Γα«ó ß«ñÑαª¿Γ ßΓ«½íѵ ñ½∩ ¬áªñ«⌐ íπ¬óδ; íπ¬óá
- ¼«ªÑΓ óδó«ñ¿Γ∞ß∩ ó óÑασ¡Ñ⌐ ¿½¿ ¡¿ª¡Ñ⌐ ßΓ᫬Ñ.
-
- Åα¿¼Ñτá¡¿Ñ: ä½∩ óδí«αá Γ¿»á ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó óδ ¼«ªÑΓÑ
- Γá¬ªÑ ¿ß»«½∞º«óáΓ∞ «¬¡« Browser Options. éδíÑα¿ΓÑ ¬«¼á¡ñπ
- Options│Browser ¿ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, ¬«Γ«αδÑ óδ σ«Γ¿ΓÑ óδóÑßΓ¿
- ó ß»¿ß¬Ñ.
-
- ùΓ«íδ »α«ß¼«ΓαÑΓ∞ óßÑ φ¬ºÑ¼»½∩αδ ß¿¼ó«½á ¬«¡¬αÑΓ¡«ú« Γ¿»á,
- Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á óÑασ¡Ñ⌐ ∩τÑ⌐¬Ñ ßΓ«½íµá íπ¬óδ. ìá»α¿¼Ñα, τΓ«íδ
- »α«ß¼«ΓαÑΓ∞ óßÑ »ÑαѼѡ¡δÑ ó ΓѬπΘѼ óδíαá¡¡«¼ «íΩѬΓÑ, Θѽ¬¡¿ΓÑ
- ¡á óÑασ¡Ñ⌐ ∩τÑ⌐¬Ñ ßΓ«½íµá V. éδó«ñ∩Γß∩ óßÑ »ÑαѼѡ¡δÑ, ¿ß»«½∞ºπÑ-
- ¼δÑ ó «íΩѬΓÑ.
-
- ùΓ«íδ ߬αδΓ∞ óßÑ φ¬ºÑ¼»½∩αδ ¬«¡¬αÑΓ¡«ú« «íΩѬΓá ¿½¿ ¿ñÑ¡Γ¿-
- Σ¿¬áΓ«αá, Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ¡¿ª¡Ñ⌐ ∩τÑ⌐¬Ñ ßΓ«½íµá íπ¬óδ. ìá»α¿-
- ¼Ñα, τΓ«íδ »α«ß¼«ΓαÑΓ∞ Γ«½∞¬« Σπ¡¬µ¿¿ ¿½¿ »α«µÑñπαδ «íΩѬΓá, óá¼
- ¡πª¡« ßñѽáΓ∞ ߬αδΓ묨 óßÑ »ÑαѼѡ¡δÑ. Öѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ¡¿ª¡Ñ⌐
- ∩τÑ⌐¬Ñ ó ßΓ«½íµÑ V, ¿ ¡á óÑασ¡¿σ ∩τÑ⌐¬áσ ó ßΓ«½íµáσ F ¿ P.
-
- Åα¿¼Ñτá¡¿Ñ: éδ ¼«ªÑΓÑ ¿º¼Ñ¡¿Γ∞ ¡Ñ߬«½∞¬« πßΓá¡«ó«¬
- Σ¿½∞Γαá ßαáºπ. üπ¬ß¿απ⌐ΓÑ "¼δΦ∞" »« ∩τÑ⌐¬á¼, ¬«Γ«αδÑ óδ σ«-
- Γ¿ΓÑ óδíαáΓ∞ ó ¼áΓα¿µÑ Filters.
-
- é ¡Ñ¬«Γ«αδσ ß½πτá∩σ ñ½∩ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá óδó«ñ¿Γß∩ í«½ÑÑ «ñ¡«⌐
- íπ¬óδ. éΓ«α«⌐ íπ¬óÑ¡¡δ⌐ ß¿¼ó«½ óδó«ñ¿Γß∩ ¡Ñ»«ßαÑñßΓóÑ¡¡« »«ß½Ñ
- »Ñαó«⌐ íπ¬óδ, «í«º¡áτáεΘÑ⌐ Γ¿» ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ¿ ß½πª¿Γ ñ½∩ ñá½∞-
- ¡Ñ⌐ΦÑú« «»¿ßá¡¿∩ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá:
-
- * I «í«º¡áτáÑΓ ¡áß½ÑñπѼδ⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α;
- * p «í«º¡áτáÑΓ »α¿óáΓ¡δ⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α;
- * v «í«º¡áτáÑΓ ó¿αΓπá½∞¡δ⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α.
-
- Åα«ß¼«Γα «»¿ßá¡¿⌐ »ÑαÑτ¿ß½Ñ¡¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó
-
- ä½∩ »α«ß¼«Γαá «»¿ßá¡¿∩ ¬«¡¬αÑΓ¡«ú« ß«ñÑαªáΘÑú«ß∩ ó ß»¿ß¬Ñ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ¿ß»«½∞ºπ⌐ΓÑ ß½ÑñπεΘ¿Ñ ¼ÑΓ«ñδ:
-
- * ñóáªñδ Θѽ¬¡¿ΓÑ ¡á ¿ñÑ¡Γ¿Σ¿¬áΓ«αÑ ¬¡«»¬«⌐ "¼δΦ¿";
- * óδíÑα¿ΓÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ¿ Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ¬¡«»¬Ñ Browse
- ¿½¿ ¡áª¼¿ΓÑ Ctrl+B;
- * óδíÑα¿ΓÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ¿ ¡áª¼¿ΓÑ ¬½áó¿Φπ Enter.
-
- Åα¿ »α«ß¼«ΓαÑ ó αѪ¿¼Ñ «ñ¡«ú« «¬¡á (¬¡«»¬á Window «»ÑαáΓ¿ó-
-
- B.Pascal 7 & Objects /UG - 136 -
-
- ¡«⌐ »«½«ßδ óδó«ñ¿Γ ¡á φ¬αá¡ Γ«½∞¬« «ñ¡« «¬¡«), Ñß½¿ óδ σ«Γ¿ΓÑ
- óÑα¡πΓ∞ß∩ ¡á πα«óÑ¡∞ óδΦÑ, Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ¬¡«»¬Ñ óδó«ñá »αÑ-
- ñδñπΘÑú« «¬¡á »α«ß¼«Γαá ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+V.
-
- ò«Γ∩ «τÑ¡∞ ½Ñú¬« ¿ß»«½∞º«óáΓ∞ «»ÑαáΓ¿ó¡πε »«½«ßπ ñ½∩ óδí«αá
- «ñ¡«- ¿ ¼¡«ú««¬«¡¡«ú« αѪ¿¼á, Γ«ªÑ ßá¼«Ñ óδ ¼«ªÑΓÑ ñѽáΓ∞ ß »«-
- ¼«Θ∞ε ¼Ñ¡ε ¿ ñ¿á½«ú«ó«ú« «¬¡á. ùΓ«íδ ¡«ó«Ñ «¬¡« »α«ß¼«Γαá ºá¼Ñ¡∩-
- ½« ΓѬπΘÑÑ, ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Browser.
-
- 2. ôßΓá¡«ó¿ΓÑ »áαá¼ÑΓα Replace Current sub-browsing.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
- ùΓ«íδ ¡«ó«Ñ «¬¡« »α«ß¼«Γαá »α¿ óδí«αÑ »ÑαÑτ¿ß½Ñ¡¡«ú« ó ß»¿ß-
- ¬Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá «ßΓáóὫß∞ ¡á φ¬αá¡Ñ, ßñѽá⌐ΓÑ ß½ÑñπεΘÑÑ:
-
- 1. éδíÑα¿ΓÑ ¬«¼á¡ñπ Options│Browser.
-
- 2. ôßΓá¡«ó¿ΓÑ »áαá¼ÑΓα New Browser sub-browsing.
-
- 3. éδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π OK.
-
-
- B.Pascal 7 & Objects /UG - 137 -
-
- Åα«ß¼«Γα ú½«íá½∞¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó
- ─────────────────────────────────────────────────────────────────
-
- æ »«¼«Θ∞ε ObjectBrowser óδ ¼«ªÑΓÑ »α«ß¼áΓα¿óáΓ∞ óßÑ ¼«ñπ½¿,
- ¬«Γ«αδÑ ¿ß»«½∞ºπÑΓ »α«úαá¼¼á. ùΓ«íδ «Γ¬αδΓ∞ «¬¡« ß« ß»¿ß¬«¼ óßÑσ
- ¿ß»«½∞ºπѼδσ ó »α«úαá¼¼Ñ ¼«ñπ½Ñ⌐ ¿ ¿¼Ñ¡Ñ¼ ßἫ⌐ »α¿¬½áñ¡«⌐ »α«ú-
- αá¼¼δ óδíÑα¿ΓÑ ¬«¼á¡ñπ Search│Units.
-
- éδíÑα¿ΓÑ ¼«ñπ½∞, « ¬«Γ«α«¼ óá¼ ¡πª¡« »«½πτ¿Γ∞ í«½ÑÑ »«ñα«í-
- ¡πε ¿¡Σ«α¼áµ¿ε. èᬠ¿ ó ß½πτáÑ ú½«íá½∞¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó, óδ ¼«-
- ªÑΓÑ óδ»«½¡∩Γ∞ »«¿ß¬ ó ß»¿ß¬Ñ ¼«ñπ½Ñ⌐, ¡áí¿αá∩ »ÑαóδÑ ¡Ñ߬«½∞¬«
- íπ¬ó ¿¼Ñ¡¿ ¼«ñπ½∩ ó í½«¬Ñ óó«ñá Search ó ¡¿ª¡Ñ⌐ τáßΓ¿ «¬¡á.
-
- Å«ß½Ñ óδí«αá ¼«ñπ½∩ óδ ¼«ªÑΓÑ »ÑαÑτ¿ß½¿Γ∞ óδóÑßΓ¿ ß»¿ß«¬
- óßÑσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó ó ¿¡ΓÑαΣÑ⌐ß¡«⌐ τáßΓ¿ ¼«ñπ½∩.
-
- * é óδó«ñ¿¼«¼ ß»¿ß¬Ñ ¼«ñπ½Ñ⌐ ñóáªñδ Θѽ¬¡¿ΓÑ "¼δΦ∞ε" ¡á ¿¼Ñ-
- ¡¿ ¼«ñπ½∩, óδñѽ¿ΓÑ ¿¼∩ ¼«ñπ½∩ ¿ óδíÑα¿ΓÑ Inspect ¿½¿ óδ-
- ñѽ¿ΓÑ ¿¼∩ ¿ ¡áª¼¿ΓÑ ¬½áó¿Φπ Enter.
-
- é φΓ«¼ ß»¿ß¬Ñ óδ ¼«ªÑΓÑ óδñѽ¿Γ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ¿ ßñѽáΓ∞
- ß½ÑñπεΘÑÑ:
-
- - ùΓ«íδ πó¿ñÑΓ∞ «»¿ßá¡¿Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá, ñóáªñδ Θѽ¬¡¿ΓÑ
- ¡á ¿ñÑ¡Γ¿Σ¿¬áΓ«αÑ ¬¡«»¬«⌐ "¼δΦ¿", óδñѽ¿ΓÑ Ñú« ¿ óδíÑα¿-
- ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π Inspect (Åα«óÑα¬á), ¿½¿ óδñѽ¿ΓÑ Ñú«
- ¿ ¡áª¼¿ΓÑ ¬½áó¿Φπ Enter.
-
- - ùΓ«íδ »ÑαÑ⌐Γ¿ ¡á ßΓ᫬π ¿ßσ«ñ¡«ú« ¬«ñá, úñÑ «»¿ßδóáÑΓß∩
- ¿ñÑ¡Γ¿Σ¿¬áΓ«α, óδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π Go To Source
- Code.
-
- - ùΓ«íδ óδóÑßΓ¿ ß»¿ß«¬ óßÑσ ßß佫¬ ¡á ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, óδ-
- íÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π Reference. àß½¿ óδ óδíÑα¿ΓÑ «ñ¡π
- ¿º φΓ¿σ ßß佫¬, ObjectBrowser »«º¿µ¿«¡¿απÑΓ óáΦ ¬παß«α ó
- ¿ßσ«ñ¡«¼ ¬«ñÑ.
-
- * ùΓ«íδ »ÑαÑ⌐Γ¿ ¡á «»¿ßá¡¿Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ó ¿ßσ«ñ¡«¼ ¬«ñÑ,
- óδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π Go to Source Code.
-
- * ùΓ«íδ »ÑαÑτ¿ß½¿Γ∞ óßÑ ßß佬¿ ¡á ¿ñÑ¡Γ¿Σ¿¬áΓ«α ó óáΦѼ »α¿-
- ½«ªÑ¡¿¿, óδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π Reference.
-
-
- Åα«ß¼«Γα ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó ó ¿ßσ«ñ¡«¼ ¬«ñÑ
- ─────────────────────────────────────────────────────────────────
-
- éδ ¼«ªÑΓÑ »α«ß¼áΓα¿óáΓ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ ó ßó«Ñ¼ ¿ßσ«ñ¡«¼ ¬«-
- ñÑ, ¡Ñ óδó«ñ∩ ß¡áτá½á ¿Ñαáασ¿ε «íΩÑ¬Γ«ó ¿½¿ ß»¿ß«¬ ¿ñÑ¡Γ¿Σ¿¬áΓ«-
- α«ó. éδíÑα¿ΓÑ «ñ¿¡ ¿º ß½ÑñπεΘ¿σ ¼ÑΓ«ñ«ó:
-
- * Å«ñßóÑΓ¿ΓÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«α ó ßó«Ñ¼ ¬«ñÑ ¿ óδíÑα¿ΓÑ ¬«¼á¡ñπ
- Search│Symbol.
-
- B.Pascal 7 & Objects /UG - 138 -
-
-
- * àß½¿ óáΦá "¼δΦ∞" ¡áßΓα«Ñ¡á ñ½∩ »α«ß¼«Γαá, πñÑনóá∩ ¡áªá-
- Γ«⌐ ¬½áó¿Φπ Ctrl, Θѽ¬¡¿ΓÑ ¡á ¿ñÑ¡Γ¿Σ¿¬áΓ«αÑ ó óáΦѼ ¬«ñÑ
- »αáó«⌐ ¬¡«»¬«⌐ "¼δΦ¿".
-
- * ä½∩ óδó«ñá ½«¬á½∞¡«ú« ¼Ñ¡ε «¬¡á αÑñá¬Γ¿α«óá¡¿∩ ¡áª¼¿ΓÑ
- ¬½áó¿Φ¿ Alt+F10 ¿½¿ Θѽ¬¡¿ΓÑ »αáó«⌐ ¬¡«»¬¿ "¼δΦ¿" ¿ óδíÑ-
- α¿ΓÑ ¬«¼á¡ñπ Browse Symbol at Cursor.
-
- àß½¿ óδñѽѡ¡δ⌐ óἿ ¿ñÑ¡Γ¿Σ¿¬áΓ«α »αÑñßΓáó½∩ÑΓ ß«í«⌐ ßΓαπ¬-
- Γπα¡δ⌐ Γ¿», Γ« ObjectBrowser óδó«ñ¿Γ ñ½∩ φΓ«ú« Γ¿»á ¿¡Σ«α¼áµ¿ε
- «í« óßÑσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó ó Ñú« «í½áßΓ¿ ñÑ⌐ßΓó¿∩. ïεí«⌐ ¿º ¡¿σ óδ
- ¼«ªÑΓÑ óδíαáΓ∞ ñ½∩ ñá½∞¡Ñ⌐ΦÑ⌐ »α«óÑન. ìá»α¿¼Ñα, Ñß½¿ óδ óδíÑα¿-
- ΓÑ «íΩÑ¬Γ¡δ⌐ Γ¿», Γ« πó¿ñ¿ΓÑ ß»¿ß«¬ óßÑσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó ó «í½áß-
- Γ¿ ñÑ⌐ßΓó¿∩ φΓ«ú« «íΩѬΓá.
-
-
- éδ»«½¡Ñ¡¿Ñ ó IDE ñαπú¿σ »α«úαá¼¼
- ─────────────────────────────────────────────────────────────────
-
- é IDE óδ ¼«ªÑΓÑ ºá»π߬áΓ∞ »« óáΦѼπ óδí«απ τÑΓδαÑ ñαπú¿σ
- »α«úαá¼¼δ: «Γ½áñτ¿¬ Turbo Debugger, »á¬ÑΓ αáºαáí«Γτ¿¬á αÑßπαß«ó
- Resource Workshop, πΓ¿½¿Γπ WinSight ¿ »α«Σ¿½¿α«óΘ¿¬ Turbo
- Profiler. ùΓ«íδ ºá»πßΓ¿Γ∞ ½εíπε ¿º φΓ¿σ »α«úαá¼¼, óδíÑα¿ΓÑ ¬«¼á¡-
- ñπ Tools ñ½∩ «Γ¬αδΓ¿∩ ¼Ñ¡ε Tools ¿ ºáΓѼ óδíÑα¿ΓÑ ¿¡ßΓαπ¼Ñ¡Γá½∞-
- ¡«Ñ ßαÑñßΓó«, ¬«Γ«α«Ñ óδ σ«Γ¿ΓÑ ºá»πßΓ¿Γ∞. ùΓ«íδ ¿º¼Ñ¡¿Γ∞ ¼áαΦαπΓ
- ¿½¿ »ÑαÑñáΓ∞ φΓ¿¼ »α«úαἼἠáαúπ¼Ñ¡Γδ, ¿ß»«½∞ºπ⌐ΓÑ ñ¿á½«ú«ó«Ñ
- «¬¡« Tools (Options│Tools).
-
- é «Γ½¿τ¿Ñ «Γ IDE ñ½∩ DOS óδ ¡Ñ ¼«ªÑΓÑ ñ«íáó¿Γ∞ ó ¼Ñ¡ε Tools
- ñαπú¿Ñ πΓ¿½¿Γδ. Æá¬ ¬á¬ IDE ñ½∩ Windows »αÑñßΓáó½∩ÑΓ ß«í«⌐ »α¿¬-
- ½áñ¡πε »α«úαá¼¼π Windows, ¡á ßἫ¼ ñÑ½Ñ φΓ« ¡Ñ ñáÑΓ »αÑ¿¼πΘÑßΓó.
- éδ óßÑúñá ¼«ªÑΓÑ »ÑαѬ½ετ¿Γ∞ß∩ ¡á ñαπúπε »α«úαá¼¼π, ¿ß»«½∞ºπ∩
- ßαÑñßΓóá »ÑαѬ½ετÑ¡¿∩ ºáñáτ Windows.
-
- B.Pascal 7 & Objects /UG - 139 -
-
-
-
- ìáßΓα«⌐¬á ¬«¡Σ¿úπαᵿ¿ IDE
- ─────────────────────────────────────────────────────────────────
-
- éδ ¼«ªÑΓÑ ¡áßΓαá¿óáΓ∞ ¬«¡Σ¿úπαᵿε IDE, ß«σαá¡∩Γ∞ ßó«ε «»Ñ-
- αᵿ«¡¡πε ßαÑñπ ¿ π»αáó½∩Γ∞ »α«Ñ¬ΓἿ á¡á½«ú¿τ¡« Γ«¼π, ¬á¬ φΓ«
- ñѽáÑΓß∩ ó IDE ñ½∩ DOS (ß¼. óδΦÑ). Åα¿ ß«σαá¡Ñ¡¿¿ «»Ñαᵿ«¡¡«⌐
- ßαÑñδ ¿ π»αáó½Ñ¡¿¿ »α«Ñ¬ΓἿ ¼Ñªñπ IDE ñ½∩ DOS ¿ IDE ñ½∩ Windows
- ßπΘÑßΓóπεΓ ß½ÑñπεΘ¿Ñ αẽ¿τ¿∩:
-
- * IDE ñ½∩ Windows óßÑúñá ß«σαá¡∩ÑΓ Σá⌐½ «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿
- ó Γ«¼ ªÑ ¬áΓὫúÑ, τΓ« ¿ ΓѬπΘ¿⌐ Σá⌐½ ¬«¡Σ¿úπαᵿ¿. éδ ¡Ñ
- ¼«ªÑΓÑ »ÑαÑ«»αÑñѽ¿Γ∞ φΓ«, ¬á¬ ó IDE ñ½∩ DOS.
-
- * ùΓ«íδ «τ¿ßΓ¿Γ∞ «ß¡«ó¡«⌐ Σá⌐½, óδíÑα¿ΓÑ ó IDE ñ½∩ Windows
- ¬«¼á¡ñπ Compile│Clear Primary File. éδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞
- φëà ¼ÑΓ«ñ Γá¬ªÑ ¿ ó IDE ñ½∩ DOS, ¡« π óáß ÑßΓ∞ 󫺼«ª-
- ¡«ßΓ∞ óδí«αá ó ñ¿á½«ú«ó«¼ «¬¡Ñ Primary File ¬«¼á¡ñ¡«⌐
- ¬¡«»¬¿ Clear Primary File.
-
-
-
-
- B.Pascal 7 & Objects /UG - 140 -
-
- ────────────────────────────────────────────────────────────────────────────
- â½áóá 6. ÄΓ½áñ¬á ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñÑ
- ─────────────────────────────────────────────────────────────────
-
- ê¡ΓÑúα¿α«óá¡¡á∩ ¿¡ΓÑαá¬Γ¿ó¡á∩ ßαÑñá αáºαáí«Γ¬¿ »α«úαá¼¼
- Borland Pascal (IDE) ó¬½ετáÑΓ ó ßÑí∩ α∩ñ ßαÑñßΓó, «í½ÑúτáεΘ¿σ
- αáºαáí«Γ¬π »α«úαá¼¼: áóΓ«¼áΓ¿τÑ߬«Ñ π»αáó½Ñ¡¿Ñ »α«Ñ¬ΓἿ, ßαÑñßΓó
- «íÑß»ÑτÑ¡¿∩ ¼«ñπ½∞¡«⌐ ßΓαπ¬Γπαδ »α«úαá¼¼δ, íδßΓαπε ¬«¼»¿½∩µ¿ε ¿
- »α«ßΓδÑ ó ¿ß»«½∞º«óá¡¿¿ «óÑα½Ñ¿. ì« ¡Ñß¼«Γα∩ ¡á óßÑ φΓ« óáΦá
- »α«úαá¼¼á óßÑ αáó¡« ¼«ªÑΓ ß«ñÑαªáΓ∞ «Φ¿í¬¿, τΓ« ¡Ñ »«ºó«½¿Γ Ñ⌐
- ¬«ααÑ¬Γ¡« αáí«ΓáΓ∞.
-
- IDE ñ½∩ DOS Borland Pascal »αÑñ«ßΓáó½∩ÑΓ óá¼ ¿¡ßΓαπ¼Ñ¡Γá½∞-
- ¡δÑ ßαÑñßΓóá ñ½∩ «Γ½áñ¬¿ »α«úαá¼¼, Γ« ÑßΓ∞ »«¿ß¬á ¿ ¿ß»αáó½Ñ¡¿∩
- «Φ¿í«¬. é φΓ«⌐ ú½áóÑ «»¿ßδóáεΓß∩ ¿¡ßΓαπ¼Ñ¡Γá½∞¡δÑ ßαÑñßΓóá ¿ »α«-
- µÑñπαδ «Γ½áñ¬¿ »α«úαá¼¼δ ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñÑ, ó¬½ετá∩ ß½Ññπε-
- Θ¿Ñ ΓѼδ:
-
- * «íº«α «Φ¿í«¬ ¿ ¼ÑΓ«ñ«ó «Γ½áñ¬¿;
-
- * π»αáó½Ñ¡¿Ñ óδ»«½¡Ñ¡¿Ñ¼ »α«úαá¼¼δ;
-
- * »α«óÑα¬á º¡áτÑ¡¿⌐;
-
- * «ßΓá¡«ó¬¿ óδ»«½¡Ñ¡¿∩ »α«úαá¼¼δ.
-
- äá¡¡á∩ ú½áóá »«ßó∩ΘÑ¡á óßΓα«Ñ¡¡«¼π «Γ½áñτ¿¬π IDE ñ½∩ DOS.
- éßÑ «»¿ßá¡¡δÑ »α«µÑñπαδ »α¿¼Ñ¡¿¼δ Γá¬ªÑ ¬ Æπαí« «Γ½áñτ¿¬π (Turbo
- Debugger) ¿ Æπαí« «Γ½áñτ¿¬π ñ½∩ Windows, σ«Γ∩ ¿¼Ñ¡á ¼Ñ¡ε ¿ ¡áª¿-
- ¼áѼδÑ ¬½áó¿Φ¿ ó ¡¿σ ¼«úπΓ «Γ½¿τáΓ∞ß∩.
-
-
- ùΓ« Γá¬«Ñ «Γ½áñ¬á?
- ─────────────────────────────────────────────────────────────────
-
- ÄΓ½áñ¬á - φΓ« »α«µÑßß »«¿ß¬á ¿ ¿ß»αáó½Ñ¡¿∩ «Φ¿í«¬ ó »α«úαá¼-
- ¼Ñ, »αÑ»∩ΓßΓóπεΘ¿σ ¬«ααÑ¬Γ¡«⌐ αáí«ΓÑ »α«úαá¼¼δ. ÅÑαÑñ ΓѼ ¬á¬ πú-
- ½πí¿Γ∞ß∩ ó ߻ѵ¿Σ¿τÑ߬¿Ñ ßαÑñßΓóá IDE Borland Pascal, ¬«Γ«αδÑ »«-
- ¼«úáεΓ »α¿ «Γ½áñ¬Ñ, ñáñ¿¼ ¬αáΓ¬«Ñ «»¿ßá¡¿Ñ ó¿ñ«ó «Φ¿í«¬, ¬«Γ«αδÑ
- óδ ¼«ªÑΓÑ ¡áí½εñáΓ∞, ¿ αẽ¿τ¡«ú« α«ñá «»Ñαᵿ⌐, ¬«Γ«αδÑ óδ íπñÑΓ
- ¿ß»«½∞º«óáΓ∞ ñ½∩ ¿σ »«¿ß¬á.
-
- èá¬¿Ñ ßπΘÑßΓóπεΓ ó¿ñδ «Φ¿í«¬?
- ─────────────────────────────────────────────────────────────────
-
- æπΘÑßΓóπÑΓ Γα¿ «ß¡«ó¡δσ Γ¿»á «Φ¿í«¬: «Φ¿í¬¿ φΓá»á ¬«¼»¿½∩-
- µ¿¿, «Φ¿í¬¿ φΓá»á óδ»«½¡Ñ¡¿∩ ¿ ½«ú¿τÑ߬¿Ñ «Φ¿í¬¿. àß½¿ óδ πªÑ σ«-
- α«Φ« º¡á¬«¼δ ß φΓ¿¼¿ »«¡∩Γ¿∩¼¿, Γ« ¼«ªÑΓÑ »α«»πßΓ¿Γ∞ ß½ÑñπεΘ¿⌐
- αáºñѽ ñ« ¼ÑΓ«ñ«ó «Γ½áñ¬¿.
-
- ÄΦ¿í¬¿ φΓá»á ¬«¼»¿½∩µ¿¿
-
- ÄΦ¿í¬¿ φΓá»á ¬«¼»¿½∩µ¿¿ ¿½¿ ß¿¡Γá¬ß¿τÑ߬¿Ñ «Φ¿í¬¿ »α«¿ßσ«-
- ñ∩Γ, ¬«úñá óáΦ ¿ßσ«ñ¡δ⌐ ¬«ñ ¡áαπΦáÑΓ »αáó¿½á ß¿¡Γá¬ß¿ßá Åá߬á½∩.
-
- B.Pascal 7 & Objects /UG - 141 -
-
- Borland Pascal ¡á ¼«ªÑΓ ß¬«¼»¿½¿α«óáΓ∞ óáΦπ »α«úαá¼¼π, »«¬á «¡á
- ¡Ñ íπñÑΓ ß«ñÑαªáΓ∞ ñ«»πßΓ¿¼δÑ «»ÑαáΓ«αδ Åá߬á½∩. è«úñá ¬«¼»¿½∩Γ«α
- óßΓαÑτáÑΓ «»ÑαáΓ«α, ¬«Γ«αδ⌐ «¡ ¡Ñ ¼«ªÑΓ αáß»«º¡áΓ∞, ß««ΓóÑΓßΓóπε-
- Θ¿⌐ Σá⌐½ óδó«ñ¿Γß∩ ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩, ¬παß«α »«º¿µ¿«¡¿απÑΓß∩
- ¡á Γ« ¼ÑßΓ«, ¬«Γ«α«Ñ ¡Ñ »«¡∩½ ¬«¼»¿½∩Γ«α, ¿ óδó«ñ¿Γß∩ ß««íΘÑ¡¿Ñ
- «í «Φ¿í¬Ñ.
-
- 諼»¿½∩Γ«α, αáí«ΓáεΘ¿⌐ ó αѪ¿¼Ñ ¬«¼á¡ñ¡«⌐ ßΓ᫬¿, Γá¬ªÑ ñáÑΓ
- óá¼ ¡Ñ¬«Γ«απε ¿¡Σ«α¼áµ¿ε. è«úñá «¡ ¡áσ«ñ¿Γ ß¿¡Γá¬ß¿τÑ߬πε «Φ¿í¬π,
- Γ« óδó«ñ¿Γ ß«ñÑαªáΘπε «Φ¿í¬π ßΓ᫬π ß ¡«¼Ñα«¼ φΓ«⌐ ßΓ᫬¿ ¿ ß««í-
- ΘÑ¡¿Ñ¼ «í «Φ¿í¬Ñ.
-
- ìá¿í«½ÑÑ «íΘÑ⌐ »α¿τ¿¡«⌐ «Φ¿í«¬ φΓá»á ¬«¼»¿½∩µ¿¿ ∩ó½∩εΓß∩
- «Φ¿í¬¿ ¡áí«αá («»ÑτáΓ¬¿), »α«»πΘÑ¡¡δÑ Γ«τ¬¿ ß ºá»∩Γ«⌐, ßß佬¿ ¡á
- ¡Ñ«»¿ßá¡¡δÑ »ÑαѼѡ¡δÑ, »ÑαÑñáτá ¡ÑóÑα¡«ú« τ¿ß½á (¿½¿ Γ¿»á) »áαá-
- ¼ÑΓα«ó »α«µÑñπαδ ¿½¿ Σπ¡¬µ¿¿ ¿ »α¿ßóá¿óá¡¿Ñ »ÑαѼѡ¡«⌐ º¡áτÑ¡¿⌐
- ¡ÑóÑα¡«ú« Γ¿»á.
-
- Å«ß½Ñ ¿ß»αáó½Ñ¡¿∩ «Φ¿í¬¿ óδ ¼«ªÑΓÑ óδ»«½¡¿Γ∞ ¬«¼»¿½∩µ¿ε ºá-
- ¡«ó«. Å«ß½Ñ πßΓαá¡Ñ¡¿∩ ó »α«úαá¼¼Ñ óßÑσ ß¿¡Γá¬ß¿τÑ߬¿σ «Φ¿í«¬ ¿
- ÑÑ πß»ÑΦ¡«⌐ ¬«¼»¿½∩µ¿¿ »α«úαá¼¼á íπñÑΓ ú«Γ«óá ¬ óδ»«½¡Ñ¡¿ε ¿ »«-
- ¿ß¬π «Φ¿í«¬ φΓá»á óδ»«½¡Ñ¡¿∩ ¿ ½«ú¿τÑ߬¿σ «Φ¿í«¬.
-
- ÄΦ¿í¬¿ φΓá»á óδ»«½¡Ñ¡¿∩
-
- ÄΦ¿í¬¿ φΓá»á óδ»«½¡Ñ¡¿∩ ¿½¿ ßѼá¡Γ¿τÑ߬¿Ñ «Φ¿í¬¿ »α«¿ßσ«ñ∩Γ,
- ¬«úñá óδ ¬«¼»¿½¿απÑΓÑ »«½¡πε »α«úαá¼¼π, ¬«Γ«αá∩ »α¿ ÑÑ óδ»«½¡Ñ¡¿¿
- ñѽáÑΓ τΓ«-Γ« ¡Ññ«»πßΓ¿¼«Ñ. Æ« ÑßΓ∞, »α«úαá¼¼á ß«ñÑαª¿Γ ñ«»πßΓ¿-
- ¼δÑ «»ÑαáΓ«αδ Åá߬á½∩, ¡« »α¿ óδ»«½¡Ñ¡¿¿ «»ÑαáΓ«α«ó τΓ«-Γ« »α«¿ß-
- σ«ñ¿Γ ¡ÑóÑα¡«. ìá»α¿¼Ñα, óáΦá »α«úαá¼¼á ¼«ªÑΓ »δΓáΓ∞ß∩ «Γ¬αδΓ∞
- ñ½∩ óó«ñá ¡ÑßπΘÑßΓóπεΘ¿⌐ Σá⌐½ ¿½¿ óδ»«½¡¿Γ∞ ñѽѡ¿Ñ ¡á ¡«½∞.
-
- è«úñá »α«úαá¼¼á Borland Pascal «í¡áαπª¿óáÑΓ Γá¬πε «Φ¿í¬π,
- «¡á ºáóÑαΦáÑΓ óδ»«½¡Ñ¡¿Ñ ¿ óδó«ñ¿Γ ß««íΘÑ¡¿Ñ ß½ÑñπεΘÑú« ó¿ñá:
-
- Run-time error ## at seg:ofs
-
- àß½¿ óδ óδ»«½¡∩ÑΓÑ »α«úαá¼¼π ¿º IDE, Borland Pascal áóΓ«¼á-
- Γ¿τÑ߬¿ ¡áσ«ñ¿Γ óδºóáóΦ¿⌐ «Φ¿í¬π «»ÑαáΓ«α (¬á¬ ó ß½πτáÑ ß¿¡Γá¬ß¿-
- τÑ߬¿σ «Φ¿í«¬). àß½¿ óδ óδ»«½¡∩ÑΓÑ »α«úαá¼¼π ó¡Ñ IDE, Γ« óδ ¼«ªÑ-
- ΓÑ ºá»πßΓ¿Γ∞ IDE ¿, τΓ«íδ ¡á⌐Γ¿ óδºóáóΦ¿⌐ «Φ¿í¬π «»ÑαáΓ«α, ¿ß-
- »«½∞º«óáΓ∞ ¬«¼á¡ñπ Search│Find Error, ¬«Γ«αá∩ ñáÑΓ óá¼ áñαÑß ßÑú-
- ¼Ñ¡Γá ¿ ß¼ÑΘÑ¡¿∩ (seg:ofs). àß½¿ óδ ¿ß»«½∞ºπÑΓÑ ¬«¼»¿½∩Γ«α ¬«-
- ¼á¡ñ¡«⌐ ßΓ᫬¿, Γ« ¼«ªÑΓÑ ñ½∩ »«¿ß¬á «Φ¿í¬¿ ¿ß»«½∞º«óáΓ∞ »áαá¼ÑΓα
- /F.
-
- B.Pascal 7 & Objects /UG - 142 -
-
-
- ï«ú¿τÑ߬¿Ñ «Φ¿í¬¿
-
- ï«ú¿τÑ߬¿Ñ «Φ¿í¬¿ - φΓ« «Φ¿í¬¿ »α«Ñ¬Γ¿α«óá¡¿∩ ¿ αÑ὿ºáµ¿¿
- »α«úαá¼¼δ. Æ« ÑßΓ∞, óáΦ¿ «»ÑαáΓ«αδ ñ«»πßΓ¿¼δ ¿ τΓ«-Γ« ñѽáεΓ, ¡«
- ¡Ñ Γ«, τΓ« óδ »αÑñ»«½áú὿. ¥Γ¿ «Φ¿í¬¿ τáßΓ« Γαπñ¡« «Γß½Ññ¿Γ∞,
- »«ß¬«½∞¬π IDE ¡Ñ ¼«ªÑΓ ¡á⌐Γ¿ ¿σ áóΓ«¼áΓ¿τÑ߬¿, ¬á¬ ß¿¡Γá¬ß¿τÑ߬¿Ñ
- ¿ ßѼá¡Γ¿τÑ߬¿Ñ «Φ¿í¬¿. è ßτáßΓ∞ε, IDE ó¬½ετáÑΓ ó ßÑí∩ ßαÑñßΓóá
- «Γ½áñ¬¿, »«¼«úáεΘ¿Ñ óá¼ ¡á⌐Γ¿ ½«ú¿τÑ߬¿Ñ «Φ¿í¬¿.
-
- ï«ú¿τÑ߬¿Ñ «Φ¿í¬¿ »α¿ó«ñ∩Γ ¬ ¡Ñ¬«ααÑ¬Γ¡«¼π ¿½¿ ¡Ñ»αÑñó¿ñÑ¡-
- ¡«¼π º¡áτÑ¡¿ε »ÑαѼѡ¡δσ, ¡Ñ»αáó¿½∞¡«¼π ó¿ñπ úαáΣ¿τÑ߬¿σ ¿º«íαá-
- ªÑ¡¿⌐ ¿½¿ ¡Ñóδ»«½¡Ñ¡¿ε ¬«ñá, ¬«úñá φΓ« «ª¿ñáÑΓß∩. é «ßΓá½∞¡«⌐
- τáßΓ¿ φΓ«⌐ ú½áóδ «íßπªñáεΓß∩ ¼ÑΓ«ñδ «Γ߽Ѫ¿óá¡¿∩ φΓ¿σ ½«ú¿τÑ߬¿σ
- «Φ¿í«¬.
-
-
-
- B.Pascal 7 & Objects /UG - 143 -
-
- îÑΓ«ñδ «Γ½áñ¬¿
- ─────────────────────────────────────────────────────────────────
-
- ê¡«úñá, ¬«úñá »α«úαá¼¼á ñѽáÑΓ τΓ«-Γ« ¡Ñ»αÑñó¿ñÑ¡¡á∩, »α¿τ¿-
- ¡á ñ«ßΓáΓ«τ¡« «τÑó¿ñ¡á, ¿ óδ ¼«ªÑΓÑ íδßΓα« ¿ß»αáó¿Γ∞ ¬«ñ »α«úαá¼-
- ¼δ. ì« ñαπú¿Ñ «Φ¿í¬¿ í«½ÑÑ Γαπñ¡«π½«ó¿¼δ ¿ óδºδóáεΓß∩ óºá¿¼«ñÑ⌐ß-
- Γó¿Ñ αẽ¿τ¡δσ τáßΓÑ⌐ »α«úαá¼¼δ. é φΓ¿σ ß½πτá∩σ ½πτΦÑ óßÑú« «ßΓá-
- ¡«ó¿Γ∞ óáΦπ »α«úαá¼¼π ó ºáñá¡¡«⌐ Γ«τ¬Ñ, »α«⌐Γ¿ ÑÑ Φáú ºá Φáú«¼ ¿
- »α«ß¼«ΓαÑΓ∞ ß«ßΓ«∩¡¿Ñ »ÑαѼѡ¡δσ ¿ óδαáªÑ¡¿⌐. Æá¬«Ñ π»αáó½∩Ѽ«Ñ
- óδ»«½¡Ñ¡¿Ñ - ¬½ετÑó«⌐ φ½Ñ¼Ñ¡Γ «Γ½áñ¬¿.
-
- é ñá¡¡«¼ αáºñÑ½Ñ «»¿ßδóáεΓß∩ αẽ¿τ¡δÑ ó«º¼«ª¡«ßΓ¿ «Γ½áñ¬¿ ó
- IDE ñ½∩ DOS Borland Pascal.
-
- éδ»«½¡Ñ¡¿Ñ »« Φáúá¼ ¿ Γαáßß¿α«ó¬á
-
- 諼á¡ñδ óδ»«½¡Ñ¡¿∩ »« Φáúá¼ Step Over ¿ Γαáßß¿α«ó¬¿ Trace
- Into ¼Ñ¡ε óδ»«½¡Ñ¡¿∩ Run ñáεΓ óἠ󫺼«ª¡«ßΓ∞ »«ßΓα«τ¡«ú« óδ»«½-
- ¡Ñ¡¿∩ »α«úαá¼¼δ. àñ¿¡ßΓóÑ¡¡«Ñ «Γ½¿τ¿Ñ óδ»«½¡Ñ¡¿∩ »« Φáúá¼ ¿ Γαáß-
- ß¿α«ó¬¿ ß«ßΓ«¿Γ ó Γ«¼, ¬á¬ «¡¿ αáí«ΓáεΓ ß ó맮óἿ »α«µÑñπα ¿
- Σπ¡¬µ¿⌐. éδ»«½¡Ñ¡¿Ñ »« Φáúá¼ ó맮óá »α«µÑñπαδ ¿½¿ Σπ¡¬µ¿¿ ¿¡ΓÑα»-
- αÑΓ¿απÑΓ ó맮ó ¬á¬ »α«ßΓ«⌐ «»ÑαáΓ«α ¿ »«ß½Ñ ºáóÑαΦÑ¡¿∩ »«ñ»α«ú-
- αá¼¼δ ó«ºóαáΘáÑΓ π»αáó½Ñ¡¿Ñ ¡á ß½ÑñπεΘπε ßΓ᫬π. Æαáßß¿α«ó¬á
- »«ñ»α«úαá¼¼δ ºáúαπªáÑΓ ¬«ñ φΓ«⌐ »«ñ»α«úαá¼¼δ ¿ »α«ñ«½ªáÑΓ ÑÑ
- »«ßΓα«τ¡«Ñ óδ»«½¡Ñ¡¿Ñ.
-
- ÄßΓá¡«ó¬á óδ»«½¡Ñ¡¿∩
-
- æπΘÑßΓóπÑΓ ñóá ß»«ß«íá ß««íΘ¿Γ∞ IDE, τΓ« »α«úαá¼¼π ¡πª¡« óδ-
- »«½¡¿Γ∞ ñ« «»αÑñѽѡ¡«⌐ Γ«τ¬¿, á ºáΓѼ «ßΓá¡«ó¿Γ∞. ÅÑαóδ⌐ ¿ »α«ß-
- ΓÑ⌐Φ¿⌐ ß»«ß«í ß«ßΓ«¿Γ ó Γ«¼, τΓ«íδ ¡á⌐Γ¿ »«º¿µ¿ε ó »α«úαá¼¼Ñ, úñÑ
- óδ σ«Γ¿ΓÑ «ßΓá¡«ó¿Γ∞ß∩, ºáΓѼ óδíαáΓ∞ ó ¼Ñ¡ε Run ¬«¼á¡ñπ Go to
- Cursor (éδ»«½¡Ñ¡¿Ñ ñ« »«º¿µ¿¿ ¬παß«αá). éáΦá »α«úαá¼¼á óδ»«½¡∩ÑΓ-
- ß∩ ¬á¬ «íδτ¡«, »«¬á ¡Ñ ñ«ßΓ¿ú¡ÑΓ «»ÑαáΓ«αá, úñÑ «¡á ñ«½ª¡á «ßΓá-
- ¡«ó¿Γ∞ß∩. é φΓ«⌐ Γ«τ¬Ñ óδ ¼«ªÑΓÑ »α«óÑα¿Γ∞ º¡áτÑ¡¿∩ ¿ »α«ñ«½ªáΓ∞
- óδ»«½¡Ñ¡¿Ñ ¡Ñ»αÑαδó¡« ¿½¿ »« Φáúá¼.
-
- éΓ«α«⌐ ß»«ß«í ß«ßΓ«¿Γ ó Γ«¼, τΓ«íδ «ßΓá¡«ó¿Γ∞ ó «»αÑñѽѡ¡«⌐
- ºáñá¡¡«⌐ Γ«τ¬Ñ óáΦπ »α«úαá¼¼π. ¥Γá Γ«τ¬á ¡áºδóáÑΓß∩ Γ«τ¬«⌐ «ßΓá-
- ¡«óá. è«úñá óδ óδ»«½¡∩ÑΓÑ »α«úαá¼¼π, «¡á «ßΓá¡áó½¿óáÑΓß∩ »ÑαÑñ
- óδ»«½¡Ñ¡¿Ñ¼ «»ÑαáΓ«αá ó Γ«τ¬Ñ «ßΓá¡«óá. Æ«τ¬¿ «ßΓá¡«óá - φΓ« í«-
- ½ÑÑ ú¿í¬¿⌐ ¼Ñσá¡¿º¼, τѼ ¿ß»«½∞º«óá¡¿Ñ ¼ÑΓ«ñá óδ»«½¡Ñ¡¿∩ ñ« »«º¿-
- µ¿¿ ¬παß«αá (Go to Cursor), »«ß¬«½∞¬π ó »α«úαá¼¼Ñ óδ ¼«ªÑΓÑ πßΓá-
- ¡«ó¿Γ∞ ¡Ñ߬«½∞¬« Γ«τѬ «ßΓá¡«óá.
-
- ÄΓ߽Ѫ¿óá¡¿Ñ ¿ ¼«ñ¿Σ¿¬áµ¿∩
-
- Åα¿ óδ»«½¡Ñ¡¿¿ »α«úαá¼¼δ »« Φáúá¼ óδ ¼«ªÑΓÑ ¡áí½εñáΓ∞ ÑÑ óδ-
- ó«ñ ¡Ñ߬«½∞¬¿¼¿ ß»«ß«íἿ. ÅÑαóδ⌐ ß«ßΓ«¿Γ ó »ÑαѬ½ετÑ¡¿¿ ó ß½πτáÑ
- ¡Ñ«íσ«ñ¿¼«ßΓ¿ φ¬αá¡«ó. Åα¿ óΓ«α«¼ ß»«ß«íÑ ¿ß»«½∞ºπÑΓß∩ óΓ«α«⌐ ¼«-
- ¡¿Γ«α. é-ΓαÑΓ∞¿σ, ñ½∩ óδó«ñá »α«úαá¼¼δ óδ ¼«ªÑΓÑ «Γ¬αδΓ∞ «¬¡« ó
- IDE ñ½∩ DOS.
-
-
- B.Pascal 7 & Objects /UG - 144 -
-
- èα«¼Ñ Γ«ú«, τΓ«íδ »«¬áºáΓ∞ óδó«ñ »α«úαá¼¼δ, óßΓα«Ñ¡¡δ⌐ «Γ-
- ½áñτ¿¬ »«ºó«½∩ÑΓ óá¼ »α«ß¼áΓα¿óáΓ∞ º¡áτÑ¡¿∩ »ÑαѼѡ¡δσ, óδαáªÑ¡¿⌐
- ¿ ßΓαπ¬Γπα ñá¡¡δσ. æ »«¼«Θ∞ε ¬«¼á¡ñδ Wathes ó ¼Ñ¡ε Debug ó «¬¡Ñ
- »α«ß¼«Γαá Watches óδ ¼«ªÑΓÑ ñ«íáó½∩Γ∞ ¿½¿ πñá½∩Γ∞ «Γ߽Ѫ¿óáѼδÑ
- φ½Ñ¼Ñ¡Γδ. é φΓ«¼ ñ¿á½«ú«ó«¼ «¬¡Ñ óδ ¼«ªÑΓÑ »α«óÑα∩Γ∞ »ÑαѼѡ¡δÑ ¿
- óδαáªÑ¡¿∩ ¿ ¿º¼Ñ¡∩Γ∞ º¡áτÑ¡¿∩ ½εíδσ »ÑαѼѡ¡δσ, ó¬½ετá∩ ßΓ᫬¿,
- π¬áºáΓѽ¿, φ½Ñ¼Ñ¡Γδ ¼áßß¿óá ¿ »«½∩ ºá»¿ßÑ⌐, τΓ« »«ºó«½∩ÑΓ óá¼
- »α«óÑα∩Γ∞ αÑᬵ¿ε »α«úαá¼¼δ ¡á αẽ¿τ¡δÑ πß½«ó¿∩.
-
- Å«¿ß¬
-
- àß½¿ óá¼ ¡πª¡« ¡á⌐Γ¿ ó »α«úαá¼¼Ñ «»¿ßá¡¿∩ »α«µÑñπαδ ¿½¿
- Σπ¡¬µ¿¿, ½¿í« «»αÑñѽѡ¿∩ «íΩѬΓá, φΓ« ½Ñú¬« ¼«ª¡« ßñѽáΓ∞ ß »«-
- ¼«Θ∞ε ßαÑñßΓóá »α«ß¼«Γαá «íΩÑ¬Γ«ó ObjectBrowser. æ »«¼«Θ∞ε ¼Ñ¡ε
- Search ¿ óδí«αá ¬«¼á¡ñ Objects, Globals, Units ¿½¿ Symbols óδíÑ-
- α¿ΓÑ ß««ΓóÑΓßΓóπεΘÑÑ «¬¡« »α«ß¼«Γαá. æ¼. â½áóπ 4 ("Åα«úαá¼¼¿α«óá-
- ¡¿Ñ ó ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñÑ ñ½∩ DOS"), úñÑ « »α«ß¼«ΓαÑ ¬«ñá αáßß-
- ¬áºδóáÑΓß∩ í«½ÑÑ »«ñα«í¡«.
-
-
-
-
- B.Pascal 7 & Objects /UG - 145 -
-
- âÑ¡Ñαᵿ∩ «Γ½áñ«τ¡«⌐ ¿¡Σ«α¼áµ¿¿
- ─────────────────────────────────────────────────────────────────
-
- ÅÑαÑñ «Γ½áñ¬«⌐ »α«úαá¼¼δ óá¼ ¡πª¡« π¬áºáΓ∞ ¬«¼»∞εΓÑαπ, τΓ«
- ¡πª¡« ß««íΘ¿Γ∞ ¬«¼»¿½∩Γ«απ ¡á ¡Ñ«íσ«ñ¿¼«ßΓ∞ úÑ¡Ñαᵿ¿ ¡Ñ¬«Γ«α«⌐
- ñ«»«½¡¿Γѽ∞¡«⌐ ¿¡Σ«α¼áµ¿¿, í½áú«ñáα∩ ¬«Γ«α«⌐ «¡ ß¼«ªÑΓ «Γ߽Ѫ¿-
- óáΓ∞, ¬á¬¿Ñ ßΓ᫬¿ ¿ßσ«ñ¡«ú« ¬«ñá ß««ΓóÑΓßΓóπεΓ «Γñѽ∞¡δ¼ τáßΓ∩¼
- óδ»«½¡∩Ѽ«⌐ »α«úαá¼¼δ. ¥Γá ñ«»«½¡¿Γѽ∞¡á∩ ¿¡Σ«α¼áµ¿∩ ¡áºδóáÑΓß∩
- «Γ½áñ«τ¡«⌐ ¿¡Σ«α¼áµ¿Ñ⌐. éδ ¼«ªÑΓÑ ó¬½ετ¿Γ∞ φΓπ ¿¡Σ«α¼áµ¿¿, óδíαáó
- ß««ΓóÑΓßΓóπεΘ¿⌐ »áαá¼ÑΓα (¬¡«»¬π ß ¡Ñºáó¿ß¿¼«⌐ Σ¿¬ßᵿÑ⌐)
- ñ¿á½«ú«ó«ú« «¬¡á Compiler Options ¿¡ΓÑúα¿α«óá¡¡«⌐ ßαÑñδ (¬«¼á¡ñá
- Options│Compiler) ¿½¿ ó¬½ετ¿ó ó ¬«ñ »α«úαá¼¼δ ß««ΓóÑΓßΓóπεΘπε ñ¿-
- αÑ¬Γ¿ó𠬫¼»¿½∩Γ«αá.
-
- è«úñá óδ ¬«¼»¿½¿απÑΓÑ »α«úαá¼¼π Borland Pascal, ¬«¼»¿½∩Γ«α
- óßÑúñá ß«σαá¡∩ÑΓ ß»¿ß«¬ ¿ß»«½∞ºπѼδσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó, ¬«Γ«αδ⌐ ¡á-
- ºδóáÑΓß∩ Γáí½¿µÑ⌐ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó. é φΓ«¼ ß»¿ß¬Ñ «Γ߽Ѫ¿óáεΓß∩
- ¿¼Ñ¡á óßÑσ »ÑαѼѡ¡δσ, ¬«¡ßΓá¡Γ, Γ¿»«ó, »α«µÑñπα ¿ Σπ¡¬µ¿⌐. ä½∩
- µÑ½Ñ⌐ «Γ½áñ¬¿ Γá¼ ß«σαá¡∩εΓß∩ Γá¬ªÑ ¡«¼Ñαá ßΓ᫬ ¿ßσ«ñ¡δσ Σá⌐½«ó,
- úñÑ óßΓαÑτáεΓß∩ óßÑ φΓ¿ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ. éδíαáó ó ñ¿á½«ú«ó«¼ «¬¡Ñ
- Compiler Options »áαá¼ÑΓα Debug Information (ÄΓ½áñ«τ¡á∩ ¿¡Σ«α¼á-
- µ¿∩) ¿½¿ ºáñáó ñ¿αÑ¬Γ¿ó𠬫¼»¿½∩Γ«αá $D+, óδ π¬áºδóáÑΓÑ ¬«¼»¿½∩-
- Γ«απ, τΓ« ó Γáí½¿µπ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó ¡πª¡« ñ«íáó¿Γ∞ ¿¡Σ«α¼áµ¿ε «
- ¡«¼Ñαáσ ßΓ᫬.
-
- éßΓα«Ñ¡¡á∩ ¿ áóΓ«¡«¼¡á∩ «Γ½áñ¬á
-
- é ñ¿á½«ú«ó«¼ «¬¡Ñ »áαá¼ÑΓα«ó «Γ½áñτ¿¬á Debugger Options
- (Options│Debugger) óδ ¼«ªÑΓÑ ß««íΘ¿Γ∞ ¬«¼»¿½∩Γ«απ, ¡πª¡« ½¿ úÑ¡Ñ-
- α¿α«óáΓ∞ «Γ½áñ«τ¡πε ¿¡Σ«α¼áµ¿ε ñ½∩ ¿ß»«½∞º«óá¡¿∩ óßΓα«Ñ¡¡«ú« ¿½¿
- áóΓ«¡«¼¡«ú« «Γ½áñτ¿¬á (Γᬫú« ¬á¬ Turbo Debugger), ¿½¿ ñ½∩ «í«¿σ.
- àß½¿ óδ σ«Γ¿ΓÑ ¿ß»«½∞º«óáΓ∞ óßΓα«Ñ¡¡δ⌐ «Γ½áñτ¿¬, Γ« ¡πª¡« óδíαáΓ∞
- »áαá¼ÑΓα Integrated (¬«Γ«αδ⌐ πßΓá¡áó½¿óáÑΓß∩ »« π¼«½τá¡¿ε).
-
- ê¡Σ«α¼áµ¿∩ ó ¼«ñπ½∩σ
-
- àß½¿ óδ »¿ΦÑΓÑ í«½∞Φπε »α«úαá¼¼π, ¬«Γ«αá∩ ¿ß»«½∞ºπÑΓ ¼«ñπ½¿,
- ¿ «Γ½áñ«τ¡á∩ ¿¡Σ«α¼áµ¿∩ »«½πτáÑΓß∩ ß½¿Φ¬«¼ «íΩѼ¡«⌐, óδ ¼«ªÑΓÑ
- ß«¬αáΓ¿Γ∞ «íΩѼ φΓ«⌐ ¿¡Σ«α¼áµ¿¿ ñ½∩ «Γñѽ∞¡δσ ¼«ñπ½Ñ⌐, ¿ß»«½∞ºπ∩
- ó ¡¿σ ñ¿αÑ¬Γ¿ó𠬫¼»¿½∩Γ«αá $L- ¿½¿ «Γ¼Ñ¡¿ó ó ñ¿á½«ú«ó«¼ «¬¡Ñ
- Compiler Options »áαá¼ÑΓα Local Symbols (ê¡Σ«α¼áµ¿∩ « ½«¬á½∞¡δσ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ).
-
- àß½¿ óδ ó䬽ετ¿ΓÑ ñ½∩ ¼«ñπ½∩ úÑ¡Ñαáµ¿ε ¿¡Σ«α¼áµ¿¿ « ½«¬á½∞-
- ¡δσ ¿ñÑ¡Γ¿Σ¿¬áΓ«αáσ, Γ« ¿º «Γ½áñ«τ¡«⌐ ¿¡Σ«α¼áµ¿¿ ñ½∩ φΓ«ú« ¼«ñπ½∩
- ¿ß¬½ετáεΓß∩ óßÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, «»¿ßá¡¡δÑ ó ßѬµ¿¿ αÑ὿ºáµ¿¿ ¼«-
- ñπ½∩. ä½∩ óßÑσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó ó ¿¡ΓÑαΣÑ⌐ß¡«⌐ ßѬµ¿¿ íπñÑΓ úÑ¡Ñ-
- α¿α«óáΓ∞ß∩ ¿¡Σ«α¼áµ¿ε ñ½∩ óßÑσ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó, ΓᬠτΓ« óδ ß¼«ªÑ-
- ΓÑ ¿ß»«½∞º«óáΓ∞ ßαÑñßΓóá «Γ½áñ¬¿.
-
-
-
-
- B.Pascal 7 & Objects /UG - 146 -
-
- ô»αáó½Ñ¡¿Ñ óδ»«½¡Ñ¡¿Ñ¼
- ─────────────────────────────────────────────────────────────────
-
- Äß¡«ó¡«⌐ ß¼δß½ ¿ß»«½∞º«óá¡¿∩ óßΓα«Ñ¡¡«ú« «Γ½áñτ¿¬á ß«ßΓ«¿Γ ó
- π»αáó½∩Ѽ«¼ óδ»«½¡Ñ¡¿¿. ÄΓ߽Ѫ¿óá∩ óδ»«½¡Ñ¡¿Ñ ¬áªñ«⌐ ¿¡ßΓαπ¬µ¿¿,
- óδ ¼«ªÑΓÑ ½Ñú¬« «»αÑñѽ¿Γ∞, ¬á¬á∩ τáßΓ∞ óáΦÑ⌐ »α«úαá¼¼δ óδºδóáÑΓ
- »α«í½Ñ¼δ. é «Γ½áñτ¿¬Ñ »αÑñπß¼«ΓαÑ¡« »∩Γ∞ «ß¡«ó¡δσ ¼Ñσá¡¿º¼«ó π»-
- αáó½Ñ¡¿∩ óδ»«½¡Ñ¡¿Ñ¼ »α«úαá¼¼δ, ¬«Γ«αδÑ »«ºó«½∩εΓ óá¼:
-
- - óδ»«½¡∩Γ∞ ¿¡ßΓαπ¬µ¿¿ »« Φáúá¼;
- - Γαáßß¿α«óáΓ∞ ¿¡ßΓαπ¬µ¿¿;
- - óδ»«½¡∩Γ∞ »α«úαá¼¼π ñ« ºáñá¡¡«⌐ Γ«τ¬¿;
- - ¡áσ«ñ¿Γ∞ «»αÑñѽѡ¡πε Γ«τ¬π;
- - óδ»«½¡∩Γ∞ ßíα«ß »α«úαá¼¼δ.
-
- æá¼« »« ßÑíÑ óδ»«½¡Ñ¡¿Ñ »α«úαá¼¼δ »« Φáúá¼ ¼«ªÑΓ íδΓ∞ ¡Ññ«ß-
- ΓáΓ«τ¡« »«½Ñº¡δ¼, αáºóÑ τΓ« »«¼«ªÑΓ ¡á⌐Γ¿ Γ« ¼ÑßΓ«, úñÑ τΓ«-Γ«
- »α«¿ßσ«ñ¿Γ ß«óÑαΦÑ¡¡« ¡ÑóÑα¡«. ì« π»αáó½∩Ѽ«Ñ óδ»«½¡Ñ¡¿Ñ ñáÑΓ óá¼
- 󫺼«ª¡«ßΓ∞ »α«óÑα∩Γ∞ ß«ßΓ«∩¡¿Ñ »α«úαá¼¼δ ¿ ÑÑ ñá¡¡δσ, ¡á»α¿¼Ñα,
- «Γ߽Ѫ¿óáΓ∞ óδó«ñ »α«úαá¼¼δ ¿ ÑÑ »ÑαѼѡ¡δÑ, ¬á¬ «»¿ßδóáÑΓß∩ ó
- ñá¡¡«⌐ ú½áóÑ.
-
-
-
-
- B.Pascal 7 & Objects /UG - 147 -
-
- ùΓ« Γá¬«Ñ Φáú?
- ─────────────────────────────────────────────────────────────────
-
- è«úñá óδ «Γ½áª¿óáÑΓÑ »α«úαá¼¼π, ¡á¿¼Ñ¡∞Φ¿¼ óδ»«½¡∩Ñ¼δ¼ φ½Ñ-
- ¼Ñ¡Γ«¼ ∩ó½∩ÑΓß∩ ßΓ᫬á. ¥Γ«Γ «º¡áτáÑΓ, τΓ« óδ ¼«ªÑΓÑ π»αáó½∩Γ∞
- «Γ½áñ¬«⌐ ñ« πα«ó¡∩ «Γñѽ∞¡«⌐ ßΓ᫬¿ ¿ßσ«ñ¡«ú« ¬«ñá »α«úαá¼¼δ. Å«-
- φΓ«¼π, Ñß½¿ ¡á «ñ¡«⌐ ßΓα«¬Ñ »α«úαá¼¼δ ß«ñÑনΓß∩ ¡Ñ߬«½∞¬« «»Ñαá-
- Γ«α«ó Åá߬á½∩, óδ ¡Ñ ß¼«ªÑΓÑ «Γ½áñ¿Γ∞ φΓ¿ «»ÑαáΓ«αδ ¿¡ñ¿ó¿ñπá½∞-
- ¡«. æ ñαπú«⌐ ßΓ«α«¡δ, ß µÑ½∞ε «Γ½áñ¬¿ óδ ¼«ªÑΓÑ αáºí¿Γ∞ «»ÑαáΓ«α
- ¡á ¡Ñ߬«½∞¬« ßΓ᫬, ¬«Γ«αδÑ íπñπΓ óδ»«½¡∩Γ∞ß∩ ºá «ñ¿¡ Φáú.
-
- éßÑ óδ»«½¡Ñ¡¿Ñ ó «Γ½áñτ¿¬Ñ, ó¬½ετá∩ óδ»«½¡Ñ¡¿Ñ »« Φáúá¼,
- Γαáßß¿α«ó¬π ¿ «ßΓá¡«ó, «ß¡«óδóáÑΓß∩ ¡á ßΓ᫬áσ. Å«ñßóÑτ¿óá∩ ßΓα«-
- ¬π, óßΓα«Ñ¡¡δ⌐ «Γ½áñτ¿¬ óßÑúñá ß««íΘáÑΓ óá¼, ¬á¬πε ßΓ᫬π óδ óδ-
- »«½¡∩ÑΓÑ ß½ÑñπεΘÑ⌐ (ßΓ᫬á óδ»«½¡Ñ¡¿∩). æΓ᫬á óδ»«½¡Ñ¡¿∩ óδó«-
- ñ¿Γß∩ µóÑΓ«¼, «Γ½¿τ¡δ¼ «Γ ¡«α¼á½∞¡«ú« µóÑΓá. ü½áú«ñáα∩ φΓ«¼π óδ
- ¼«ªÑΓÑ ½Ñú¬« ó¿ñÑΓ∞, úñÑ ¡áσ«ñ¿ΓÑß∞.
-
-
- éδ»«½¡Ñ¡¿Ñ »α«úαá¼¼δ »« Φáúá¼
- ─────────────────────────────────────────────────────────────────
-
- éδ»«½¡Ñ¡¿Ñ »« Φáúá¼ - φΓ« »α«ßΓÑ⌐Φ¿⌐ ß»«ß«í óδ»«½¡Ñ¡¿∩ »α«ú-
- αá¼¼δ »« φ½Ñ¼Ñ¡Γáα¡δ¼ Σαáú¼Ñ¡Γá¼. éδí«α ¬«¼á¡ñδ Run│Step Over ¿½¿
- ¡áªáΓ¿Ñ ¬½áó¿Φ¿ F8 óδºδóáÑΓ óδ»«½¡Ñ¡¿Ñ «Γ½áñτ¿¬«¼ óßÑú« ¬«ñá ó
- «»ÑαáΓ«αÑ, π¬áºá¡¡«¼ ßΓ᫬«⌐ óδ»«½¡Ñ¡¿∩, ó¬½ετá∩ ½εíδÑ óδºδóáѼδÑ
- ¡á ¡Ñ⌐ »α«µÑñπαδ ¿½¿ Σπ¡¬µ¿¿, »«¬á π»αáó½Ñ¡¿Ñ ¡Ñ óÑα¡ÑΓß∩ «íαáΓ¡«
- ¬ óá¼. Å«ß½Ñ φΓ«ú« ßΓ᫬á óδ»«½¡Ñ¡¿∩ π¬áºδóáÑΓ ß½ÑñπεΘ¿⌐ óδ»«½¡∩-
- Ѽδ⌐ «»ÑαáΓ«α.
-
- 髺∞¼Ñ¼, ¡á»α¿¼Ñα, ß½ÑñπεΘ¿⌐ »α¿¼Ñα »α«úαá¼¼δ:
-
- program StepTest;
-
- function Negate(X: Integer): Integer;
- begin
- Negate := -X;
- end;
-
- var
- I: Integer;
- begin
- for I := 1 to 10 do Writeln(Negate(I));
- end.
-
- Åα¿¼Ñα 6.1 Åα«ßΓá∩ »α«úαá¼¼á, óδ»«½¡∩Ѽá∩ »« Φáúá¼.
-
- àß½¿ ó «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩ óδ óδóÑñ¿ΓÑ StepTest ¿ ¡áª¼ÑΓÑ
- ¬½áó¿Φπ F8, Γ« ßΓ᫬á óδ»«½¡Ñ¡¿∩ »ÑαѼÑΘáÑΓß∩ ¡á «»ÑαáΓ«α begin ó
- ¡áτá½Ñ «ß¡«ó¡«ú« µ¿¬½á, »«ß¬«½∞¬π φΓ« »Ñαó«Ñ, τΓ« óδ»«½¡∩ÑΓß∩ ó
- »α«úαá¼¼Ñ. éΓ«α«Ñ ¡áªáΓ¿Ñ ¬½áó¿Φ¿ F8 óδ»«½¡∩ÑΓ begin ¿ »ÑαѼÑΘáÑΓ
- ßΓ᫬π óδ»«½¡Ñ¡¿∩ 󡿺 ñ« «»ÑαáΓ«αá for ¡á ß½ÑñπεΘÑ⌐ ßΓ᫬Ñ. Å«ß-
- ½Ñ φΓ«ú« ¡áªáΓ¿Ñ F8 óδºδóáÑΓ óδ»«½¡Ñ¡¿Ñ óßÑú« µ¿¬½á for; ¡á φ¬αá¡
-
- B.Pascal 7 & Objects /UG - 148 -
-
- »«½∞º«óáΓѽ∩ óδó«ñ∩Γß∩ τ¿ß½á «Γ -1 ñ« -10, á ßΓ᫬á óδ»«½¡Ñ¡¿∩
- »ÑαѼÑΘáÑΓß∩ ¬ end.
-
- ò«Γ∩ Σπ¡¬µ¿∩ Negate óδºδóáÑΓß∩ 10 αáº, ßΓ᫬á óδ»«½¡Ñ¡¿∩ ¡¿-
- ¬«úñá ¡á ¡ÑÑ ¡Ñ »ÑαѼÑΘáÑΓß∩. éδ»«½¡Ñ¡¿Ñ »« Φáúá¼ »«ºó«½∩ÑΓ «Γ-
- ½áñτ¿¬π ¡Ñ »«¬áºδóáΓ∞ ñÑΓ὿ ½εíδσ ó맮ó«ó ñ½∩ «Γñѽ∞¡«⌐ ßΓ᫬¿.
- éδ»«½¡Ñ¡¿Ñ »« Φáúá¼ óδºδóáÑΓ óδ»«½¡Ñ¡¿Ñ óßÑú« µ¿¬½á for ßαáºπ,
- »«φΓ«¼π óδ ¡Ñ ß¼«ªÑΓÑ ó¿ñÑΓ∞ ¿º¼Ñ¡Ñ¡¿∩ ó σ«ñÑ óδ»«½¡Ñ¡¿∩ µ¿¬½á.
- àß½¿ óδ σ«Γ¿ΓÑ ó¿ñÑΓ∞ »«ñα«í¡«ßΓ¿ µ¿¬½á, ó¡Ñß¿ΓÑ ó »α¿¼Ñα ß½Ññπε-
- ΘÑÑ »α«ßΓ«Ñ ¿º¼Ñ¡Ñ¡¿Ñ.
-
- begin
- for I := 1 to 10 do
- Writeln(Negate(I));
- end.
-
- Åα¿¼Ñα 6.2 꺼ѡѡ¿Ñ Σ«α¼áΓá ¬«ñá ñ½∩ ½πτΦÑú« óδ»«½¡Ñ¡¿∩ »«
- Φáúá¼.
-
- ū߬«½∞¬π «»ÑαáΓ«α Åá߬á½∩ ¼«ªÑΓ ºá¡¿¼áΓ∞ ¡Ñ߬«½∞¬« ßΓ᫬,
- Γá¬á∩ »α«úαá¼¼á íπñÑΓ ó Γ«τ¡«ßΓ¿ φ¬ó¿óá½Ñ¡Γ¡á »αÑñδñπΘÑ⌐ óÑαß¿¿,
- á úÑ¡Ñα¿απѼδ⌐ ¬«ñ íπñÑΓ ¿ñÑ¡Γ¿τÑ¡. ì« »«ß¬«½∞¬π «»ÑαáΓ«α Writeln
- ΓÑ»Ñα∞ ¡áσ«ñ¿Γß∩ ¡á «Γñѽ∞¡«⌐ ßΓ᫬Ñ, «Γ½áñτ¿¬ ¼«ªÑΓ ¿¡ΓÑα»αÑΓ¿-
- α«óáΓ∞ Ñú« «Γñѽ∞¡«. àß½¿ ΓÑ»Ñα∞ óδ íπñÑΓÑ ¡áª¿¼áΓ∞ ¬½áó¿Φπ F8,
- Γ« πó¿ñ¿ΓÑ, τΓ« ßΓ᫬á óδ»«½¡Ñ¡¿∩ íπñÑΓ »α¿ óδ»«½¡Ñ¡¿¿ µ¿¬½á 10
- αẠó«ºóαáΘáΓ∞ß∩ ¡á Writeln.
-
-
-
-
- B.Pascal 7 & Objects /UG - 149 -
-
- Æαáßß¿α«ó¬á »α«úαá¼¼δ
- ─────────────────────────────────────────────────────────────────
-
- Æαáßß¿α«ó¬á »α«úαá¼¼δ ó« ¼¡«ú«¼ á¡á½«ú¿τ¡á∩ ÑÑ óδ»«½¡Ñ¡¿ε »«
- Φáúá¼. àñ¿¡ßΓóÑ¡¡«Ñ ¿ß¬½ετÑ¡¿Ñ ß«ßΓ«¿Γ ó Γ«¼, τΓ« ¬«úñá óßΓαÑτá-
- ÑΓß∩ «»ÑαáΓ«α ó맮óá »α«µÑñπαδ ¿½¿ Σπ¡¬µ¿¿, »α¿ Γαáßß¿α«ó¬Ñ φΓ¿
- »α«µÑñπαδ ¿ Σπ¡¬µ¿¿ Γá¬ªÑ óδ»«½¡∩εΓß∩ »« Φáúá¼, á »α¿ »α«ßΓ«¼ óδ-
- »«½¡Ñ¡¿¿ »« Φáúá¼ π»αáó½Ñ¡¿Ñ ó«ºóαáΘáÑΓß∩ óá¼ »«ß½Ñ ºáóÑαΦÑ¡¿∩
- óδ»«½¡Ñ¡¿∩ »«ñ»α«úαá¼¼δ.
-
- ìá»α¿¼Ñα, τΓ«íδ óδ»«½¡¿Γ∞ Γαáßß¿α«ó¬π ¬«ñá ó Åα¿¼ÑαÑ 6.1,
- ºáúαπº¿ΓÑ Σá⌐½, ºáΓѼ óδíÑα¿ΓÑ ¬«¼á¡ñπ Run│Trace Into ¿½¿ ¡áª¼¿ΓÑ
- ¬½áó¿Φπ F7. è«úñá óδ ó »Ñαóδ⌐ αẠñѽáÑΓÑ φΓ«, π»αáó½Ñ¡¿Ñ »ÑαѼÑ-
- ΘáÑΓß∩ ¡á «»ÑαáΓ«α begin «ß¡«ó¡«⌐ »α«úαá¼¼δ. Å«óΓ«α¡«Ñ ¡áªáΓ¿Ñ F7
- ß¡«óá »ÑαѼÑΘáÑΓ ßΓ᫬π π»αáó½Ñ¡¿∩ ¡á «»ÑαáΓ«α for. Å«ß½Ñ φΓ«ú«
- ¡áªáΓ¿Ñ ¬½áó¿Φ¿ F7 Γαáßß¿απÑΓ ó맮ó Σπ¡¬µ¿¿ Negate - ßΓ᫬á óδ-
- »«½¡Ñ¡¿∩ »ÑαѼÑΘáÑΓß∩ ¡á «»ÑαáΓ«α begin ó í½«¬Ñ Σπ¡¬µ¿¿. àß½¿ óδ
- »α«ñ«½ªáÑΓÑ ¡áª¿¼áΓ∞ F7, ßΓ᫬á óδ»«½¡Ñ¡¿∩ »ÑαѼÑΘáÑΓß∩ »« Σπ¡¬-
- µ¿¿, á ºáΓѼ, ¬«úñá óδ ñ«⌐ñÑΓÑ ñ« «»ÑαáΓ«αá end, ó«ºóαáΘáÑΓß∩ ¬
- «»ÑαáΓ«απ ó맮óá.
-
- ö«α¼áΓ óáΦÑ⌐ »α«úαá¼¼δ ó½¿∩ÑΓ ¡á »«óÑñÑ¡¿Ñ ßΓ᫬¿ óδ»«½¡Ñ¡¿∩
- »α¿ Γαáßß¿α«ó¬Ñ, σ«Γ∩ ¿ ¡Ñ ó Γᬫ⌐ ßΓѻѡ¿ ¬á¬ »α¿ »«Φáú«ó«¼ óδ-
- »«½¡Ñ¡¿¿. àß½¿ ¬«ñ ßΣ«α¼áΓ¿α«óá¡ ¬á¬ ó Åα¿¼ÑαÑ 6.1, Γ« Γαáßß¿α«ó-
- ¬á «»ÑαáΓ«αá for »α¿ó«ñ¿Γ ¬ óδ»«½¡Ñ¡¿ε 10 αẠΣπ¡¬µ¿¿ Negate. àß-
- ½¿ óδ αẫíΩÑΓÑ «»ÑαáΓ«α for ¡á ñóÑ ßΓ᫬¿, ¬á¬ ó Åα¿¼ÑαÑ 6.2, Γ«
- Γαáßß¿α«ó¬á «»ÑαáΓ«αá end Σπ¡¬µ¿¿ ó«ºóαáΘáÑΓ ßΓ᫬π óδ»«½¡Ñ¡¿∩ Γπ
- ßΓ᫬π «ß¡«ó¡«⌐ »α«úαá¼¼δ, ¬«Γ«αá∩ íπñÑΓ óδ»«½¡∩Γ∞ß∩ ß½ÑñπεΘÑ⌐.
- ÅÑαóδÑ ñÑó∩Γ∞ αẠφΓ« ß¡«óá íπñÑΓ ó맮ó Σπ¡¬µ¿¿. é ñÑß∩Γδ⌐ αáº
- ßΓ᫬á óδ»«½¡Ñ¡¿∩ »ÑαѼÑΘáÑΓß∩ ¡á «»ÑαáΓ«α end »α«úαá¼¼δ.
-
-
- Æαáßß¿α«ó¬á ¿½¿ óδ»«½¡Ñ¡¿Ñ »« Φáúá¼?
- ─────────────────────────────────────────────────────────────────
-
- Å«Φáú«ó«Ñ óδ»«½¡Ñ¡¿Ñ ¿½¿ Γαáßß¿α«ó¬á óδ»«½¡∩ÑΓ «ñ¡« ¿ Γ« ªÑ
- ñÑ⌐ßΓó¿Ñ, ¬α«¼Ñ Γ«ú« ß½πτá∩, ¬«úñá ßΓ᫬á óδ»«½¡Ñ¡¿∩ ¡áσ«ñ¿Γß∩
- »«ñ ßΓ᫬«⌐ ó맮óá »α«µÑñπαδ ¿½¿ Σπ¡¬µ¿¿, ¿½¿ ¬«úñá óδ óδ»«½¡∩ÑΓÑ
- «»ÑαáΓ«α begin ó ¡áτá½Ñ »α«úαá¼¼δ ¿½¿ ¼«ñπ½∩, ¬«Γ«αδ⌐ ¿ß»«½∞ºπÑΓ
- ñαπú¿Ñ ¼«ñπ½¿.
-
- éδ»«½¡Ñ¡¿Ñ begin ó í½«¬Ñ begin..end «ß¡«ó¡«⌐ »α«úαá¼¼δ óδºδ-
- óáÑΓ ¬«ñ ¿¡¿µ¿á½¿ºáµ¿¿ ñ½∩ ½εí«ú« ¿ß»«½∞ºπѼ«ú« ó »α«úαá¼¼Ñ ¼«ñπ-
- ½∩ ó Γ«¼ »«α∩ñ¬Ñ, ¬«Γ«αδ⌐ π¬áºδóáÑΓß∩ ó «»ÑαáΓ«αÑ uses »α«úαá¼¼δ.
- ǡὫú¿τ¡«, óδ»«½¡Ñ¡¿Ñ «»ÑαáΓ«αá begin ó ¡áτá½Ñ ßѬµ¿¿ ¿¡¿µ¿á½¿-
- ºáµ¿¿ óδºδóáÑΓ ¬«ñ ¿¡¿µ¿á½¿ºáµ¿¿ ñ½∩ ½εíδσ ¼«ñπ½Ñ⌐, ¿ß»«½∞ºπѼδσ
- ó ñá¡¡«¼ ¼«ñπ½Ñ. éδ»«½¡Ñ¡¿Ñ »« Φáúá¼ ¿ Γαáßß¿α«ó¬á αáí«ΓáÑΓ ó
- φΓ¿σ ß½πτá∩σ ¬á¬ ¿ ¼«ª¡« «ª¿ñáΓ∞ - »«Φáú«ó«Ñ óδ»«½¡Ñ¡¿Ñ begin óδ-
- »«½¡∩ÑΓ óßε ¿¡¿µ¿á½¿ºáµ¿ε, ó«ºóαáΘá∩ π»αáó½Ñ¡¿Ñ ¡á ß½ÑñπεΘ¿⌐ «»Ñ-
- αáΓ«α Γ«½∞¬« »«ß½Ñ Γ«ú«, ¬á¬ óßÑ íπñÑΓ ºáóÑαΦÑ¡«; »α¿ Γαáßß¿α«ó¬Ñ
- óδ»«½¡∩ÑΓß∩ Γαáßß¿α«ó¬á ¬«ñá ¿¡¿µ¿á½¿ºáµ¿¿.
-
- Åα¿¼Ñτá¡¿Ñ: Ä ¼«ñπ½∩σ ¿ ¿σ ßѬµ¿∩σ ¿¡¿µ¿á½¿ºáµ¿¿ αáßß-
-
- B.Pascal 7 & Objects /UG - 150 -
-
- ¬áºδóáÑΓß∩ ó â½áóÑ 7 "î«ñ㫨 Borland Pascal".
-
- Å«Φáú«ó«Ñ óδ»«½¡Ñ¡¿Ñ ¿ Γαáßß¿α«ó¬á ¼ÑΓ«ñ«ó «íΩÑ¬Γ«ó
-
- àß½¿ óδ ¿ß»«½∞ºπÑΓÑ ó ßó«Ñ⌐ »α«úαá¼¼Ñ «íΩѬΓδ, «Γ½áñτ¿¬ ¿¡-
- ΓÑα»αÑΓ¿απÑΓ ßó«¿ ¼ÑΓ«ñδ á¡á½«ú¿τ¡« Γ«¼π, ¬á¬ «¡ ¿¡ΓÑα»αÑΓ¿απÑΓ
- «íδτ¡δÑ »α«µÑñπαδ ¿ Σπ¡¬µ¿¿. Å«Φáú«ó«Ñ óδ»«½¡Ñ¡¿Ñ ¼ÑΓ«ñá ¿¡ΓÑα»-
- αÑΓ¿απÑΓ ¼ÑΓ«ñ ¬á¬ «ñ¿¡ Φáú, ó«ºóαáΘá∩ π»αáó½Ñ¡¿Ñ ¬ «Γ½áñτ¿¬π
- »«ß½Ñ Γ«ú« ¬á¬ ¼ÑΓ«ñ ºáóÑαΦáÑΓ óδ»«½¡Ñ¡¿Ñ. Æαáßß¿α«ó¬á ¼ÑΓ«ñá
- ºáúαπªáÑΓ ¿ óδó«ñ¿Γ ¡á φ¬αá¡ ¬«ñ ¼ÑΓ«ñá ¿ Γαáßß¿απÑΓ Ñú« «»ÑαáΓ«-
- αδ.
-
- Å«Φáú«ó«Ñ óδ»«½¡Ñ¡¿Ñ ¿ Γαáßß¿α«ó¬á ó¡ÑΦ¡Ñú« ¬«ñá
-
- àß½¿ óδ óδ»«½¡∩ÑΓÑ ó »α«úαá¼¼Ñ ¬«¼»«¡«ó¬π ß ó¡ÑΦ¡¿¼ ¬«ñ«¼,
- ¿ß»«½∞ºπ∩ ñ½∩ φΓ«ú« ñ¿αÑ¬Γ¿ó𠬫¼»¿½∩Γ«αá {$L ¿¼∩_Σá⌐½á}, Γ« Ñß½¿
- ¬«¼»«¡πѼδ⌐ Σá⌐½ .OBJ ß«ñÑαª¿Γ «Γ½áñ«τ¡πε ¿¡Σ«α¼áµ¿ε, óδ ¼«ªÑΓÑ
- Γαáßß¿α«óáΓ∞ φëà ¬«ñ ¿½¿ óδ»«½¡∩Γ∞ Ñú« »« Φáúá¼. Borland Pascal
- ¡¿τÑú« ¡Ñ º¡áÑΓ «í «Γ½áª¿óáѼ«¼ óἿ ¬«ñÑ ó φΓ¿σ ¼«ñπ½∩σ, ¡« «¡
- íπñÑΓ »«¬áºδóáΓ∞ óá¼ ß««ΓóÑΓßΓóπεΘ¿Ñ ßΓ᫬¿ ó ¿ßσ«ñ¡«¼ ¬«ñÑ.
-
- Åα¿¼Ñτá¡¿Ñ: ÆαÑí«óá¡¿∩ ¬ ó¡ÑΦ¡Ñ¼π ¬«ñπ »«∩ß¡∩εΓß∩ ó
- â½áóÑ 25 "Éπ¬«ó«ñßΓóá »« ∩ºδ¬π".
-
- éδ ¼«ªÑΓÑ «Γ½áª¿óáΓ∞ ó¡ÑΦ¡¿⌐ ¬«ñ, ¡á»¿ßá¡¡δ⌐ ¡á ½εí«¼ ∩ºδ¬Ñ,
- ó¬½ετá∩ æ¿, æ++ ¿ áßßѼí½Ñα. àß½¿ ¬«ñ «ΓóÑτáÑΓ ΓαÑí«óá¡¿∩¼ ñ½∩
- ó¡ÑΦ¡Ñ⌐ ¬«¼»«¡«ó¬¿ ¿ ß«ñÑαª¿Γ »«½¡πε ßΓá¡ñáαΓ¡πε «Γ½áñ«τ¡πε ¿¡-
- Σ«α¼áµ¿ε, ¿¡ΓÑúα¿α«óá¡¡á∩ ßαÑñá «Γ½áñτ¿¬á ¼«ªÑΓ óδ»«½¡∩Γ∞ Ñú« »«
- Φáúá¼ ¿½¿ Γαáßß¿α«óáΓ∞.
-
-
-
-
- B.Pascal 7 & Objects /UG - 151 -
-
- éδ»«½¡Ñ¡¿Ñ í«½∞Φ¿σ Σαáú¼Ñ¡Γ«ó
- ─────────────────────────────────────────────────────────────────
-
- ê¡«úñá, ¬«¡Ñτ¡«, ¡ÑªÑ½áΓѽ∞¡« óδ»«½¡∩Γ∞ »« Φáúá¼ óßε »α«ú-
- αá¼¼π Γ«½∞¬« ñ½∩ Γ«ú«, τΓ«íδ ñ«íαáΓ∞ß∩ ñ« Γ«ú« ¼ÑßΓá, úñÑ ó«º¡¿-
- ¬áÑΓ »α«í½Ñ¼á. ÄΓ½áñτ¿¬ ñáÑΓ óἠ󫺼«ª¡«ßΓ∞ óδ»«½¡∩Γ∞ ßαáºπ
- í«½∞Φ«⌐ Σαáú¼Ñ¡Γ »α«úαá¼¼δ ñ« Γ«⌐ Γ«τ¬¿, úñÑ óδ σ«Γ¿ΓÑ ¡áτáΓ∞ óδ-
- »«½¡Ñ¡¿Ñ »« Φáúá¼.
-
- ùΓ«íδ ºáñáΓ∞ ó »α«úαá¼¼Ñ Γ«τ¬π, ñ« ¬«Γ«α«⌐ óδ σ«Γ¿ΓÑ ÑÑ óδ-
- »«½¡¿Γ∞, á ºáΓѼ «ßΓá¡«ó¿Γ∞ß∩, ¿ß»«½∞ºπ⌐ΓÑ ¬«¼á¡ñπ Run│Go To
- Cursor (éδ»«½¡Ñ¡¿Ñ│éδ»«½¡Ñ¡¿Ñ ñ« ¬παß«αá) ¿½¿ ¬½áó¿Φπ F4. (¥Γ¿¼
- óδ ß««íΘ¿ΓÑ «Γ½áñτ¿¬π, τΓ« ¡Ñ σ«Γ¿ΓÑ óδ»«½¡∩Γ∞ »α«úαá¼¼π »« Φá-
- úá¼, »«¬á ¡Ñ ñ«ßΓ¿ú¡ÑΓÑ ºáñá¡¡«⌐ Γ«τ¬¿.) Å«º¿µ¿«¡¿απ⌐ΓÑ ¬παß«α ¡á
- Γ«⌐ ßΓ᫬Ñ, úñÑ óδ σ«Γ¿ΓÑ ó«º«í¡«ó¿Γ∞ π»αáó½Ñ¡¿Ñ «Γ½áñ¬«⌐, ºáΓѼ
- ¡áª¼¿ΓÑ ¬½áó¿Φπ F4. çá¼ÑΓ¿¼, τΓ« óδ ¼«ªÑΓÑ ßñѽáΓ∞ φΓ« ¬á¬ ó ¡á-
- τá½Ñ ßÑá¡ßá «Γ½áñ¬¿, Γᬠ¿ ¬«úñá πªÑ óδ»«½¡¿ΓÑ τáßΓ∞ »α«úαá¼¼δ »«
- Φáúá¼ ¿½¿ »α«Γαáßß¿απÑΓÑ.
-
-
- Å«¿ß¬ ¡πª¡«ú« ¼ÑßΓá
- ─────────────────────────────────────────────────────────────────
-
- IDE »αÑñπß¼áΓα¿óáÑΓ ñóá ß»«ß«íá »«¿ß¬á ó »α«úαá¼¼Ñ ºáñá¡¡«ú«
- ¼ÑßΓá. Åα«ßΓÑ⌐Φ¿⌐ ß»«ß«í »αÑñ«ßΓáó½∩ÑΓ ¬«¼á¡ñá Find Procedure ¼Ñ-
- ¡ε Search. 諼á¡ñá Find Procedure (Å«¿ß¬ »α«µÑñπαδ) ºá»αáΦ¿óáÑΓ π
- óáß ¿¼∩ »α«µÑñπαδ ¿½¿ Σπ¡¬µ¿¿, ºáΓѼ ¡áσ«ñ¿Γ ß««ΓóÑΓßΓóπεΘπε
- ßΓ᫬π ó Σá⌐½Ñ, úñÑ «»αÑñѽ∩ÑΓß∩ φΓá »«ñ»α«úαá¼¼á. ¥Γ«Γ »«ñσ«ñ
- »«½Ñº¡« ¿ß»«½∞º«óáΓ∞ »α¿ αÑñá¬Γ¿α«óá¡¿¿, ¡« Ñú« ¼«ª¡« ¬«¼í¿¡¿α«-
- óáΓ∞ ß ó«º¼«ª¡«ßΓ∞ε óδ»«½¡Ñ¡¿∩ »α«úαá¼¼δ ñ« «»αÑñѽѡ¡«⌐ Γ«τ¬¿,
- τΓ«íδ »α«⌐Γ¿ »α«úαá¼¼π ñ« Γ«⌐ τáßΓ¿ ¬«ñá, ¬«Γ«απε óδ σ«Γ¿ΓÑ «Γ½á-
- ñ¿Γ∞.
-
- 髺óαáΓ
-
- ê¡«úñá ó σ«ñÑ «Γ½áñ¬¿ »«½Ñº¡« πº¡áΓ∞, ¬á¬ óδ »«»á½¿ ó ñá¡¡πε
- τáßΓ∞ ¬«ñá. Ĭ¡« Call Stack (æΓѬ ó맮óá) »«¬áºδóáÑΓ óá¼ »«ß½Ññ«-
- óáΓѽ∞¡«ßΓ∞ ó맮ó«ó »α«µÑñπα ¿½¿ Σπ¡¬µ¿⌐, ¬«Γ«αδÑ »α¿óѽ¿ ¬ ΓѬπ-
- ΘѼπ ß«ßΓ«∩¡¿ε (ú½πí¿¡«⌐ ñ« 128 πα«ó¡Ñ⌐). ä½∩ óδó«ñá «¬¡á Call
- Stack ¿ß»«½∞ºπ⌐ΓÑ ¬«¼á¡ñπ Debug│Call Stack.
-
- Ĭ¡« Call Stack «ß«íÑ¡¡« »«½Ñº¡« ¿ß»«½∞º«óáΓ∞, Ñß½¿ óδ ß½π-
- τá⌐¡« ¡áτ὿ Γαáßß¿α«ó¬π ¬«ñá, ¬«Γ«αδ⌐ σ«Γѽ¿ íδ óδ»«½¡¿Γ∞ ºá
- «ñ¿¡ Φáú. é ßΓÑ¬Ñ ó맮ó«ó óδ ¼«ªÑΓÑ ¡á⌐Γ¿ ëà ó맮ó, ¬«Γ«αδ⌐ ¡á-
- τ὿ Γαáßß¿α«óáΓ∞ »« «Φ¿í¬Ñ, ºáΓѼ óδíαáΓ∞ ¬«¼á¡ñπ Run to Cursor,
- τΓ«íδ óδ»«½¡¿Γ∞ ºá «ñ¿¡ Φáú «ßΓá½∞¡πε τáßΓ∞ ó맮óá.
-
- Å«óΓ«α¡«Ñ óδ»«½¡Ñ¡¿Ñ
- ─────────────────────────────────────────────────────────────────
-
- é σ«ñÑ ßÑá¡ßá «Γ½áñ¬¿ ¿¡«úñá ªÑ½áΓѽ∞¡« ¡áτáΓ∞ óßÑ ß¡áτá½á.
- éδíÑα¿ΓÑ ¬«¼á¡ñπ Run│Reset Program ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+F2.
- ¥Γ« »α¿óÑñÑΓ ¬ »«½¡«¼π ßíα«ßπ, ΓᬠτΓ« óδ»«½¡Ñ¡¿Ñ »« Φáúá¼, ¿½¿
-
- B.Pascal 7 & Objects /UG - 152 -
-
- Γαáßß¿α«ó¬á ¡áτ¡ÑΓß∩ ó ¡áτá½Ñ «ß¡«ó¡«⌐ »α«úαá¼¼δ.
-
-
- ÄΓ߽Ѫ¿óá¡¿Ñ óδó«ñá »α«úαá¼¼δ
- ─────────────────────────────────────────────────────────────────
-
- Åα¿ óδ»«½¡Ñ¡¿¿ »α«úαá¼¼δ »« Φáúá¼ τáßΓ« »«½Ñº¡« »α«ß¼«ΓαÑΓ∞
- óδó«ñ »α«úαá¼¼δ, ¡áºδóáѼδ⌐ φ¬αá¡«¼ »«½∞º«óáΓѽ∩. é »α¿¬½áñ¡«⌐
- »α«úαá¼¼Ñ Windows φΓ« ñ«ßΓáΓ«τ¡« »α«ßΓ«, Γᬠ¬á¬ »α«úαá¼¼á πªÑ
- óδ»«½¡∩ÑΓß∩ ó «Γñѽ∞¡«¼ «¬¡Ñ. Äñ¡á¬« ó DOS φΓ« ¡Ñ Γᬠ½Ñú¬«. è
- ßτáßΓ∞ε, Borland Pascal »αÑñ«ßΓáó½∩ÑΓ óá¼ ¡Ñ߬«½∞¬« ß»«ß«í«ó
- »α«ß¼«Γαá φ¬αá¡á »«½∞º«óáΓѽ∩.
-
-
- ÅÑαѬ½ετÑ¡¿Ñ φ¬αá¡«ó
- ─────────────────────────────────────────────────────────────────
-
- é ½εí«⌐ ¼«¼Ñ¡Γ ßÑá¡ßá «Γ½áñ¬¿ óδ ¼«ªÑΓÑ óδ»«½¡∩Γ∞ »ÑαѬ½ετÑ-
- ¡¿Ñ φ¬αá¡á IDE ¿ φ¬αá¡á »«½∞º«óáΓѽ∩. ùΓ«íδ óδóÑßΓ¿ φ¬αá¡ »«½∞º«-
- óáΓѽ∩, ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Alt+F5. ùΓ«íδ óÑα¡πΓ∞ß∩ ó IDE, ¡áª¼¿ΓÑ
- ½εíπε ¬½áó¿Φπ ¿½¿ Θѽ¬¡¿ΓÑ "¼δΦ∞ε".
-
- Åα¿ óδ»«½¡Ñ¡¿¿ »α«úαá¼¼δ «Γ½áñτ¿¬ Γá¬ªÑ ¼«ªÑΓ »ÑαѬ½ετáΓ∞
- φ¬αá¡δ áóΓ«¼áΓ¿τÑ߬¿. ô»αáó½∩Γ∞ σáαá¬ΓÑα«¼ »ÑαѬ½ετÑ¡¿∩ φ¬αá¡«ó
- óδ ¼«ªÑΓÑ ß »«¼«Θ∞ε »áαá¼ÑΓα«ó Display Swapping (ÅÑαѬ½ετÑ¡¿Ñ φ¬-
- αá¡á) ñ¿á½«ú«ó«ú« «¬¡á Debugger. Å« π¼«½τá¡¿ε ºáñá¡« φΣΣÑ¬Γ¿ó¡«Ñ
- »ÑαѬ½ετÑ¡¿Ñ. ¥Γ« «º¡áτáÑΓ, τΓ« φ¬αá¡ »«½∞º«óáΓѽ∩ óδó«ñ¿Γß∩
- Γ«½∞¬« ó Γ«¼ ß½πτáÑ, Ñß½¿ óδ»«½¡∩Ѽδ⌐ «»ÑαáΓ«α óδó«ñ¿Γ ¿¡Σ«α¼áµ¿ε
- ¡á φ¬αá¡ ¿½¿ óδºδóáÑΓ »α«µÑñπαπ (ñáªÑ Ñß½¿ φΓá »α«µÑñπαá ¡¿τÑú«
- ¡á φ¬αá¡ ¡Ñ óδó«ñ¿Γ). Å«ß½Ñ ºáóÑαΦÑ¡¿∩ óδó«ñá φ¬αá¡ »ÑαѬ½ετáÑΓß∩
- «íαáΓ¡« ó IDE.
-
- éδ ¼«ªÑΓÑ Γá¬ªÑ ß««íΘ¿Γ∞ «Γ½áñτ¿¬π, τΓ« »ÑαѬ½ετáΓ∞ φ¬αá¡
- ¡πª¡« ¡á ¬áªñ«⌐ ßΓ᫬Ñ, ¡Ñºáó¿ß¿¼« «Γ óδó«ñá, ¿½¿ ¡Ñ »ÑαѬ½ετáΓ∞
- ¿σ ó«óßÑ. ÅÑαѬ½ετÑ¡¿Ñ φ¬αá¡«ó ñ½∩ ¬áªñ«⌐ ßΓ᫬¿ »«½Ñº¡« ¿ß»«½∞-
- º«óáΓ∞, Ñß½¿ óáΦá »α«úαá¼¼á »«ßδ½áÑΓ ¿¡Σ«α¼áµ¿ε ¡Ñ»«ßαÑñßΓóÑ¡¡«
- ¡á φ¬αá¡, τΓ« ¼«ªÑΓ ºáΓÑαÑΓ∞ ß«ñÑন¼«Ñ φ¬αá¡á IDE.
-
-
- Ĭ¡« Output
- ─────────────────────────────────────────────────────────────────
-
- IDE ñ½∩ DOS »αÑñπß¼áΓα¿óáÑΓ ñ½∩ φ¬αá¡á »«½∞º«óáΓѽ∩ «¬¡«,
- ¬«Γ«α«Ñ ¡áºδóáÑΓß∩ «¬¡«¼ óδó«ñá. éδíαáó ¬«¼á¡ñπ ¼Ñ¡ε Debug│
- Output, óδ ¼«ªÑΓÑ «Γ¬αδΓ∞ (óδóÑßΓ¿ ¡á »ÑαÑñ¡Ñ¼ »½á¡Ñ) á¬Γ¿ó¡«Ñ
- «¬¡«, ß«ñÑαªáΘÑÑ óδó«ñ »α«úαá¼¼δ. ìáßΓα«¿Γ∞ αẼÑα φΓ«ú« «¬¡á
- ¼«ª¡« á¡á½«ú¿τ¡« «¬¡π αÑñá¬Γ¿α«óá¡¿∩.
-
-
- êß»«½∞º«óá¡¿Ñ ñóπσ ¼«¡¿Γ«α«ó
- ─────────────────────────────────────────────────────────────────
-
- IDE »αÑñ«ßΓáó½∩ÑΓ óἠ󫺼«ª¡«ßΓ∞ ¿ß»«½∞º«óá¡¿∩ ñ½∩ µÑ½Ñ⌐
-
- B.Pascal 7 & Objects /UG - 153 -
-
- «Γ½áñ¬¿ óΓ«α«ú« ¼«¡¿Γ«αá. ¥Γ«Γ ¼«¡¿Γ«α ñ«½ªÑ¡ íδΓ∞ ¼«¡«σα«¼¡δ¼
- ñ¿ß»½ÑѼ (»«ß¬«½∞¬π ¿ß»«½∞ºπÑΓ »á¼∩Γ∞, «Γ½¿τ¡πε «Γ µóÑΓ¡«ú« ñ¿ß»-
- ½Ñ∩), ¿ óá¼ ¡πª¡« íπñÑΓ ºá»πßΓ¿Γ∞ IDE ß »áαá¼ÑΓα«¼ /D. é αѪ¿¼Ñ ß
- ñóπ¼∩ ¼«¡¿Γ«αἿ φ¬αá¡ IDE óδó«ñ¿Γß∩ ¡á ¼«¡«σα«¼¡«¼ φ¬αá¡Ñ, óδó«ñ
- óáΦÑ⌐ »α«úαá¼¼δ - ¡á µóÑΓ¡«¼ φ¬αá¡Ñ, á »ÑαѬ½ετÑ¡¿Ñ φ¬αá¡«ó ¡Ñ
- óδ»«½¡∩ÑΓß∩.
-
-
- Åα«ß¼«Γα º¡áτÑ¡¿⌐
- ─────────────────────────────────────────────────────────────────
-
- éδ»«½¡Ñ¡¿Ñ »α«úαá¼¼δ »« Φáúá¼ ¿½¿ ÑÑ Γαáßß¿α«ó¬á ¼«úπΓ »«-
- ¼«τ∞ óá¼ ¡á⌐Γ¿ «Φ¿í¬¿ ó á½ú«α¿Γ¼Ñ »α«úαá¼¼δ, ¡« «íδτ¡« ªÑ½áΓѽ∞¡«
- Γá¬ªÑ º¡áΓ∞, τΓ« »α«¿ßσ«ñ¿Γ ¡á ¬áªñ«¼ ΦáúÑ ß« º¡áτÑ¡¿∩¼¿ «Γñѽ∞-
- ¡δσ »ÑαѼѡ¡δσ. ìá»α¿¼Ñα, »α¿ óδ»«½¡Ñ¡¿¿ »« Φáúá¼ µ¿¬½á for »«-
- ½Ñº¡« º¡áΓ∞ º¡áτÑ¡¿Ñ »ÑαѼѡ¡«⌐ µ¿¬½á. IDE Borland Pascal ¿¼ÑÑΓ
- ñóá ¿¡ßΓαπ¼Ñ¡Γá½∞¡δσ ßαÑñßΓóá ñ½∩ »α«óÑન ß«ñÑন¼«ú« »ÑαѼѡ¡δσ
- »α«úαá¼¼δ: «¬¡« Watches (Åα«ß¼«Γα) ¿ ñ¿á½«ú«ó«Ñ «¬¡« Evaluate and
- Modify (éδτ¿ß½Ñ¡¿Ñ ¿ ¼«ñ¿Σ¿¬áµ¿∩).
-
-
-
-
- B.Pascal 7 & Objects /UG - 154 -
-
- ùΓ« Γá¬«Ñ óδαáªÑ¡¿Ñ?
- ─────────────────────────────────────────────────────────────────
-
- Äíá ßαÑñßΓóá óδτ¿ß½Ñ¡¿Ñ ¿ »α«ß¼«Γαá αáí«ΓáεΓ ¡á πα«ó¡Ñ óδαá-
- ªÑ¡¿⌐, »«φΓ«¼π ó᪡« «»αÑñѽ¿Γ∞, τΓ« ßτ¿ΓáÑΓß∩ óδαáªÑ¡¿Ñ¼. éδαá-
- ªÑ¡¿Ñ ß«ßΓ«¿Γ ¿º ¬«¡ßΓá¡Γ, »ÑαѼѡ¡δσ ¿ ßΓαπ¬Γπα ñá¡¡δσ, ߬«¼í¿-
- ¡¿α«óá¡¡δσ ß »«¼«Θ∞ε «»Ñαᵿ⌐ ¿ í«½∞Φ¿¡ßΓóá óßΓα«Ñ¡¡δσ Σπ¡¬µ¿⌐.
- Å«τΓ¿ óßÑ, τΓ« óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ó »αáó«⌐ τáßΓ¿ «»ÑαáΓ«αá
- »α¿ßóá¿óá¡¿∩, ¼«ªÑΓ Γá¬ªÑ ¿ß»«½∞º«óáΓ∞ß∩ ó ¬áτÑßΓóÑ «Γ½áñ«τ¡«ú«
- óδαáªÑ¡¿∩. Æ«τ¡δÑ ß»Ñµ¿Σ¿¬áµ¿¿ »«¬áºá¡δ ó Æáí½¿µÑ 6.1.
-
- ¥½Ñ¼Ñ¡Γδ óδαáªÑ¡¿⌐ «Γ½áñτ¿¬á Æáí½¿µá 6.1
- ┌──────────────────────────┬────────────────────────────────────┐
- │ ¥½Ñ¼Ñ¡Γ óδαáªÑ¡¿∩ │ ä«»πßΓ¿¼δÑ º¡áτÑ¡¿∩ │
- ├──────────────────────────┼────────────────────────────────────┤
- │ è«¡ßΓá¡Γδ │ éßÑ ñ«»πßΓ¿¼δÑ Γ¿»δ: Boolean, Byte,│
- │ │ Char, »ÑαÑτ¿ß½¿¼δ⌐ Γ¿», Integer,│
- │ │ Longint, Real, Shortint, Word ¿│
- │ │ ßΓ᫬«óδ⌐ Γ¿». │
- ├──────────────────────────┼────────────────────────────────────┤
- │ ÅÑαѼѡ¡δÑ │ éßÑ Γ¿»δ, ó¬½ετá∩ Γ¿»δ, «»αÑñѽѡ-│
- │ │ ¡δÑ »«½∞º«óáΓѽ∩¼. │
- │ │ │
- │ µÑ½«τ¿ß½Ñ¡¡δ⌐ Γ¿» │ ïεí«Ñ µÑ½«τ¿ß½Ñ¡¡«Ñ óδαáªÑ¡¿Ñ ß »Ñ-│
- │ │ αѼѡ¡δ¼¿ úαá¡¿µá¼¿ ñ¿á»áº«¡á. │
- │ │ │
- │ Γ¿» ß »½áóáεΘÑ⌐ Γ«τ¬«⌐│ ïεíδÑ óδαáªÑ¡¿∩ ß »½áóáεΘÑ⌐ Γ«τ¬«⌐│
- │ │ ¿½¿ µÑ½«τ¿ß½Ñ¡¡δÑ óδαáªÑ¡¿∩; ½¿Φ¡¿Ñ│
- │ │ º¡áτáΘ¿Ñ µ¿Σαδ «ΓíαáßδóáεΓß∩. │
- │ │ │
- │ ß¿¼ó«½∞¡δ⌐ Γ¿» │ ïεí«Ñ ß¿¼ó«½∞¡«Ñ óδαáªÑ¡¿Ñ, ó¬½ετá∩│
- │ │ »ÑτáΓáѼδÑ ß¿¼ó«½δ ó «ñ¿¡áα¡δσ ¬á-│
- │ │ óδτ¬áσ, µÑ½«τ¿ß½Ñ¡¡δÑ óδαáªÑ¡¿∩,│
- │ │ Γ¿» ¬«Γ«αδσ »α¿óÑñÑ¡ ¬ Γ¿»π Char, ¿│
- │ │ ¬«¡Γá¡Γδ ASCII (#xx). │
- │ │ │
- │ íπ½Ñó߬¿⌐ Γ¿» │ True, False ¿ óßÑ íπ½Ñó߬¿Ñ óδαáªÑ-│
- │ │ ¡¿∩. │
- │ │ │
- │ »ÑαÑτ¿ß½¿¼δ⌐ Γ¿» │ ïεíδÑ ß«ó¼ÑßΓ¿¼δÑ »ÑαÑτ¿ß½¿¼δÑ ¬«¡-│
- │ │ ßΓá¡Γδ ¿½¿ µÑ½«τ¿ß½Ñ¡¡δÑ óδαáªÑ¡¿∩│
- │ │ ó αἬáσ ñ¿á»áº«¡á, Γ¿» ¬«Γ«αδσ│
- │ │ »α¿óÑñÑ¡ ¬ ß«ó¼ÑßΓ¿¼«¼π »ÑαÑτ¿ß½¿-│
- │ │ ¼«¼π Γ¿»π. │
- │ │ │
- │ π¬áºáΓѽ∞ │ ïεíδÑ ß«ó¼ÑßΓ¿¼δÑ π¬áºáΓѽ¿ ¿½¿ óδ-│
- │ │ αáªÑ¡¿∩ ß »α¿óÑñÑ¡¡δ¼¿ ¬ ¡¿¼ Γ¿»á-│
- │ │ ¼¿; Σπ¡¬µ¿∩ Ptr ß ß««ΓóÑΓßΓóπεΘ¿¼│
- │ │ »áαá¼ÑΓαἿ. │
- │ │ │
- │ ßΓ᫬«óδ⌐ Γ¿» │ ïεíá∩ ßΓ᫬«óá∩ ¬«¡ßΓá¡Γá (ΓѬßΓ ó│
- │ │ «ñ¿¡áα¡δσ ¬áóδτ¬áσ); ßΓ᫬«óδÑ »Ñ-│
- │ │ αѼѡ¡δÑ; ßΓ᫬«óδÑ óδαáªÑ¡¿∩, ß«ß-│
-
- B.Pascal 7 & Objects /UG - 155 -
-
- │ │ Γ«∩Θ¿Ñ ¿º ¬«¡¬áΓÑ¡¿α«óá¡¡δσ ßΓ᫬«-│
- │ │ óδσ ¬«¡ßΓá¡Γ ¿ »ÑαѼѡ¡δσ. │
- │ │ │
- │ ¼¡«ªÑßΓó« │ ïεíá∩ ¼¡«ªÑßΓóÑ¡¡á∩ ¬«¡ßΓá¡Γá; ½ε-│
- │ │ í«Ñ óδαáªÑ¡¿Ñ, ß«ó¼ÑßΓ¿¼«Ñ ß ¼¡«-│
- │ │ ªÑßΓóÑ¡¡δ¼ Γ¿»á, ó ¬«Γ«α«¼ ¿ß»«½∞-│
- │ │ ºπεΓß∩ «»Ñαᵿ¿ +, - ¿ *. │
- ├──────────────────────────┼────────────────────────────────────┤
- │ Åα¿óÑñÑ¡¿Ñ Γ¿»á │ æ«í½εñáεΓß∩ ßΓá¡ñáαΓ¡δÑ »αáó¿½á│
- │ │ Åá߬á½∩. │
- ├──────────────────────────┼────────────────────────────────────┤
- │ Ä»Ñαᵿ¿ │ éßÑ «»Ñαᵿ¿ Borland Pascal. │
- ├──────────────────────────┼────────────────────────────────────┤
- │ éßΓα«Ñ¡¡δÑ Σπ¡¬µ¿¿ │ éßÑ Σπ¡¬µ¿¿, ñ«»πßΓ¿¼δÑ ó óδαáªÑ¡¿-│
- │ │ ∩σ-¬«¡ßΓá¡Γáσ. │
- ├──────────────────────────┼────────────────────────────────────┤
- │ îáßß¿óδ │ îáßß¿óδ Borland Pascal - Mem, MemL,│
- │ │ MemW. │
- └──────────────────────────┴────────────────────────────────────┘
-
-
-
- B.Pascal 7 & Objects /UG - 156 -
-
- Åα«ß¼«Γα óδαáªÑ¡¿⌐
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ óδ σ«Γ¿ΓÑ «Γ߽Ѫ¿óáΓ∞ º¡áτÑ¡¿Ñ »ÑαѼѡ¡«⌐ ¿½¿ óδαáªÑ¡¿∩
- »α¿ óδ»«½¡Ñ¡¿¿ »α«úαá¼¼δ »« Φáúá¼, Γ« ¼«ªÑΓÑ «Γ¬αδΓ∞ «¬¡« »α«ß-
- ¼«Γαá Watches. ¥Γ« «¬¡« IDE »«¬áºδóáÑΓ »ÑαѼѡ¡δÑ ¿ ¿σ º¡áτÑ¡¿∩ ó
- ¬áªñδ⌐ ¬«¡¬αÑΓ¡δ⌐ ¼«¼Ñ¡Γ.
-
- ùΓ«íδ «Γ¬αδΓ∞ «¬¡« Watches, óδíÑα¿ΓÑ ¬«¼á¡ñπ Window│Watch.
- IDE «Γ¬αδóáÑΓ á¬Γ¿ó¡«Ñ «¬¡« Watches íѺ á¬Γ¿ó¡δσ ºá»¿ßÑ⌐. àß½¿ óδ
- óδíÑα¿ΓÑ »ÑαѼѡ¡πε ñ½∩ »α«ß¼«Γαá, IDE áóΓ«¼áΓ¿τÑ߬¿ «Γ¬αδóáÑΓ
- «¬¡« Watches (Ñß½¿ óδ φΓ«ú« ÑΘÑ ¡Ñ ßñѽ὿).
-
- ä«íáó½Ñ¡¿Ñ »α«ß¼áΓα¿óáѼ«ú« óδαáªÑ¡¿∩
-
- ùΓ«íδ ñ«íáó¿Γ∞ ó «¬¡« Watches »ÑαѼѡ¡πε, óδíÑα¿ΓÑ ¬«¼á¡ñπ
- Debug│Watch│Add Watch ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+F7. àß½¿ «¬¡«
- Watches ∩ó½∩ÑΓß∩ á¬Γ¿ó¡δ¼ «¬¡«¼, óδ ¼«ªÑΓÑ ñ«íáó¿Γ∞ óδαáªÑ¡¿Ñ
- »α«ß¼«Γαá, ¡áªáó ¬½áó¿Φπ Ins. ÄΓ½áñτ¿¬ «Γ¬αδóáÑΓ ñ¿á½«ú«ó«Ñ «¬¡«,
- ºá»αáΦ¿óáεΘÑÑ π óáß Γ¿» »α«ß¼áΓα¿óáѼ«ú« óδαáªÑ¡¿∩. Å« π¼«½τá¡¿ε
- óδαáªÑ¡¿Ñ¼ ßτ¿ΓáÑΓß∩ ß½«ó« ó »«º¿µ¿¿ ¬παß«αá ó ΓѬπΘѼ «¬¡Ñ αÑ-
- ñá¬Γ¿α«óá¡¿∩. Åα«ß¼áΓα¿óáѼδÑ óδαáªÑ¡¿∩, ¬«Γ«αδÑ óδ «Γ߽Ѫ¿ó὿
- αá¡ÑÑ, ß«σαá¡∩εΓß∩ ó ß»¿ß¬Ñ »α«Γ«¬«½á.
-
- ÄΓ߽Ѫ¿óá¡¿Ñ ΓѬπΘÑú« »α«ß¼áΓα¿óáѼ«ú« óδαáªÑ¡¿∩
-
- ū߽Ññ¡ÑÑ ñ«íáó½Ñ¡¡«Ñ ¿½¿ ¼«ñ¿Σ¿µ¿α«óá¡¡«Ñ »α«ß¼áΓα¿óáѼ«Ñ
- óδαáªÑ¡¿Ñ ∩ó½∩ÑΓß∩ ΓѬπΘ¿¼ »α«ß¼áΓα¿óáÑ¼δ¼ óδαáªÑ¡¿Ñ¼, ¬«Γ«α«Ñ
- π¬áºδóáÑΓß∩ óδó«ñ¿¼δ¼ ß½Ñóá «Γ ¡Ñú« ß¿¼ó«½«¼ ª¿α¡«⌐ ½Ñó«⌐ Γ«τ¬¿.
- àß½¿ «¬¡« Watches á¬Γ¿ó¡«, óδ ¼«ªÑΓÑ Γá¬ªÑ πñ὿Γ∞ ΓѬπΘÑÑ óδαá-
- ªÑ¡¿Ñ, ¡áªáó ¬½áó¿Φπ Del ¿½¿ Ctrl+Y. ùΓ«íδ πñ὿Γ∞ óßÑ »α«ß¼áΓα¿-
- óáѼδÑ óδαáªÑ¡¿∩, óδíÑα¿ΓÑ ¬«¼á¡ñπ Debug│Watch│Remove All
- Watches.
-
- ÉÑñá¬Γ¿α«óá¡¿Ñ »α«ß¼áΓα¿óáѼδσ óδαáªÑ¡¿⌐
-
- ùΓ«íδ «ΓαÑñá¬Γ¿α«óáΓ∞ »α«ß¼áΓα¿óáѼ«Ñ óδαáªÑ¡¿Ñ, ¡πª¡« ñóáª-
- ñδ Θѽ¬¡πΓ∞ ¡á φΓ«¼ óδαáªÑ¡¿¿ "¼δΦ∞ε" ¿½¿ ßñѽáΓ∞ φΓ« óδαáªÑ¡¿Ñ
- ΓѬπΘ¿¼, ºáΓѼ ¡áªáΓ∞ ¬½áó¿Φπ Enter ¿½¿ óδíαáΓ∞ ¬«¼á¡ñπ Debug│
- Watch│Edit Watch. ÄΓ½áñτ¿¬ «Γ¬αδóáÑΓ ñ¿á½«ú«ó«Ñ «¬¡«, á¡á½«ú¿τ¡«Ñ
- Γ«¼π, ¬«Γ«α«Ñ ¿ß»«½∞ºπÑΓß∩ ñ½∩ ñ«íáó½Ñ¡¿∩ »α«ß¼áΓα¿óáѼ«ú« óδαá-
- ªÑ¡¿∩, ¬«Γ«α«Ñ »«ºó«½∩ÑΓ óá¼ «ΓαÑñá¬Γ¿α«óáΓ∞ ΓѬπΘÑÑ óδαáªÑ¡¿Ñ.
- Åα¿ óδí«αÑ ¬«¼á¡ñ¡«⌐ ¬¡«»¬¿ OK ¿½¿ ¡áªáΓ¿¿ ¬½áó¿Φ¿ Enter «ΓαÑñá¬-
- Γ¿α«óá¡¡«Ñ óδαáªÑ¡¿Ñ ºá¼Ñ¡∩ÑΓ «α¿ú¿¡á½.
-
- ö«α¼áΓ¿α«óá¡¿Ñ »α«ß¼áΓα¿óáѼδσ óδαáªÑ¡¿⌐
-
- Ĭ¡« Watches »«ºó«½∩ÑΓ óá¼ ¡Ñ߬«½∞¬¿¼¿ ß»«ß«íἿ Σ«α¼áΓ¿α«-
- óáΓ∞ »α«ß¼áΓα¿óáѼδÑ óδαáªÑ¡¿∩, ñ«íáó½∩∩ ºá»∩Γπε ¿ «ñ¿¡ ¿½¿ í«½ÑÑ
- ߻ѵ¿Σ¿¬áΓ«α«ó Σ«α¼áΓá. ìá»α¿¼Ñα, σ«Γ∩ µÑ½«τ¿ß½Ñ¡¡δÑ º¡áτÑ¡¿∩ óδ-
- ó«ñ∩Γß∩ «íδτ¡« ó ñÑß∩Γ¿τ¡«¼ ó¿ñÑ, π¬áºáó »«ß½Ñ ¡Ñú« ,H, óδ ¼«ªÑΓÑ
- ºáñáΓ∞ óδó«ñ óδαáªÑ¡¿∩ ó ΦÑßΓ¡áñµáΓ¿α¿τ¡«¼ Σ«α¼áΓÑ. ä«»πßΓ¿¼δÑ
- ߻ѵ¿Σ¿¬áΓ«αδ Σ«α¼áΓá ¿ ¿σ ñÑ⌐ßΓó¿Ñ »ÑαÑτ¿ß½∩εΓß∩ ó Æáí½¿µÑ 6.2.
-
- B.Pascal 7 & Objects /UG - 157 -
-
- æ»Ñµ¿Σ¿¬áΓ«αδ Σ«α¼áΓá ó óδαáªÑ¡¿∩σ «Γ½áñτ¿¬á
- Æáí½¿µá 6.2
- ┌──────────────┬─────────────────────┬──────────────────────────┐
- │ æ¿¼ó«½ │ Æ¿», ¡á ¬«Γ«αδ⌐ │ öπ¡¬µ¿∩ │
- │ │ «¡ ó½¿∩ÑΓ │ │
- ├──────────────┼─────────────────────┼──────────────────────────┤
- │ $, H ¿½¿ X │ µÑ½«τ¿ß½Ñ¡¡δÑ Γ¿»δ │ ÿÑßΓ¡áñµáΓ¿α¿τ¡δ⌐. éδó«-│
- │ │ │ ñ¿Γ µÑ½«τ¿ß½Ñ¡¡δÑ º¡áτÑ-│
- │ │ │ ¡¿∩ ó »αÑΣ¿¬ß«¼ $, ó¬½ε-│
- │ │ │ τá∩ ΓÑ, ¬«Γ«αδÑ ß«ñÑαªáΓ-│
- │ │ │ ß∩ ó ßΓαπ¬ΓπαÑ ñá¡¡δσ. │
- ├──────────────┼─────────────────────┼──────────────────────────┤
- │ C │ Char, ßΓ᫬«óδÑ │ 濼ó«½∞¡δ⌐. éδó«ñ¿Γ ß»Ñ-│
- │ │ Γ¿»δ │ µ¿á½∞¡δÑ ß¿¼ó«½δ ñ½∩ ¬«-│
- │ │ │ ñ«ó ASCII 0..31. Å« π¼«½-│
- │ │ │ τá¡¿ε Γá¬¿Ñ ß¿¼ó«½δ óδó«-│
- │ │ │ ñ∩Γß∩ ó ó¿ñÑ º¡áτÑ¡¿⌐│
- │ │ │ #xx. │
- ├──────────────┼─────────────────────┼──────────────────────────┤
- │ D │ µÑ½«τ¿ß½Ñ¡¡δÑ │ äÑß∩Γ¿τ¡δ⌐. éδó«ñ∩Γ µÑ½«-│
- │ │ Γ¿»δ │ τ¿ß½Ñ¡¡δÑ º¡áτÑ¡¿∩ ó ñÑ-│
- │ │ │ ß∩Γ¿τ¡«¼ ó¿ñÑ (ó¬½ετá∩│
- │ │ │ ΓÑ, ¬«Γ«αδÑ ß«ñÑαªáΓß∩ ó│
- │ │ │ ßΓαπ¬Γπαáσ ñá¡¡δσ). │
- ├──────────────┼─────────────────────┼──────────────────────────┤
- │ Fn │ ß »½áóáεΘÑ⌐ Γ«τ¬«⌐ │ æ »½áóáεΘÑ⌐ Γ«τ¬«⌐. éδó«-│
- │ │ │ ñ¿Γ n º¡áτáΘ¿σ µ¿Σα, úñÑ│
- │ │ │ n ½Ñª¿Γ ó ñ¿á»áº«¡Ñ 2..18│
- │ │ │ (»« π¼«½τá¡¿ε - 11). │
- ├──────────────┼─────────────────────┼──────────────────────────┤
- │ nM │ óßÑ │ äá¼» »á¼∩Γ¿. éδó«ñ¿Γ n│
- │ │ │ íá⌐Γ »á¼∩Γ¿, ¡áτ¿¡á∩ ß│
- │ │ │ áñαÑßá, π¬áºδóáѼ«ú« óδ-│
- │ │ │ αáªÑ¡¿Ñ¼. àß½¿ n ¡Ñ ºáñá-│
- │ │ │ ¡«, Γ« »« π¼«½τá¡¿ε «¡«│
- │ │ │ αáó¡« º¡áτÑ¡¿ε αẼÑαá ó│
- │ │ │ íá⌐Γáσ Γ¿»á »ÑαѼѡ¡«⌐. │
- ├──────────────┼─────────────────────┼──────────────────────────┤
- │ P │ π¬áºáΓѽ¿ │ ô¬áºáΓѽ∞. éδó«ñ¿Γ π¬áºá-│
- │ │ │ Γѽ¿ »« áñαÑßπ ßÑú¼:ß¼ÑΘ│
- │ │ │ (¡á ¡Ñ Ptr(ßÑú¼:ß¼ÑΘ),│
- │ │ │ ¬á¬ φΓ« ñѽáÑΓß∩ »« π¼«½-│
- │ │ │ τá¡¿ε. │
- ├──────────────┼─────────────────────┼──────────────────────────┤
- │ R │ ºá»¿ß¿, «íΩѬΓδ │ çỿß∞. éδó«ñ¿Γ ¿¼Ñ¡á »«-│
- │ │ │ ½Ñ⌐, ¡á»α¿¼Ñα, (X:1;│
- │ │ │ Y:10; Z:5) ó¼ÑßΓ« (1, 10,│
- │ │ │ 5). │
- ├──────────────┼─────────────────────┼──────────────────────────┤
- │ S │ Char, ßΓ᫬¿ │ æΓ᫬¿. éδó«ñ¿Γ ß¿¼ó«½δ│
- │ │ │ ASCII 0..31 ó ó¿ñÑ #xx.│
- │ │ │ êß»«½∞ºπÑΓ Γ«½∞¬« ñ½∩ ¼«-│
- │ │ │ ñ¿Σ¿¬áµ¿¿ ñá¼»«ó »á¼∩Γ¿│
-
- B.Pascal 7 & Objects /UG - 158 -
-
- │ │ │ (ß¼. óδΦÑ nM). │
- └──────────────┴─────────────────────┴──────────────────────────┘
-
-
-
-
- éδτ¿ß½Ñ¡¿Ñ ¿ ¼«ñ¿Σ¿¬áµ¿∩
- ─────────────────────────────────────────────────────────────────
-
- èα«¼Ñ ñ«íáó½Ñ¡¿∩ »α«ß¼áΓα¿óáѼδσ óδαáªÑ¡¿⌐ »α¿ óδ»«½¡Ñ¡¿¿
- »α«úαá¼¼δ, «Γ½áñτ¿¬ ¿¼ÑÑΓ ßαÑñßΓó«, »«ºó«½∩εΘÑÑ óá¼ ó ½εí«⌐ ¼«-
- ¼Ñ¡Γ óδτ¿ß½∩Γ∞ óδαáªÑ¡¿∩ ¿ ¿º¼Ñ¡∩Γ∞ ¡á φΓá»Ñ óδ»«½¡Ñ¡¿∩ º¡áτÑ¡¿∩
- »ÑαѼѡ¡δσ.
-
- éδτ¿ß½Ñ¡¿Ñ óδαáªÑ¡¿⌐
-
- ùΓ«íδ óδτ¿ß½¿Γ∞ óδαáªÑ¡¿Ñ, óδíÑα¿ΓÑ ¬«¼á¡ñπ Debug│Evaluate/
- Modify ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+F4. ÄΓ½áñτ¿¬ óδó«ñ¿Γ ñ¿á½«ú«ó«Ñ
- «¬¡« Evaluate and Modify (éδτ¿ß½Ñ¡¿Ñ ¿ ¼«ñ¿Σ¿¬áµ¿∩). Å« π¼«½τá¡¿ε
- ß½«ó« ó »«º¿µ¿¿ ¬παß«αá ó ΓѬπΘѼ «¬¡Ñ αÑñá¬Γ¿α«óá¡¿∩ óδó«ñ¿Γß∩
- »«ñßóÑτÑ¡¡δ¼ ó »«½Ñ Expression (éδαáªÑ¡¿Ñ). éδ ¼«ªÑΓÑ «ΓαÑñá¬Γ¿-
- α«óáΓ∞ φΓ« óδαáªÑ¡¿Ñ, ¡áíαáΓ∞ ñαπú«Ñ óδαáªÑ¡¿Ñ ¿½¿ óδíαáΓ∞ óδτ¿ß-
- ½∩Ѽ«Ñ óἿ αá¡ÑÑ óδαáªÑ¡¿Ñ ¿º ß»¿ß¬á »α«Γ«¬«½á.
-
- è«úñá óδ ¡áª¿¼áÑΓÑ Enter ¿½¿ Θѽ¬áÑΓÑ "¼δΦ∞ε" ¡á ¬«¼á¡ñ¡«⌐
- ¬¡«»¬Ñ Evaluate, ΓѬπΘÑÑ º¡áτÑ¡¿Ñ óδαáªÑ¡¿∩ ó »«½Ñ Expression »«-
- ¬áºδóáÑΓß∩ ó »«½Ñ Result.
-
- ä«»πßΓ¿¼δÑ óδαáªÑ¡¿∩ ñ½∩ óδτ¿ß½Ñ¡¿∩ »«ñτ¿¡∩εΓß∩ ΓѼ ªÑ »αá-
- ó¿½á¼, τΓ« ¿ óδαáªÑ¡¿∩ ñ½∩ ßαáó¡Ñ¡¿∩. ä½∩ óδó«ñá αѺπ½∞ΓáΓ«ó óδ-
- τ¿ß½Ñ¡¿∩ óδαáªÑ¡¿∩ ñÑ⌐ßΓóπε ߻ѵ¿Σ¿¬áΓ«αδ Σ«α¼áΓá, »ÑαÑτ¿ß½Ñ¡¡δÑ
- ó Æáí½¿µÑ 6.2.
-
- î«ñ¿Σ¿¬áµ¿∩ »ÑαѼѡ¡δσ
-
- é« óαѼ∩ «Γ½áñ¬¿ ß »«¼«Θ∞ε ñ¿á½«ú«ó«ú« «¬¡á Evaluate and
- Modify óδ ¼«ªÑΓÑ ¿º¼Ñ¡¿Γ∞ º¡áτÑ¡¿Ñ »ÑαѼѡ¡«⌐. éóÑñ¿ΓÑ »ÑαѼѡ¡πε
- ó »«½Ñ Expression, ºáΓѼ ó »«½Ñ New Value ¡áíÑα¿ΓÑ ¡«ó«Ñ º¡áτÑ¡¿Ñ.
-
- Åα¿ ¿º¼Ñ¡Ñ¡¿¿ º¡áτÑ¡¿⌐ »ÑαѼѡ¡δσ ß½ÑñπÑΓ ¿¼ÑΓ∞ ó ó¿ñπ ß½Ñ-
- ñπεΘÑÑ:
-
- * éδ ¼«ªÑΓÑ ¿º¼Ñ¡∩Γ∞ Γ«½∞¬« «Γñѽ∞¡δÑ »ÑαѼѡ¡δÑ ¿½¿ φ½Ñ¼Ñ¡-
- Γδ ¼áßß¿ó«ó ¿½¿ ºá»¿ßÑ⌐, ¡« ¡Ñ ßἿ ¼áßß¿óδ ¿ ºá»¿ß¿.
-
- * éδαáªÑ¡¿∩ ó »«½Ñ New Value ñ«½ª¡δ «ΓóÑτáΓ∞ «úαá¡¿τÑ¡¿∩¼
- ñ½∩ óδαáªÑ¡¿⌐, »ÑαÑτ¿ß½Ñ¡¡δσ ó Æáí½¿µÑ 6.1.
-
- * éδαáªÑ¡¿Ñ ó »«½Ñ New Value (ì«ó«Ñ º¡áτÑ¡¿Ñ) ñ«½ª¡« ó αÑ-
- ºπ½∞ΓáΓÑ óδτ¿ß½Ñ¡¿∩ ñáóáΓ∞ αѺπ½∞ΓáΓ, ß«ó¼ÑßΓ¿¼δ⌐ »« »α¿ß-
- óá¿óá¡¿ε ß »ÑαѼѡ¡«⌐, ¬«Γ«α«⌐ óδ σ«Γ¿ΓÑ ÑÑ »α¿ßó«¿Γ∞.
- çñÑß∞ ¼«ª¡« απ¬«ó«ñßΓó«óáΓ∞ß∩ ß½ÑñπεΘ¿¼ »αá󿽫¼: Ñß½¿
-
- B.Pascal 7 & Objects /UG - 159 -
-
- »α¿ßóá¿óá¡¿Ñ ñáÑΓ »α¿ ¬«¼»¿½∩µ¿¿ «Φ¿í¬π, Γ« «¡« ¡Ñ ∩ó½∩ÑΓ-
- ß∩ ñ«»πßΓ¿¼δ¼ º¡áτÑ¡¿Ñ¼ ¼«ñ¿Σ¿¬áµ¿¿.
-
-
-
- B.Pascal 7 & Objects /UG - 160 -
-
- êß»«½∞º«óá¡¿Ñ Γ«τѬ «ßΓá¡«óá
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal ñáÑΓ óἠ󫺼«ª¡«ßΓ∞ πßΓá¡áó½¿óáΓ∞ ó ßó«Ñ
- »α«úαá¼¼Ñ ñ½∩ µÑ½Ñ⌐ «Γ½áñ¬¿ Γ«τ¬¿ «ßΓá¡«óá. Æ«τ¬á «ßΓá¡«óá - φΓ«
- «í«º¡áτÑ¡¡á∩ ó ¬«ñÑ »α«úαá¼¼δ »«º¿µ¿∩, ó ¬«Γ«α«⌐ óδ σ«Γ¿ΓÑ »αѬ-
- αáΓ¿Γ∞ óδ»«½¡Ñ¡¿Ñ »α«úαá¼¼δ ¿ óÑα¡πΓ∞ óδ»«½¡Ñ¡¿Ñ «Γ½áñτ¿¬π. é
- φΓ«¼ ß¼δß½Ñ Γ«τ¬á «ßΓá¡«óá αáí«ΓáÑΓ á¡á½«ú¿τ¡« ¬«¼á¡ñÑ Go to
- Cursor, »α¿ ¬«Γ«α«⌐ »α«úαá¼¼á óδ»«½¡∩ÑΓß∩ «íδτ¡δ¼ »πΓѼ ñ« ñ«ßΓ¿-
- ªÑ¡¿∩ «»αÑñѽѡ¡«⌐ Γ«τ¬¿. Äß¡«ó¡«Ñ αẽ¿τ¿Ñ ß«ßΓ«¿Γ ó Γ«¼, τΓ« óδ
- ¼«ªÑΓÑ ºáñáΓ∞ ¡Ñ߬«½∞¬« Γ«τ¬Ñ «ßΓá¡«óá ¿ Γ«τ¬¿ «ßΓá¡«óá, ¬«Γ«αδÑ
- íπñπΓ ßαáíáΓδóáΓ∞ ¡Ñ »α¿ ¬áªñ«¼ ¿σ ñ«ßΓ¿ªÑ¡¿¿.
-
-
- çáñá¡¿Ñ Γ«τѬ «ßΓá¡«óá
- ─────────────────────────────────────────────────────────────────
-
- ùΓ«íδ πßΓá¡«ó¿Γ∞ ó ßó«Ñ¼ ó ßó«Ñ¼ ¬«ñÑ Γ«τ¬π «ßΓá¡«óá, »ÑαÑ-
- ¼ÑßΓ¿ΓÑ ¬παß«α ¡á Γ«⌐ ßΓ᫬Ñ, úñÑ óδ σ«Γ¿ΓÑ «ßΓá¡«ó¿Γ∞ß∩. æΓ᫬á
- ñ«½ª¡á ß«ñÑαªáΓ∞ óδ»«½¡∩Ѽδ⌐ ¬«ñ ¿ ¡Ñ ¼«ªÑΓ íδΓ∞ ¬«¼¼Ñ¡Γáα¿Ñ¼,
- «»¿ß᡿Ѽ ¿½¿ »πßΓ«⌐ ßΓ᫬«⌐. éδí«α ¬«¼á¡ñδ Toggle Breakpoint ó
- ½«¬á½∞¡«¼ ¼Ñ¡ε «¬¡á αÑñá¬Γ¿α«óá¡¿∩ ¿½¿ ¡áªáΓ¿Ñ ¬½áó¿Φ Ctrl+F8 πß-
- Γá¡áó½¿óáÑΓ ¡á ßΓα«¬Ñ Γ«τ¬π «ßΓá¡«óá, ¬«Γ«αá∩ «í«º¡áτáÑΓß∩ »«ñß-
- óÑΓ¬«⌐ óßÑ⌐ ßΓ᫬¿.
-
- ÆÑ»Ñα∞ »α¿ óδ»«½¡Ñ¡¿¿ »α«úαá¼¼δ ¿º IDE «¡á íπñÑΓ «ßΓá¡áó½¿-
- óáΓ∞ß∩ »α¿ ñ«ßΓ¿ªÑ¡¿¿ ñá¡¡«⌐ ßΓ᫬¿, ¡« »ÑαÑñ ÑÑ óδ»«½¡Ñ¡¿Ñ¼.
- æΓ᫬á, ß«ñÑαªáΘá∩ Γ«τ¬π «ßΓá¡«óá, óδó«ñ¿Γß∩ »α¿ φΓ«¼ ó «¬¡Ñ αÑ-
- ñá¬Γ¿α«óá¡¿∩ ¬á¬ ßΓ᫬á óδ»«½¡Ñ¡¿∩. é φëà ¼«¼Ñ¡Γ óδ ¼«ªÑΓÑ óδ-
- »«½¡¿Γ∞ ½εíδÑ ñαπú¿Ñ ñÑ⌐ßΓó¿∩ »« «Γ½áñ¬Ñ (óδ»«½¡Ñ¡¿Ñ »α«úαá¼¼δ »«
- Φáúá¼, Γαáßß¿α«ó¬π, »α«ß¼«Γα ¿ óδτ¿ß½Ñ¡¿Ñ).
-
-
- ÄΓ¼Ñ¡á Γ«τ¬Ñ «ßΓá¡«óá
- ─────────────────────────────────────────────────────────────────
-
- ùΓ«íδ «Γ¼Ñ¡¿Γ∞ Γ«τ¬π «ßΓá¡«óá, »«¼ÑßΓ¿ΓÑ ¬παß«α ¡á ß«ñÑαªá-
- Θπε ÑÑ ßΓப㠨 óδíÑα¿ΓÑ ó ½«¬á½∞¡«¼ ¼Ñ¡ε «¬¡á αÑñá¬Γ¿α«óá¡¿∩ ¬«-
- ¼á¡ñπ Toggle Breakpoint ¿½¿ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+F8.
-
-
- î«ñ¿Σ¿¬áµ¿∩ Γ«τѬ «ßΓá¡«óá
- ─────────────────────────────────────────────────────────────────
-
- é »α«µÑßßÑ ßÑá¡ßá «Γ½áñ¬¿ IDE «Γ߽Ѫ¿óáÑΓ óßÑ Γ«τ¬¿ «ßΓá¡«-
- óá. é¼ÑßΓ« Γ«ú«, τΓ«íδ Φáα¿Γ∞ »« ¿ßσ«ñ¡«¼π ¬«ñπ ó »«¿ß¬Ñ Γ«τѬ
- «ßΓá¡«óá, «¡á «íß½πª¿óáΓ∞ Γ«τ¬¿ «ßΓá¡«óá ó «ñ¡«¼ ñ¿á½«ú«ó«¼ «¬¡Ñ
- Breakpoints. ä½∩ óδó«ñá ñ¿á½«ú«ó«ú« «¬¡á Breakpoints óδíÑα¿ΓÑ ¬«-
- ¼á¡ñπ View│Breakpoints. é φΓ«¼ ñ¿á½«ú«ó«¼ «¬¡Ñ óδ ¼«ªÑΓÑ πßΓá¡áó-
- ½¿óáΓ∞, πñá½∩Γ∞, αÑñá¬Γ¿α«óáΓ∞ ¿ »α«ß¼áΓα¿óáΓ∞ ßó«¿ Γ«τ¬¿ «ßΓá¡«-
- óá.
-
- 諼á¡ñ¡δÑ ¬¡«»¬¿ ñ¿á½«ú«ó«ú« «¬¡á Breakpoints αáí«ΓáεΓ ß½Ñ-
-
- B.Pascal 7 & Objects /UG - 161 -
-
- ñπεΘ¿¼ «íαẫ¼:
-
- * ùΓ«íδ ñ«íáó¿Γ∞ ¡«óπε Γ«τ¬π «ßΓá¡«óá, »«ñßóÑΓ¿ΓÑ »πßΓπε
- ßΓ᫬π ó ß»¿ß¬Ñ ¿ óδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π Edit.
-
- * ùΓ«íδ «Γ¼Ñ¡¿Γ∞ Γ«τ¬π «ßΓá¡«óá, »«ñßóÑΓ¿ΓÑ ÑÑ ¿ óδíÑα¿ΓÑ
- ¬¡«»¬π Clear.
-
- * ùΓ«íδ ¼«ñ¿Σ¿µ¿α«óáΓ∞ ßπΘÑßΓóπεΘπε Γ«τ¬π «ßΓá¡«óá, »«ñßóÑ-
- Γ¿ΓÑ ÑÑ ¿ óδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»¬π Edit.
-
- * ùΓ«íδ ¡á⌐Γ¿ ó ßó«Ñ¼ ¿ßσ«ñ¡«¼ ¬«ñÑ Γ«τ¬π «ßΓá¡«óá, »«ñßóÑ-
- Γ¿ΓÑ ÑÑ ¿ óδíÑα¿ΓÑ ¬¡«»¬π View.
-
- * ùΓ«íδ πñ὿Γ∞ óßÑ Γ«τ¬¿ «ßΓá¡«óá, óδíÑα¿ΓÑ ¬«¼á¡ñ¡πε ¬¡«»-
- ¬π Clear All.
-
-
- 櫺ñá¡¿Ñ πß½«ó¡δ⌐ Γ«τѬ «ßΓá¡«óá
- ─────────────────────────────────────────────────────────────────
-
-
- Æ«τ¬¿ «ßΓá¡«óá, ñ«íáó½Ñ¡¡δÑ ¬«¼á¡ñ«⌐ Toggle Breakpoint, ∩ó-
- ½∩εΓß∩ íѺπß½«ó¡δ¼¿: ¬«úñá óδ »«»áñáÑΓÑ ¡á φΓπ ßΓ᫬π, «Γ½áñτ¿¬ ó
- ½εí«¼ ß½πτáÑ «ßΓá¡áó½¿óáÑΓ »α«úαá¼¼π. àß½¿ óδ αÑñá¬Γ¿απÑΓÑ ¡«óπε
- ¿½¿ ßπΘÑßΓóπεΘπε Γ«τ¬π «ßΓá¡«óá, Γ« π óáß ÑßΓ∞ ñóÑ ñ«»«½¡¿Γѽ∞¡δÑ
- 󫺼«ª¡«ßΓ¿ - ß »«¼«Θ∞ε »áαá¼ÑΓα«ó ñ¿á½«ú«ó«ú« «¬¡á Edit
- Breakpoint óδ ¼«ªÑΓÑ ß«ºñáΓ∞ πß½«ó¡δÑ Γ«τ¬¿ «ßΓá¡«óá. é φΓ¿σ Γ«τ-
- ¬áσ «ßΓá¡«óá óδ ¼«ªÑΓÑ ºáñáΓ∞ ñóá ó¿ñá πß½«ó¿⌐: ßτÑΓτ¿¬ »α«σ«ñ«ó
- ¿ ½«ú¿τÑ߬¿Ñ πß½«ó¿∩.
-
- Å«ñßτÑΓ τ¿ß½á »α«σ«ñ«ó
-
- çáñá¡¿Ñ ñ½∩ Γ«τ¬¿ «ßΓá¡«óá ßτÑΓτ¿¬á »α«σ«ñ«ó ß««íΘáÑΓ «Γ½áñ-
- τ¿¬π, τΓ« «ßΓá¡áó½¿óáΓ∞ »α«úαá¼¼π ¡πª¡« ¡Ñ »α¿ ¬áªñ«¼ ñ«ßΓ¿ªÑ¡¿¿
- Γ«τ¬¿ «ßΓá¡«óá, á Γ«½∞¬« ¡á n-δ⌐ αáº. Æ« ÑßΓ∞, Ñß½¿ ßτÑΓτ¿¬ »α«-
- σ«ñ«ó αáóÑ¡ 3, Γ« «Γ½áñτ¿¬ «ßΓá¡áó½¿óáÑΓ »α«úαá¼¼π Γ«½∞¬« »α¿
- ΓαÑΓ∞Ѽ ñ«ßΓ¿ªÑ¡¿¿ ñá¡¡«⌐ Γ«τ¬¿ «ßΓá¡«óá.
-
- Åα«óÑα¬á πß½«ó¿⌐
-
- é ¬áτÑßΓóÑ πß½«ó¿∩ ñ½∩ Γ«τ¬¿ «ßΓá¡«óá ¼«ª¡« Γá¬ªÑ ºáñáΓ∞ óδ-
- αáªÑ¡¿Ñ Γ¿»á Boolean. ìá»α¿¼Ñα, óδ ¼«ªÑΓÑ »α«óÑα¿Γ∞, »«»áñáÑΓ ½¿
- »ÑαѼѡ¡á∩ ó ºáñá¡¡δ⌐ ñ¿á»áº«¡, ¿½¿ πßΓá¡«ó½Ñ¡ ½¿ ¡Ñ¬«Γ«αδ⌐ Σ½áú.
- é Γᬿσ πß½«ó¿∩σ ñ½∩ Γ«τѬ «ßΓá¡«óá óδ ¼«ªÑΓÑ ºáñáóáΓ∞ ½εíδÑ íπ-
- ½Ñó߬¿Ñ óδαáªÑ¡¿∩, »«ñτ¿¡∩εΘ¿Ñß∩ »αáó¿½á¼ Æáí½¿µδ 6.1.
-
-
- ÅαÑαδóá¡¿Ñ »α«úαá¼¼δ íѺ Γ«τѬ «ßΓá¡«óá
- ─────────────────────────────────────────────────────────────────
-
- äáªÑ Ñß½¿ óδ ¡Ñ πßΓá¡«ó¿ΓÑ Γ«τѬ «ßΓá¡«óá, Γ« óßÑ αáó¡« ß¼«-
- ªÑΓÑ óδ⌐Γ¿ ó «Γ½áñτ¿¬ »α¿ óδ»«½¡Ñ¡¿¿ »α«úαá¼¼δ ¿º IDE. é ½εí«⌐
-
- B.Pascal 7 & Objects /UG - 162 -
-
- ¼«¼Ñ¡Γ αáí«Γá »α«úαá¼¼δ ¡áª¼¿ΓÑ ¬½áó¿Φ¿ Ctrl+Break. ÄΓ½áñτ¿¬ ¡á-
- σ«ñ¿Γ »«º¿µ¿ε ó ¿ßσ«ñ¡«¼ ¬«ñÑ, úñÑ óδ »αÑαó὿ »α«úαá¼¼π. èᬠ¿ ó
- ß½πτáÑ «íδτ¡« Γ«τ¬¿ «ßΓá¡«óá óδ ¼«ªÑΓÑ ºáΓѼ óδ»«½¡¿Γ∞ »α«úαá¼¼π
- »« Φáúá¼, Γαáßß¿α«óáΓ∞ ÑÑ, «Γß½Ññ¿Γ∞ ¿½¿ óδτ¿ß½¿Γ∞ óδαáªÑ¡¿∩.
-
-
-
- B.Pascal 7 & Objects /UG - 163 -
-
- ────────────────────────────────────────────────────────────────────────────
- â½áóá 7. î«ñ㫨 Borland Pascal
- ─────────────────────────────────────────────────────────────────
-
- é ñá¡¡«⌐ ú½áóÑ αáºΩ∩ß¡∩ÑΓß∩, τΓ« Γá¬«Ñ ¼«ñπ½∞, ¬á¬ «¡ ¿ß-
- »«½∞ºπÑΓß∩, ¬á¬¿Ñ óßΓα«Ñ¡¡δÑ ¼«ñ㫨 ñ«ßΓπ»¡δ »«½∞º«óáΓѽε, ¬á¬
- »¿ßáΓ∞ ß«íßΓóÑ¡¡δÑ »α«úαá¼¼¡δÑ ¼«ñ㫨 ¿ ¬á¬ ¬«¼»¿½¿α«óáΓ∞ ¿σ.
-
- ùΓ« Γá¬«Ñ ¼«ñπ½∞?
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal «íÑß»Ñτ¿óáÑΓ óá¼ ñ«ßΓπ» ¬ í«½∞Φ«¼π τ¿ß½π
- óßΓα«Ñ¡¡δσ ¬«¡ßΓá¡Γ, Γ¿»«ó ñá¡¡δσ, »ÑαѼѡ¡δσ, »α«µÑñπα ¿ Σπ¡¬-
- µ¿⌐. ìѬ«Γ«αδÑ ¿º ¡¿σ ߻ѵ¿Σ¿τ¡δ ñ½∩ Borland Pascal, ñαπú¿Ñ ß»Ñ-
- µ¿Σ¿τ¡δ ñ½∩ »α¿½«ªÑ¡¿⌐ Windows. êσ ¬«½¿τÑßΓó« óѽ¿¬«, «ñ¡á¬«, ó
- ßó«Ñ⌐ »α«úαá¼¼Ñ óδ αÑñ¬« ¿ß»«½∞ºπÑΓÑ ¿σ óßÑ ßαáºπ. Å«φΓ«¼π «¡¿
- αáºñÑ½Ñ¡δ ¡á ßó∩ºá¡¡δÑ úαπ»»δ, ¡áºδóáѼδÑ ¼«ñπ½∩¼¿. é φΓ«¼ ß½πτáÑ
- ¼«ª¡« ¿ß»«½∞º«óáΓ∞ Γ«½∞¬« ΓÑ ¼«ñπ½¿, ¬«Γ«αδÑ ¡Ñ«íσ«ñ¿¼δ ó »α«ú-
- αá¼¼Ñ.
-
- êß»«½∞ºπ∩ ¼«ñπ½¿, óδ ¼«ªÑΓÑ αáºí¿óáΓ∞ »α«úαá¼¼π ¡á «Γñѽ∞¡δÑ
- τáßΓ¿ ¿ ¬«¼»¿½¿α«óáΓ∞ ¿σ «Γñѽ∞¡«. Åα«úαá¼¼¡δ⌐ ¼«ñπ½∞ (unit)
- »αÑñßΓáó½∩ÑΓ ß«í«⌐ ¡áí«α ¬«¡ßΓá¡Γ, Γ¿»«ó ñá¡¡δσ, »ÑαѼѡ¡δσ, »α«-
- µÑñπα ¿ Σπ¡¬µ¿⌐, ¬«Γ«αδÑ ¼«úπΓ ß«ó¼ÑßΓ¡« ¿ß»«½∞º«óáΓ∞ß∩ ¡Ñ߬«½∞-
- ¬¿¼¿ »α«úαἼἿ. èáªñδ⌐ ¼«ñπ½∞ á¡á½«ú¿τÑ¡ «Γñѽ∞¡«⌐ »α«úαá¼¼Ñ ¡á
- Åá߬á½Ñ: «¡ ¼«ªÑΓ ¿¼ÑΓ∞ «ß¡«ó¡«Ñ Γѽ«, ¬«Γ«α«Ñ óδºδóáÑΓß∩ »ÑαÑñ
- ºá»π߬«¼ óáΦÑ⌐ »α«úαá¼¼δ ¿ «ßπΘÑßΓó½∩ÑΓ ¡Ñ«íσ«ñ¿¼πε ¿¡¿µ¿á½¿ºá-
- µ¿ε.
-
- éßÑ «»¿ßá¡¿∩ ó¡πΓα¿ ¼«ñπ½∩ ßó∩ºá¡δ ñαπú ß ñαπú«¼. ìá»α¿¼Ñα,
- ¼«ñπ½∞ Strings ß«ñÑαª¿Γ óßÑ «»¿ßá¡¿∩, ¡Ñ«íσ«ñ¿¼δÑ ñ½∩ »«ñ»α«úαá¼¼
- αáí«Γδ ß« ßΓα«¬á¼¿ ß ºáóÑαΦáεΘ¿¼ ¡π½Ñ¼.
-
- Borland Pascal »αÑñ«ßΓáó½∩ÑΓ »«½∞º«óáΓѽε α∩ñ ßΓá¡ñáαΓ¡δσ
- ¼«ñπ½Ñ⌐, Γᬿσ ¬á¬ System, Crt WinCrt ¿ ñα. Ä¡¿ »«ññÑনóáεΓ ¡áΦ¿
- »α«úαá¼¼δ Borland Pascal ¿ óßÑ ºá»¿ßá¡δ ó «ñ¡π ¿º ΓαÑσ í¿í½¿«ΓÑσ
- ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ (ó ºáó¿ß¿¼«ßΓ¿ «Γ µÑ½Ñó«⌐ »½áΓΣ«α¼δ).
-
- ü¿í½¿«ΓѬ¿ ¿ß»«½¡∩εΘÑ⌐
- ß¿ßΓѼδ ñ½∩ µÑ½Ñó«⌐ »½áΓΣ«α¼δ Æáí½¿µá 7.1
- ┌─────────────────────────┬────────────────────────┐
- │ ê¼∩ í¿í½¿«ΓѬ¿ │ ûѽÑóá∩ »½áΓΣ«α¼á │
- ├─────────────────────────┼────────────────────────┤
- │ TURBO.TPL │ DOS αÑá½∞¡«ú« αѪ¿¼á │
- │ TPW.TPL │ Windows │
- │ TPP.TPL │ DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á │
- └─────────────────────────┴────────────────────────┘
-
- éáΦá »α«úαá¼¼á ¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ ½εíπε ¿º »α«µÑñπα ¿ Σπ¡¬-
- µ¿⌐ ó φΓ¿σ ¼«ñπ½∩σ, ¿ óá¼ ¡Ñ »«ΓαÑíπÑΓß∩ »¿ßáΓ∞ ¿σ ºá¡«ó«.
-
-
-
- B.Pascal 7 & Objects /UG - 164 -
-
- æΓαπ¬Γπαá ¼«ñπ½∩
- ─────────────────────────────────────────────────────────────────
-
- æΓαπ¬Γπαá ¼«ñπ½∩ á¡á½«ú¿τ¡á ßΓαπ¬ΓπαÑ »α«úαá¼¼δ, «ñ¡á¬« ÑßΓ∞
- ¡Ñ߬«½∞¬« ßπΘÑßΓóÑ¡¡δσ αẽ¿τ¿⌐. ìá»α¿¼Ñα, αáßß¼«Γα¿¼ ¼«ñπ½∞:
-
- unit <¿ñÑ¡Γ¿Σ¿¬áΓ«α>;
- interface
- uses <ß»¿ß«¬ ¼«ñπ½Ñ⌐>; { ìÑ«í∩ºáΓѽ∞¡δ⌐ }
- { ú½«íá½∞¡δÑ «»¿ßá¡¿∩ }
- implementation
- uses <ß»¿ß«¬_¼«ñπ½Ñ⌐>; { ìÑ«í∩ºáΓѽ∞¡δ⌐ }
- { ½«¬á½∞¡δÑ «»¿ßá¡¿∩ }
- { αÑ὿ºáµ¿∩ »α«µÑñπα ¿ Σπ¡¬µ¿⌐ }
- begin
- { ¬«ñ ¿¡¿µ¿á½¿ºáµ¿¿ }
- end.
-
- çáú«½«ó«¬ ¼«ñπ½∩ ¡áτ¿¡áÑΓß∩ ºáαѺÑαó¿α«óá¡¡δ¼ ß½«ó«¼ unit,
- ºá ¬«Γ«αδ¼ ß½ÑñπÑΓ ¿¼∩ ¼«ñπ½∩ (¿ñÑ¡Γ¿Σ¿¬áΓ«α) Γ«τ¡« ΓᬠªÑ, ¬á¬ ¿
- ó ß½πτáÑ ¿¼Ñ¡¿ »α«úαá¼¼δ. æ½ÑñπεΘ¿¼ φ½Ñ¼Ñ¡Γ«¼ ó ¼«ñπ½Ñ ∩ó½∩ÑΓß∩
- ¬½ετÑó«Ñ ß½«ó« interface. Ä¡« «í«º¡áτáÑΓ ¡áτὫ ¿¡ΓÑαΣÑ⌐ß¡«⌐
- ßѬµ¿¿ ¼«ñπ½∩ - τáßΓ¿, ñ«ßΓπ»¡«⌐ óßѼ ñαπú¿¼ ¼«ñπ½∩¼ ¿½¿ »α«úαá¼-
- ¼á¼, ó ¬«Γ«αδσ «¡ ¿ß»«½∞ºπÑΓß∩.
-
- Åα«úαá¼¼¡δ⌐ ¼«ñπ½∞ ¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ ñαπú¿Ñ ¼«ñπ½¿, ñ½∩
- φΓ«ú« «¡¿ «»αÑñѽ∩εΓß∩ ó «»ÑαáΓ«αÑ uses. Ä»ÑαáΓ«α uses (Ñß½¿ «¡
- ¿¼ÑÑΓ ¼ÑßΓ«) ¼«ªÑΓ ß«ñÑαªáΓ∞ß∩ ó ñóπσ ¼ÑßΓáσ. é«-»Ñαóδσ «¡ ¼«ªÑΓ
- ß½Ññ«óáΓ∞ ßαáºπ »«ß½Ñ ¬½ετÑó«ú« ß½«óá interface. é φΓ«¼ ß½πτáÑ
- ½εíδÑ ¬«¡ßΓá¡Γδ ¿ Γ¿»δ ñá¡¡δσ, «»¿ßá¡¡δÑ ó ¿¡ΓÑαΣÑ⌐ß¡«⌐ ßѬµ¿¿
- φΓ¿σ ¼«ñπ½Ñ⌐, ¼«úπΓ ¿ß»«½∞º«óáΓ∞ß∩ ó ½εí«¼ «»¿ßá¡¿¿ ó ¿¡ΓÑαΣÑ⌐ß-
- ¡«⌐ τáßΓ¿ ñá¡¡«ú« ¼«ñπ½∩.
-
- é«-óΓ«αδσ, «¡ ¼«ªÑΓ ß½Ññ«óáΓ∞ ¡Ñ¼Ññ½Ñ¡¡« ºá ¬½ετÑóδ¼ ß½«ó«¼
- implementation. é φΓ«¼ ß½πτáÑ óßÑ «»¿ßá¡¿∩ ¿º φΓ¿σ ¼«ñπ½Ñ⌐ ¼«úπΓ
- ¿ß»«½∞º«óáΓ∞ß∩ Γ«½∞¬« ó ßѬµ¿¿ αÑ὿ºáµ¿¿.
-
-
-
-
- B.Pascal 7 & Objects /UG - 165 -
-
- ê¡ΓÑαΣÑ⌐ß¡á∩ ßѬµ¿∩
- ─────────────────────────────────────────────────────────────────
-
- ê¡ΓÑαΣÑ⌐ß¡á∩ τáßΓ∞ - "«íΘÑñ«ßΓπ»¡á∩" τáßΓ∞ ó ¼«ñπ½Ñ - ¡áτ¿-
- ¡áÑΓß∩ ºáαѺÑαó¿α«óá¡¡δ¼ ß½«ó«¼ interface, ß½ÑñπÑΓ ßαáºπ »«ß½Ñ
- ºáú«½«ó¬á ¼«ñπ½∩ ¿ ºá¬á¡τ¿óáÑΓß∩ »ÑαÑñ ºáαѺÑαó¿α«óá¡¡δ¼ ß½«ó«¼
- implementation. ê¡ΓÑαΣÑ⌐ß «»αÑñѽ∩ÑΓ, τΓ« ∩ó½∩ÑΓß∩ "ó¿ñ¿¼δ¼"
- (ñ«ßΓπ»¡δ¼) ñ½∩ ½εí«⌐ »α«úαá¼¼δ (¿½¿ ¼«ñπ½∩), ¿ß»«½∞ºπεΘÑ⌐ ñá¡¡δ⌐
- ¼«ñπ½∞.
-
- é ¿¡ΓÑαΣÑ⌐ß¡«⌐ τáßΓ¿ (ßѬµ¿¿) ¼«ñπ½∩ ¼«ª¡« «»αÑñѽ∩Γ∞
- ¬«¡ßΓá¡Γδ, Γ¿»δ ñá¡¡δσ, »ÑαѼѡ¡δÑ, »α«µÑñπαδ ¿ Σπ¡¬µ¿¿. èᬠ¿ ó
- »α«úαá¼¼Ñ, «¡¿ ¼«úπΓ íδΓ∞ αáß»«½«ªÑ¡δ ó ½εí«¼ »«α∩ñ¬Ñ, ¿ ßѬµ¿¿
- ¼«úπΓ óßΓαÑτáΓ∞ß∩ »«óΓ«α¡« (¡á»α¿¼Ñα, óáΦá »α«úαá¼¼á ¼«ªÑΓ ß«ñÑα-
- ªáΓ∞ ßѬµ¿ε var, ºá ¬«Γ«α«⌐ ß½ÑñπÑΓ ßѬµ¿∩ const, á ºáΓѼ ñαπúá∩
- ßѬµ¿∩ var).
-
- Åα«µÑñπαδ ¿ Σπ¡¬µ¿¿, ó¿ñ¿¼δÑ ñ½∩ ½εí«⌐ »α«úαá¼¼δ,
- ¿ß»«½∞ºπεΘÑ⌐ ñá¡¡δ⌐ ¼«ñπ½∞, «»¿ßδóáεΓß∩ ó ßѬµ¿¿ ¿¡ΓÑαΣÑ⌐ßá,
- «ñ¡á¬« ¿σ ñÑ⌐ßΓó¿Γѽ∞¡δÑ Γѽá - αÑ὿ºáµ¿¿ - ¡áσ«ñ∩Γß∩ ó ßѬµ¿¿
- αÑ὿ºáµ¿¿. éá¼ ¡Ñ ¡πª¡« ¿ß»«½∞º«óáΓ∞ «»¿ßá¡¿∩ forward, ¿ «¡¿ ¡Ñ
- ñ«»π߬áεΓß∩. é ¿¡ΓÑαΣÑ⌐ß¡«⌐ τáßΓ¿ »ÑαÑτ¿ß½∩εΓß∩ óßÑ ºáú«½«ó¬¿
- »α«µÑñπαδ ¿ Σπ¡¬µ¿¿. æÑ¬µ¿∩ αÑ὿ºáµ¿¿ ß«ñÑαª¿Γ »α«úαá¼¼¡πε ½«ú¿-
- ¬π »α«µÑñπα ¿ Σπ¡¬µ¿⌐.
-
-
- æÑ¬µ¿∩ αÑ὿ºáµ¿¿
- ─────────────────────────────────────────────────────────────────
-
- æÑ¬µ¿∩ αÑ὿ºáµ¿¿ - "»α¿óáΓ¡á∩" τáßΓ∞ - ¡áτ¿¡áÑΓß∩
- ºáαѺÑαó¿α«óá¡¡δ¼ ß½«ó«¼ implementation. éßÑ, τΓ« «»¿ßá¡« ó
- ßѬµ¿¿ ¿¡ΓÑαΣÑ⌐ßá, ∩ó½∩ÑΓß∩ ó¿ñ¿¼δ¼ ó ßѬµ¿¿ αÑ὿ºáµ¿¿:
- ¬«¡ßΓá¡Γδ, Γ¿»δ, »ÑαѼѡ¡δÑ, »α«µÑñπαδ ¿ Σπ¡¬µ¿¿. èα«¼Ñ Γ«ú«, ó
- ßѬµ¿¿ αÑ὿ºáµ¿¿ ¼«úπΓ íδΓ∞ ßó«¿ ñ«»«½¡¿Γѽ∞¡δÑ «»¿ßá¡¿∩,
- ¬«Γ«αδÑ ¡Ñ ∩ó½∩εΓß∩ ó¿ñ¿¼δ¼¿ ñ½∩ »α«úαá¼¼, ¿ß»«½∞ºπεΘ¿σ φΓ«Γ
- ¼«ñπ½∞. Åα«úαá¼¼á ¡Ñ º¡áÑΓ «í ¿σ ßπΘÑßΓó«óá¡¿¿ ¿ ¡Ñ ¼«ªÑΓ
- ßßδ½áΓ∞ß∩ ¡á ¡¿σ ¿½¿ «íαáΘáΓ∞ß∩ ¬ ¡¿¼. Äñ¡á¬«, φΓ¿ ߬αδΓδÑ φ½Ñ-
- ¼Ñ¡Γδ ¼«úπΓ ¿ß»«½∞º«óáΓ∞ß∩ (¿, ¬á¬ »αá󿽫, ¿ß»«½∞ºπεΓß∩) "ó¿ñ¿-
- ¼δ¼¿" »α«µÑñπαἿ ¿ Σπ¡¬µ¿∩¼¿, Γ« ÑßΓ∞ ΓѼ¿ »«ñ»α«úαἼἿ, τ∞¿
- ºáú«½«ó¬¿ π¬áºá¡δ ó ßѬµ¿¿ ¿¡ΓÑαΣÑ⌐ßá.
-
- Ä»ÑαáΓ«α uses ¼«ªÑΓ ß«ñÑαªáΓ∞ß∩ ó ßѬµ¿¿ αÑ὿ºáµ¿¿
- (implementation) ¿ ñ«½ªÑ¡ ¡Ñ»«ßαÑñßΓóÑ¡¡« ß½Ññ«óáΓ∞ ºá ¬½ετÑóδ¼
- ß½«ó«¼ implementation.
-
- Äíδτ¡δÑ »α«µÑñπαδ ¿ Σπ¡¬µ¿¿, «»¿ßá¡¡δÑ ó ¿¡ΓÑαΣÑ⌐ß¡«⌐ ßѬ-
- µ¿¿, Γ« ÑßΓ∞ ΓÑ ¿º ¡¿σ, ¬«Γ«αδÑ ¡Ñ ∩ó½∩εΓß∩ »«ñßΓáó½∩Ñ¼δ¼¿
- (inline), ñ«½ª¡δ »«óΓ«α¡« π¬áºδóáεΓß∩ ó ßѬµ¿¿ αÑ὿ºáµ¿¿. çáú«-
- ½«ó«¬ procedure/function ñ«½ªÑ¡ íδΓ∞ ¿½¿ ¿ñÑ¡Γ¿τ¡δ¼ Γ«¼π, ¬«Γ«αδ⌐
- π¬áºá¡ ó ßѬµ¿¿ ¿¡ΓÑαΣÑ⌐ßá, ¿½¿ ¿¼ÑΓ∞ í«½ÑÑ ¬αáΓ¬πε Σ«α¼π. é ß½π-
- τáÑ ¬αáΓ¬«⌐ Σ«α¼δ ¡áíÑα¿ΓÑ ¬½ετÑó«Ñ ß½«ó« (procedure ¿½¿
- function), á ºá ¡¿¼ π¬áª¿ΓÑ ¿¼∩ »«ñ»α«úαá¼¼δ (¿ñÑ¡Γ¿Σ¿¬áΓ«α). çá-
- ΓѼ »«ñ»α«úαá¼¼á ñ«½ª¡á ß«ñÑαªáΓ∞ óßÑ ßó«¿ ½«¬á½∞¡δÑ «»¿ßá¡¿∩
-
- B.Pascal 7 & Objects /UG - 166 -
-
- (¼ÑΓ¬¿, ¬«¡ßΓá¡Γδ, Γ¿»δ, »ÑαѼѡ¡δÑ ¿ 󽫪ѡ¡δÑ »α«µÑñπαδ ¿ Σπ¡¬-
- µ¿¿), ºá ¬«Γ«α묨 ñ«½ª¡« ¡áσ«ñ¿Γ∞ß∩ «ß¡«ó¡«Ñ Γѽ« ßἫ⌐ »«ñ»α«ú-
- αá¼¼δ. ÅπßΓ∞ ó ¿¡ΓÑαΣÑ⌐ß¡«⌐ τáßΓ¿ π¬áºá¡δ ß½ÑñπεΘ¿Ñ «»¿ßá¡¿∩:
-
- procedure ISwap(var V1,V2 : integer);
- function IMax(V1,V2 : integer) : integer;
-
- Æ«úñá æÑ¬µ¿∩ αÑ὿ºáµ¿¿ íπñÑΓ ¿¼ÑΓ∞ ß½ÑñπεΘ¿⌐ ó¿ñ:
-
- procedure ISwap; var
- Temp := integer;
- begin
- Temp := V1; V1 := V2; V2 := Temp
- end; {¬«¡Ñµ »α«µÑñπαδ Swap}
- function IMax(V1,V2 : integer) : integer;
- begin
- if V1 > V2
- then IMax := V1
- else IMax := V2
- end; { ¬«¡Ñµ Σπ¡¬µ¿¿ Max }
-
- Å«ñ»α«úαá¼¼δ, ½«¬á½∞¡δÑ ñ½∩ ßѬµ¿¿ αÑ὿ºáµ¿¿ (Γ« ÑßΓ∞ ¡Ñ
- «»¿ßá¡¡δÑ ó ßѬµ¿¿ αÑ὿ºáµ¿¿), ñ«½ª¡δ ¿¼ÑΓ∞ »«½¡δ⌐ (¡Ñß«¬αáΘÑ¡-
- ¡δ⌐) ºáú«½«ó«¬ procedure/function.
-
-
- æÑ¬µ¿∩ ¿¡¿µ¿á½¿ºáµ¿¿
-
- Äíδτ¡« óß∩ ßѬµ¿∩ αÑ὿ºáµ¿¿ ¼«ñπ½∩ ºá¬½ετÑ¡á ¼Ñªñπ ºáαѺÑα-
- ó¿α«óá¡¡δ¼¿ ß½«óἿ implementation ¿ end. Äñ¡á¬«, Ñß½¿ »ÑαÑñ end
- »«¼ÑßΓ¿Γ∞ ºáαѺÑαó¿α«óá¡¡«Ñ ß½«ó« begin, á ¼Ñªñπ ¡¿¼¿ - «»ÑαáΓ«-
- αδ, Γ« »«½πτ¿óΦ¿⌐ß∩ ß«ßΓáó¡«⌐ «»ÑαáΓ«α, «τÑ¡∞ »«σ«ª¿⌐ ¡á «ß¡«ó¡«Ñ
- Γѽ« »α«úαá¼¼δ, ßΓá¡«ó¿Γß∩ ßѬµ¿Ñ⌐ ¿¡¿µ¿á½¿ºáµ¿¿ ¼«ñπ½∩
- (initialization).
-
- æÑ¬µ¿∩ ¿¡¿µ¿á½¿ºáµ¿¿ »αÑñßΓáó½∩ÑΓ ß«í«⌐ ¼ÑßΓ«, úñÑ ¿¡¿µ¿á½¿-
- º¿απεΓß∩ ßΓαπ¬Γπαδ ñá¡¡δσ (»ÑαѼѡ¡δσ), ¬«Γ«αδÑ ¿ß»«½∞ºπÑΓ »α«ú-
- αá¼¼¡δ⌐ ¼«ñπ½∞ ¿½¿ ¬«Γ«αδÑ «¡ ñѽáÑΓ ñ«ßΓπ»¡δ¼¿ »α«úαá¼¼Ñ, ¿ß-
- »«½∞ºπεΘÑ⌐ ñá¡¡δ⌐ ¼«ñπ½∞. éδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ φΓπ ßѬµ¿ε ñ½∩
- «Γ¬αδΓ¿∩ Σá⌐½«ó, ¬«Γ«αδÑ »α«úαá¼¼á ¿ß»«½∞ºπÑΓ »«ºñ¡ÑÑ.
-
- Åα¿ óδ»«½¡Ñ¡¿¿ »α«úαá¼¼δ, ¿ß»«½∞ºπεΘÑ⌐ ¡Ñ¬«Γ«αδ⌐ ¼«ñπ½∞,
- ßѬµ¿∩ ¿¡¿µ¿á½¿ºáµ¿¿ φΓ«ú« ¼«ñπ½∩ óδºδóáÑΓß∩ »ÑαÑñ ºá»π߬«¼ «ß-
- ¡«ó¡«ú« ΓÑ½á »α«úαá¼¼δ. àß½¿ »α«úαá¼¼á ¿ß»«½∞ºπÑΓ í«½ÑÑ «ñ¡«ú«
- ¼«ñπ½∩, Γ« ßѬµ¿¿ ¿¡¿µ¿á½¿ºáµ¿¿ óßÑσ ¼«ñπ½Ñ⌐ óδºδóáεΓß∩ (ó »«α∩ñ-
- ¬Ñ, π¬áºá¡¡«¼ ó «»ÑαáΓ«αÑ uses ó »α«úαá¼¼Ñ) »ÑαÑñ ΓѼ, ¬á¬ óδ»«½-
- ¡¿Γ∞ «ß¡«ó¡«Ñ Γѽ« »α«úαá¼¼δ.
-
-
- èᬠ¿ß»«½∞ºπεΓß∩ ¼«ñπ½¿?
-
- î«ñπ½¿, ¬«Γ«αδÑ ¿ß»«½∞ºπÑΓ óáΦá »α«úαá¼¼á, πªÑ «ΓΓαá¡ß½¿α«-
-
- B.Pascal 7 & Objects /UG - 167 -
-
- óá¡δ ¿ σαá¡∩Γß∩, ¬á¬ ¼áΦ¿¡¡δ⌐ ¬«ñ, á ¡Ñ ¬á¬ ¿ßσ«ñ¡δ⌐ ¬«ñ ¡á Åáß-
- ¬á½Ñ, »«ß¬«½∞¬π «¡¿ ¡Ñ ∩ó½∩εΓß∩ ó¬½ετáÑ¼δ¼¿ Σá⌐½á¼¿. äáªÑ ¿¡ΓÑα-
- ΣÑ⌐ß¡á∩ ßѬµ¿∩ σαá¡¿Γß∩ ó ߻ѵ¿á½∞¡«¼ ñó«¿τ¡«¼ Σ«α¼áΓÑ Γáí½¿µδ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó, ¿ß»«½∞ºπѼ«¼ ó Borland Pascal. ü«½ÑÑ Γ«ú«, «»αÑ-
- ñѽѡ¡δÑ ßΓá¡ñáαΓ¡δÑ ¼«ñ㫨 σαá¡∩Γß∩ ó ߻ѵ¿á½∞¡«¼ Σá⌐½Ñ
- (TURBO.TPL, TPW.TPL ¿½¿ TPP.TPL) ¿ áóΓ«¼áΓ¿τÑ߬¿ ºáúαπªáεΓß∩ ó
- »á¼∩Γ∞ ó¼ÑßΓÑ ß Borland Pascal.
-
- é αѺπ½∞ΓáΓÑ ¿ß»«½∞º«óá¡¿Ñ «ñ¡«ú« ¿½¿ ¡Ñ߬«½∞¬¿σ ¼«ñπ½Ñ⌐
- «τÑ¡∞ ¡Ñº¡áτ¿Γѽ∞¡« πóѽ¿τ¿óáÑΓ óαѼ∩ ¬«¼»¿½∩µ¿¿ óáΦÑ⌐ »α«úαá¼¼δ
- («íδτ¡« ¼Ñ¡ÑÑ, τѼ ¡á ßѬπ¡ñπ).
-
- öá¬Γ¿τÑ߬¿, Ñß½¿ ¼«ñπ½∞ ߬«¼»¿½¿α«óá¡, Ñú« ¿ß»«½∞º«óá¡¿Ñ
- ß«σαá¡∩ÑΓ óá¼ óαѼ∩ »α¿ »ÑαѬ«¼»¿½∩µ¿¿. ū߬«½∞¬π ¬«¼»¿½∩Γ«α ¡Ñ
- »ÑαѬ«¼»¿½¿απÑΓ ¼«ñπ½∞, »«¬á «¡ ¡Ñ ¿º¼Ñ¡∩ÑΓß∩, ¿ß»«½∞º«óá¡¿Ñ ¼«-
- ñπ½Ñ⌐ ó »α«úαá¼¼Ñ π߬«α¿Γ »α«µÑßß ÑÑ »«ßΓα«Ñ¡¿∩.
-
- èᬠπ¬áºδóὫß∞ αá¡ÑÑ, ñ½∩ ¿ß»«½∞º«óá¡¿∩ ߻ѵ¿á½∞¡«ú« ¼«ñπ½∩
- ¿½¿ ¡áí«αá ¼«ñπ½Ñ⌐ ¡Ñ«íσ«ñ¿¼« ó ¡áτá½Ñ »α«úαá¼¼δ »«¼ÑßΓ¿Γ∞ «»Ñαá-
- Γ«α uses, »«ß½Ñ ¬«Γ«α«ú« π¬áºáΓ∞ ß»¿ß«¬ ¿¼Ñ¡ ΓÑσ ¼«ñπ½Ñ⌐, ¬«Γ«αδÑ
- íπñπΓ ¿ß»«½∞º«óáΓ∞ß∩. ê¼Ñ¡á ¿σ ñ«½ª¡δ αáºñѽ∩Γ∞ß∩ ºá»∩Γ묨:
-
- program MyProg;
- uses thisUnit, thatUnit, theOtherUnit;
-
- è«úñá ¬«¼»¿½∩Γ«α óßΓαÑτáÑΓ Γᬫ⌐ «»ÑαáΓ«α uses, «¡ »α¿íáó½∩-
- ÑΓ ¿¡Σ«α¼áµ¿ε ¿º ßѬµ¿¿ ¿¡ΓÑαΣÑ⌐ßá ¬áªñ«ú« ¼«ñπ½∩ ¬ Γáí½¿µÑ ¿ñÑ¡-
- Γ¿Σ¿¬áΓ«α«ó ¿ »α¿ß«Ññ¿¡∩ÑΓ ¼áΦ¿¡¡δ⌐ ¬«ñ, »αÑñßΓáó½Ñ¡¡δ⌐ ó ßѬµ¿¿
- αÑ὿ºáµ¿¿, ¬ ßἫ⌐ »α«úαá¼¼Ñ.
-
- î«ñ㫨 »α¿ß«Ññ¿¡∩εΓß∩ ¬ Γáí½¿µÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó ó π¬áºá¡¡«¼
- »«α∩ñ¬Ñ. Å«α∩ñ«¬ ¼«ñπ½Ñ⌐ ó «»ÑαáΓ«αÑ uses º¡áτÑ¡¿∩ ¡Ñ ¿¼ÑÑΓ. àß½¿
- ¼«ñπ½∞ thisUnit ¿ß»«½∞ºπÑΓ thatUnit ¿½¿ ¡á«í«α«Γ, óδ ¼«ªÑΓÑ «»¿-
- ßáΓ∞ ¿σ ó ½εí«¼ »«α∩ñ¬Ñ, á ¬«¼»¿½∩Γ«α «»αÑñѽ¿Γ, ¬á¬«⌐ ¼«ñπ½∞
- ¡πª¡« ߬«¼»«¡«óáΓ∞ ß »α«úαá¼¼«⌐ MyProg »Ñαóδ¼. öá¬Γ¿τÑ߬¿, Ñß½¿
- ¼«ñπ½∞ thisUnit ¿ß»«½∞ºπÑΓ thatUnit, ¡« MyProg ¡Ñ óδºδóáÑΓ ¡Ñ»«ß-
- αÑñßΓóÑ¡¡« ¡¿ «ñ¡π ¿º »«ñ»α«úαá¼¼ ó ¼«ñπ½Ñ thatUnit, óδ ¼«ªÑΓÑ
- "߬αδΓ∞" »«ñ»α«úαá¼¼δ ¼«ñπ½∩ thatUnit, «»πßΓ¿ó Ñú« ó «»ÑαáΓ«αÑ
- uses:
-
- unit thisUnit;
- uses thatUnit;
- .
- .
- .
- program MyProg;
- uses thisUnit, theOtherUnit;
- .
- .
- .
-
- é φΓ«¼ »α¿¼ÑαÑ ¼«ñπ½∞ thisUnit ¼«ªÑΓ óδºδóáΓ∞ ½εíπε »«ñ»α«ú-
-
- B.Pascal 7 & Objects /UG - 168 -
-
- αá¼¼π ¼«ñπ½∩ thatUnit, á »α«úαá¼¼á MyProg ¼«ªÑΓ óδºδóáΓ∞ ½εíπε ¿º
- »«ñ»α«úαá¼¼ ¼«ñπ½∩ thisUnit ¿½¿ theOtherUnit. Äñ¡á¬«, »α«úαá¼¼á
- MyProg ¡Ñ ¼«ªÑΓ óδºδóáΓ∞ »«ñ»α«úαá¼¼δ ¼«ñπ½∩ thatUnit, »«ß¬«½∞¬π
- thatUnit ¡Ñ π¬áºδóáÑΓß∩ ó «»ÑαáΓ«αÑ uses »α«úαá¼¼δ MyProg.
-
- àß½¿ ó »α«úαá¼¼Ñ ¡Ñ π¬áºá¡ «»ÑαáΓ«α uses, Borland Pascal ó ½ε-
- í«¼ ß½πτáÑ »α¿ß«Ññ¿¡¿Γ ßΓá¡ñáαΓ¡δ⌐ ¼«ñπ½∞ System. ¥Γ«Γ ¼«ñπ½∞
- «íÑß»Ñτ¿Γ óδ»«½¡Ñ¡¿Ñ ¡Ñ¬«Γ«αδσ ßΓá¡ñáαΓ¡δσ »«ñ»α«úαá¼¼ Borland
- Pascal, á Γá¬ªÑ ¡Ñ߬«½∞¬¿σ »«ñ»α«úαá¼¼, ߻ѵ¿Σ¿τÑ߬¿σ ñ½∩ Borland
- Pascal.
-
-
- æß佬¿ ¡á «»¿ßá¡¿∩ ¼«ñπ½∩
- ─────────────────────────────────────────────────────────────────
-
- èá¬ Γ«½∞¬« óδ ó¬½ετ¿½¿ ¼«ñπ½∞ ó ßó«ε »α«úαá¼¼π, óßÑ ¬«¡ßΓá¡-
- Γδ, Γ¿»δ ñá¡¡δσ, »ÑαѼѡ¡δÑ, »α«µÑñπαδ ¿ Σπ¡¬µ¿¿, «»¿ßá¡¡δÑ ó
- ßѬµ¿¿ ¿¡ΓÑαΣÑ⌐ßá φΓ«ú« ¼«ñπ½∩, ßΓá¡«ó∩Γß∩ ñ«ßΓπ»¡δ¼¿ ñ½∩ óáΦÑ⌐
- »α«úαá¼¼δ. ìá»α¿¼Ñα, ñ«»πßΓ¿¼, ¿¼ÑÑΓß∩ ß½ÑñπεΘ¿⌐ ¼«ñπ½∞:
-
- unit MyStuff;
- interface
- const
- MyValue = 915;
- type
- MyStars = (Deneb,Antares,Betelgeuse);
- var
- MyWord : string[20];
-
- procedure SetMyWord(Star : MyStars);
- function TheAnswer : integer;
- implementation
- .
- .
- .
- end.
-
- èᬠ¼«ª¡« ó¿ñÑΓ∞ ºñÑß∞ ó ¿¡ΓÑαΣÑ⌐ß¡«⌐ τáßΓ¿ ¼«ñπ½∩, Γá τáßΓ∞
- ¼«ñπ½∩, ¬«Γ«αá∩ ¡áσ«ñ¿Γß∩ ó ¿¡ΓÑαΣÑ⌐ß¡«⌐ ßѬµ¿¿, ∩ó½∩ÑΓß∩ ó¿ñ¿¼«⌐
- ñ½∩ óáΦÑ⌐ »α«úαá¼¼δ (¿ ¼«ªÑΓ Ñε ¿ß»«½∞º«óáΓ∞ß∩). æ πτÑΓ«¼ φΓ«ú«
- ¼«ª¡« ¡á»¿ßáΓ∞ ß½ÑñπεΘπε »α«úαá¼¼π:
-
- program TestStuff;
- uses MyStuff;
- var
- I : integer;
- AStar : MyStars;
- begin
- Writeln(myValue);
- AStar := Deneb;
- SetMyWord(AStar);
- Writeln(MyWord);
- I := TheAnswer;
-
- B.Pascal 7 & Objects /UG - 169 -
-
- Writeln(I)
- end.
-
- Å«ß½Ñ ó¬½ετÑ¡¿∩ ó »α«úαá¼¼π «»ÑαáΓ«αá uses MyStuff óδ ¼«ªÑΓÑ
- ßßδ½áΓ∞ß∩ ¡á óßÑ ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ, «»¿ßá¡¡δÑ ó ¿¡ΓÑαΣÑ⌐ß¡«⌐ ßѬµ¿¿
- ¼«ñπ½∩ îyStuff (îyWord, îyValue ¿ Γᬠñá½ÑÑ). Äñ¡á¬«, αáßß¼«Γα¿¼
- ß½ÑñπεΘπε ß¿Γπᵿε:
-
- program TestStuff;
- uses MyStuff;
- const
- MyValue = 22;
- var
- I : integer;
- AStar : MyStars;
-
- function TheAnswer : integer;
- begin
- TheAnswer := 1
- end;
-
- begin
- Writeln(myValue);
- AStar := Deneb;
- SetMyWord(AStar);
- Writeln(MyWord);
- I := TheAnswer;
- Writeln(I)
- end.
-
- é φΓ«⌐ »α«úαá¼¼Ñ »ÑαÑ«»αÑñѽ∩εΓß∩ ¡Ñ¬«Γ«αδÑ ¿º ¿ñÑ¡Γ¿Σ¿¬áΓ«-
- α«ó, «»¿ßá¡¡δσ ó îyStuff. üπñπτ¿ ߬«¼»¿½¿α«óá¡¡«⌐ ¿ óδ»«½¡Ñ¡¡«⌐,
- φΓá »α«úαá¼¼á íπñÑΓ ¿ß»«½∞º«óáΓ∞ ß«íßΓóÑ¡¡δÑ «»αÑñѽѡ¿∩ ñ½∩
- îyValue ¿ ÆheAnswer, »«ß¬«½∞¬π «¡¿ í뫨 «»¿ßá¡δ »«ºñ¡ÑÑ, τѼ «»-
- αÑñѽѡ¿∩ ó îyStuff.
-
- éÑα«∩Γ¡«, óá¼ ¿¡ΓÑαÑß¡« º¡áΓ∞, ¬á¬¿¼ «íαẫ¼ ó Γᬫ⌐ ß¿Γπá-
- µ¿¿ ¼«ª¡« ßßδ½áΓ∞ß∩ ¡á ¿ñÑ¡Γ¿Σ¿¬áΓ«αδ ó îyStuff. ä½∩ φΓ«ú« ¡Ñ«í-
- σ«ñ¿¼« »ÑαÑñ ¬áªñδ¼ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«¼ »«¼ÑΘáΓ∞ ¿¼∩ îyStuff ß Γ«τ¬«⌐
- (.). ìá»α¿¼Ñα, αáßß¼«Γα¿¼ ÑΘÑ «ñ¡π óÑαß¿ε φΓ«⌐ »α«úαá¼¼δ:
-
- program TestStuff;
- uses MyStuff;
- const
- MyValue = 22;
- var
- I : integer;
- AStar : MyStars;
-
- function TheAnswer : integer;
- begin
- TheAnswer := 1
- end;
-
- B.Pascal 7 & Objects /UG - 170 -
-
-
- begin
- Writeln(MyStuff.MyValue);
- AStar := Deneb;
- SetMyWord(AStar);
- Writeln(MyWord);
- I := MyStuff.TheAnswer
- Writeln(I)
- end.
-
- ¥Γá ΓαÑΓ∞∩ »α«úαá¼¼á ñáßΓ Γá¬¿Ñ ªÑ «ΓóÑΓδ, τΓ« ¿ »Ñαóá∩, ñá-
- ªÑ ó Γ«¼ ß½πτáÑ, Ñß½¿ óδ »ÑαÑ«»αÑñѽ¿ΓÑ MyValue ¿ TheAnswer. é
- ñÑ⌐ßΓó¿Γѽ∞¡«ßΓ¿ óδ ¿¼Ñ½¿ »«½¡«Ñ »αáó« ¡á»¿ßáΓ∞ »Ñαóπε »α«úαá¼¼π
- ß½ÑñπεΘ¿¼ «íαẫ¼:
-
- program TestStuff;
- uses MyStuff;
- var
- I : integer;
- AStar : MyStuff.MyStars;
-
- begin
- Writeln(MyStuff.MyValue);
- AStar := My.Stuff.Deneb;
- MyStuff.SetMyWord(AStar);
- Writeln(My.Stuff.MyWord);
- I := MyStuff.TheAnswer;
- Writeln(I)
- end.
-
- ÄΓ¼ÑΓ¿¼, τΓ« ¿¼∩ ¼«ñπ½∩ ¼«ªÑΓ »αÑñΦÑßΓó«óáΓ∞ ½εí«¼π ¿ñÑ¡Γ¿-
- Σ¿¬áΓ«απ: ¬«¡ßΓá¡ΓÑ, Γ¿»π ñá¡¡δσ, »ÑαѼѡ¡«⌐ ¿½¿ »«ñ»α«úαá¼¼Ñ.
-
-
- Ä»ÑαáΓ«α uses ßѬµ¿¿ αÑ὿ºáµ¿¿
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal »«ºó«½∩ÑΓ óá¼ αẼÑΘáΓ∞ ó ßѬµ¿¿ αÑ὿ºáµ¿¿
- «»ÑαáΓ«α uses. é ß½πτáÑ Ñú« »α¿ßπΓßΓó¿∩ «»ÑαáΓ«α uses ñ«½ªÑ¡ ß½Ñ-
- ñ«óáΓ∞ ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ¬½ετÑóδ¼ ß½«ó«¼ implementation (á¡á½«-
- ú¿τ¡« Γ«¼π, ¬á¬ ó ¿¡ΓÑαΣÑ⌐ß¡«⌐ ßѬµ¿¿ «»ÑαáΓ«α uses ñ«½ªÑ¡ ß½Ññ«-
- óáΓ∞ ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ¬½ετÑóδ¼ ß½«ó«¼ interface).
-
- ÉẼÑΘÑ¡¿Ñ ó ßѬµ¿¿ αÑ὿ºáµ¿¿ «»ÑαáΓ«αá uses »«ºó«½∩ÑΓ
- "߬αδΓ∞" ó¡πΓαÑ¡¡¿Ñ ñÑΓ὿ ¼«ñπ½∩, »«ß¬«½∞¬π ¿ß»«½∞ºπѼδÑ ó ßѬ-
- µ¿¿ αÑ὿ºáµ¿¿ ¼«ñ㫨 «¬áºδóáεΓß∩ "¡Ñó¿ñ¿¼δ¼¿" ñ½∩ Γ«ú«, ¬Γ« φΓ«Γ
- ¼«ñπ½∞ ¿ß»«½∞ºπÑΓ. ü«½ÑÑ ó᪡δ¼, «ñ¡á¬«, ∩ó½∩ÑΓß∩ Γ«, τΓ« φΓ«
- »«ºó«½∩ÑΓ óá¼ ßΓα«¿Γ∞ óºá¿¼¡«ºáó¿ß¿¼δÑ ¼«ñπ½¿.
-
- ū߬«½∞¬π »α«úαá¼¼¡δÑ ¼«ñ㫨 ó Borland Pascal ¡Ñ «í∩ºá¡δ
- ¿¼ÑΓ∞ ßΓα«ú« ¿Ñαáασ¿τÑ߬πε ßΓαπ¬Γπαπ, Γ« ñ«»π߬áÑΓß∩ ¿ß»«½∞º«óáΓ∞
- µ¿¬½¿τÑ߬¿Ñ ßß佬¿ ¡á ¼«ñπ½¿. Ä µ¿¬½¿τÑ߬¿σ ßß佬áσ ¡á ¼«ñπ½¿
- αáß߬áºδóáÑΓß∩ ó â½áóÑ 10 "æ»αáó«τ¡«ú« απ¬«ó«ñßΓóá »« ∩ºδ¬π".
-
- B.Pascal 7 & Objects /UG - 171 -
-
- æΓá¡ñáαΓ¡δÑ ¼«ñπ½¿
- ─────────────────────────────────────────────────────────────────
-
- î«ñ㫨 í¿í½¿«ΓѬ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ Borland Pascal ºáúαπªá-
- εΓß∩ ó »á¼∩Γ∞ ó¼ÑßΓÑ ß Borland Pascal; óδ óßÑúñá ¼«ªÑΓÑ ¿σ ¿ß-
- »«½∞º«óáΓ∞. Äíδτ¡« í¿í½¿«ΓѬ¿ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ (TURéÄ.TPL,
- TPW.TPL ¿ TPP.TPL) ¡áσ«ñ∩Γß∩ ó Γ«¼ ªÑ ¬áΓὫúÑ, τΓ« ¿ ¬«¼»¿½∩Γ«α
- (TURBO.EXE. BPW.EXE ¿ BP.EXE).
-
-
- 櫺ñá¡¿Ñ óáΦ¿σ ß«íßΓóÑ¡¡δσ ¼«ñπ½Ñ⌐
- ─────────────────────────────────────────────────────────────────
-
- àß½¿ óδ σ«Γ¿ΓÑ ¡á»¿ßáΓ∞ ¼«ñπ½∞, ß«ñÑαªáΘ¿⌐ ¡Ñ¬«Γ«αδÑ »«½Ñº-
- ¡δÑ »«ñ»α«úαá¼¼δ, ¿ ¿ß»«½∞º«óáΓ∞ φΓ¿ »«ñ»α«úαá¼¼δ ó ßó«¿σ »α«ú-
- αá¼¼áσ, ¡á»¿Φ¿ΓÑ ¼«ñ㫨 ¿ ß«σαá¡¿ΓÑ Ñú« »«ñ ¿¼Ñ¡Ñ¼, ºáñá¡¡δ¼ ó
- ºáú«½«ó¬Ñ ¼«ñπ½∩. Borland Pascal ß«σαá¡∩ÑΓ Σá⌐½ ß αáßΦ¿αÑ¡¿Ñ¼
- .PAS, ¬á¬ ¿ ½εí«⌐ ñαπú«⌐ Σá⌐½, ß«ºñá¡¡δ⌐ ó αÑñá¬Γ«αÑ Borland
- Pascal. é ¿ßσ«ñ¡«¼ Σá⌐½Ñ ¼«ªÑΓ ß«ñÑαªáΓ∞ß∩ Γ«½∞¬« «ñ¿¡ ¼«ñπ½∞.
-
-
- 諼»¿½∩µ¿∩ ¼«ñπ½∩
- ─────────────────────────────────────────────────────────────────
-
- 欫¼»¿½¿α«óáΓ∞ ¼«ñπ½∞ óδ ¼«ªÑΓÑ ñóπ¼∩ ß»«ß«íἿ. éδ ¼«ªÑΓÑ:
-
- * 欫¼»¿½¿απ⌐ΓÑ ¼«ñπ½∞ ß »«¼«Θ∞ε ¬«¼á¡ñδ Compile│Compile.
- é¼ÑßΓ« ß«ºñá¡¿∩ Σá⌐½á .EXE Borland Pascal ß«ºñáÑΓ Σá⌐½
- .TPU, .TPW ¿½¿ .TPP.
-
- ┌────────────────────────┬─────────────────────────┐
- │ ûѽÑóá∩ »½áΓΣ«α¼á │ ÉáßΦ¿αÑ¡¿Ñ ¿¼Ñ¡¿ Σá⌐½á │
- │ │ ¼«ñπ½∩ │
- ├────────────────────────┼─────────────────────────┤
- │ DOS αÑá½∞¡«ú« αѪ¿¼á │ .TPU │
- │ Windows │ .TPW │
- │ DOS ºáΘ¿ΘÑ¡¡«ú« αѪ¿¼á │ .TPP │
- └────────────────────────┴─────────────────────────┘
-
- ìá»α¿¼Ñα, Ñß½¿ óáΦ ¼«ñπ½∞ ¡áºδóáÑΓß∩ MYUNIT.PAS, Ñß½¿ µÑ-
- ½Ñó«⌐ »½áΓΣ«α¼«⌐ ∩ó½∩ÑΓß∩ Windows, «¡ ¬«¼»¿½¿απÑΓß∩ ó
- MYUNIT.TWP.
-
- * ä½∩ ¬«¼»¿½∩µ¿¿ »α«úαá¼¼δ, ¬«Γ«αá∩ ó¬½ετáÑΓ ó ßÑí∩ «»ÑαáΓ«α
- uses, ¿ß»«½∞ºπ⌐ΓÑ ¬«¼á¡ñπ Compile│Make ¿½¿ Compile│Build.
- é ºáó¿ß¿¼«ßΓ¿ «Γ µÑ½Ñó«⌐ »½áΓΣ«α¼δ, ß«ºñáÑΓß∩ Σá⌐½ .TPU,
- .TPW ¿½¿ .TPP.
-
- Åα¿¼Ñτá¡¿Ñ: Ä Γ«¼, ¬á¬ ¿ß»«½∞º«óáΓ∞ «»ÑαáΓ«α uses,
- αáß߬áºδóáÑΓß∩ ó ß½ÑñπεΘѼ αáºñѽÑ.
-
-
-
- B.Pascal 7 & Objects /UG - 172 -
-
- ä«ßΓπ»¡«ßΓ∞ ¼«ñπ½∩ ñ½∩ »α«úαá¼¼δ
- ─────────────────────────────────────────────────────────────────
-
- 欫»¿απ⌐ΓÑ ßó«⌐ ¡«óδ⌐ Σá⌐½ .TPU, .TPW ¿½¿ .TPP ó ¬áΓὫú ¼«-
- ñπ½Ñ⌐, ºáñá¡¡δ⌐ ó ñ¿á½«ú«ó«¼ «¬¡Ñ Options│Directories, ¿½¿ ¿ß-
- »«½∞ºπ⌐ΓÑ »áαá¼ÑΓα ¬«¼á¡ñ¡«⌐ ßΓ᫬¿ /U »α¿ αáí«ΓÑ ß ¬«¼»¿½∩Γ«α«¼
- αѪ¿¼á ¬«¼á¡ñ¡«⌐ ßΓ᫬¿.
-
- àß½¿ óδ »«¼ÑßΓ¿ΓÑ ßó«⌐ ¼«ñπ½∞ ó ºáñá¡¡δ⌐ ¬áΓὫú ¼«ñπ½Ñ⌐, Γ«
- ß¼«ªÑΓÑ ßßδ½áΓ∞ß∩ ¡á φëà ¼«ñπ½∞, ñáªÑ Ñß½¿ «¡ ¡Ñ ¡áσ«ñ¿Γß∩ ó ΓÑ-
- ¬πΘѼ ¬áΓὫúÑ ¿½¿ ó í¿í½¿«ΓѬáσ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ.
-
- 鬽ετ¿ΓÑ ó ½εíπε »α«úαá¼¼π, úñÑ óδ σ«Γ¿ΓÑ ¿ß»«½∞º«óáΓ∞ ßó«⌐
- ¡«óδ⌐ ¼«ñπ½∞, «»ÑαáΓ«α uses. ìá»α¿¼Ñα, Ñß½¿ óáΦ ¡«óδ⌐ ¼«ñπ½∞ ¡á-
- ºδóáÑΓß∩ INTLIB.TPW, Γ« ºáñá⌐ΓÑ ó ßó«Ñ⌐ »α«úαá¼¼Ñ «»ÑαáΓ«α ß½Ññπ-
- εΘÑú« ó¿ñá:
-
- uses IntLib;
-
- ùΓ«íδ ¡á⌐Γ¿ ¼«ñπ½∞, ¿¼∩ ¬«Γ«α«ú« π¬áºá¡« ó «»ÑαáΓ«αÑ uses,
- Borland Pascal »α«óÑα∩ÑΓ Ñú« ¡á½¿τ¿Ñ ó í¿í½¿«ΓÑ¬Ñ ¿ß»«½¡∩εΘÑ⌐
- ß¿ßΓѼδ, ºáúαπªÑ¡¡«⌐ ó »á¼∩Γ∞ ó óαѼ∩ ¿¡¿µ¿á½¿ºáµ¿¿.
-
- Åα¿¼Ñτá¡¿Ñ: Ä Γ«¼, ¬á¬ »«¼ÑßΓ¿Γ∞ ¼«ñπ½∞ ó í¿í½¿«ΓѬπ
- ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ, αáß߬áºδóáÑΓß∩ ¡¿ªÑ.
-
- àß½¿ ¼«ñπ½∞ ó í¿í½¿«ΓÑ¬Ñ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓÑ¼δ «ΓßπΓßΓóπÑΓ, Γ«
- ¬«¼»¿½∩Γ«α ¿ΘÑΓ Ñú« ¡á ñ¿ß¬Ñ, ß¡áτá½á ó ΓѬπΘѼ ¬áΓὫúÑ, ºáΓѼ ó
- ¬áΓὫúáσ, ºáñá¡¡δσ ó ¬áτÑßΓóÑ ¬áΓὫú«ó ¼«ñπ½Ñ⌐ (Options│
- Directories). 諼»¿½∩Γ«α »αÑñ»«½áúáÑΓ, τΓ« ¿¼∩ Σá⌐½á ß«ó»áñáÑΓ ß
- ¿¼Ñ¡Ñ¼ ¼«ñπ½∩, á αáßΦ¿αÑ¡¿Ñ ¿¼Ñ¡¿ Σá⌐½á - φΓ« .TPU, .TPW ¿½¿
- .TPP. êßσ«ñ¡δ⌐ ΓѬßΓ ¼«ñπ½∩ ¿¼ÑÑΓ αáßΦ¿αÑ¡¿Ñ .PAS.
-
-
- B.Pascal 7 & Objects /UG - 173 -
-
- Åα¿¼Ñα
-
- ÆÑ»Ñα∞ ¡á»¿ΦѼ ¡Ñí«½∞Φ«⌐ ¼«ñπ½∞. ìẫóѼ Ñú« IntLib ¿ óßΓá-
- ó¿¼ ó ¡Ñú« ñóÑ »α«ßΓδÑ »«ñ»α«úαá¼¼δ ñ½∩ µÑ½δσ τ¿ßѽ - »α«µÑñπαπ ¿
- Σπ¡¬µ¿ε:
-
- unit IntLib;
-
- interface
- procedure ISwap(var I,J : integer);
- function IMax(I,J : integer) : integer;
- implementation
- procedure ISwap;
- var
- Temp : integer;
-
- begin
- Temp := I; I := J; J := Temp
- end; { ¬«¡Ñµ »α«µÑñπαδ ISwap }
- function IMax;
- begin
- if I > J
- then IMax := I
- else IMax := J
- end; { ¬«¡Ñµ Σπ¡¬µ¿¿ IMax }
- end. { ¬«¡Ñµ ¼«ñπ½∩ IntLib }
-
- ìáíÑα¿ΓÑ φëà ¼«ñπ½∞, ºá»¿Φ¿ΓÑ Ñú« ó Σá⌐½ INTLIé.PAS, á ºá-
- ΓѼ ߬«¼»¿½¿απ⌐ΓÑ, ºáñáó ó ¬áτÑßΓóÑ µÑ½Ñó«⌐ »½áΓΣ«α¼δ ºáΘ¿ΘÑ¡¡δ⌐
- αѪ¿¼ DOS. é αѺπ½∞ΓáΓÑ »«½πτ¿¼ ¬«ñ ¼«ñπ½∩ ó Σá⌐½Ñ INTLIé.ÆÉP.
- ÅÑαÑΦ½Ñ¼ Ñú« ó ¬áΓὫú ¼«ñπ½Ñ⌐ (Ñß½¿ Γᬫ⌐ ¿¼ÑÑΓß∩), ¿½¿ «ßΓáó¿ó
- ó Γ«¼ ªÑ ¬áΓὫúÑ, úñÑ ¡áσ«ñ¿Γß∩ ß½ÑñπεΘá∩ »α«úαá¼¼á, ¬«Γ«αá∩ ¿ß-
- »«½∞ºπÑΓ ¼«ñπ½∞ IntLib:
-
- program IntTest;
- uses IntLib;
- var
- A,B : integer;
- begin
- Write('éóÑñ¿ΓÑ ñóá µÑ½«τ¿ß½Ñ¡¡δσ º¡áτÑ¡¿∩: ');
- Readln(A,B);
- ISwap(A,B);
- Writeln('A = ',A,' B = ',B);
- Writeln('îá¬ß¿¼á½∞¡«Ñ º¡áτÑ¡¿Ñ αáó¡« ',IMax(A,B));
- end. { ¬«¡Ñµ »α«úαá¼¼δ IntTest }
-
-
- î«ñ㫨 ¿ í«½∞Φ¿Ñ »α«úαá¼¼δ
-
- ä« ß¿σ »«α ¼δ ú«ó«α¿½¿ « ¼«ñπ½∩σ ¬á¬ « í¿í½¿«ΓѬáσ - ¡áí«αáσ
-
- B.Pascal 7 & Objects /UG - 174 -
-
- »«½Ñº¡δσ »«ñ»α«úαá¼¼, ¬«Γ«αδÑ ¼«úπΓ ¿ß»«½∞º«óáΓ∞ß∩ ¡Ñ߬«½∞¬¿¼¿
- »α«úαἼἿ. Äñ¡á¬«, π ¼«ñπ½∩ ÑßΓ∞ ÑΘÑ «ñ¡á Σπ¡¬µ¿∩ - αáºí¿óáΓ∞
- í«½∞Φπε »α«úαá¼¼π ¡á ß«ßΓáó¡δÑ τáßΓ¿.
-
- äóá á߻ѬΓá Borland Pascal ß»«ß«íßΓóπεΓ ¿ß»«½∞º«óá¡¿ε ¼«ñπ-
- ½Ñ⌐ ó Γᬫ⌐ Σπ¡¬µ¿¿:
-
- * óδß«¬á∩ ߬«α«ßΓ∞ ¬«¼»¿½∩µ¿¿ ¿ ¬«¼»«¡«ó¬¿;
-
- * ß»«ß«í¡«ßΓ∞ αáí«ΓáΓ∞ ß ¡Ñ߬«½∞¬¿¼¿ Σá⌐½á¼¿ «ñ¡«óαѼѡ¡«,
- ¡á»α¿¼Ñα, ß »α«úαá¼¼«⌐ ¿ ¡Ñ߬«½∞¬¿¼¿ ¼«ñπ½∩¼¿.
-
- Äíδτ¡« í«½∞Φá∩ »α«úαá¼¼á αáºí¿óáÑΓß∩ ¡á ¼«ñπ½¿, ¬«Γ«αδÑ
- úαπ»»¿απεΓ »α«µÑñπαδ »« ¿σ Σπ¡¬µ¿∩¼. ìá»α¿¼Ñα, »α«úαá¼¼á αÑñá¬Γ«-
- αá ¼«ªÑΓ íδΓ∞ αáºñÑ½Ñ¡á ¡á τáßΓ¿, óδ»«½¡∩εΘ¿Ñ ¿¡¿µ¿á½¿ºáµ¿ε, αáß-
- »ÑτáΓ¬π, τΓÑ¡¿Ñ ¿ ºá»¿ß∞ Σá⌐½«ó, Σ«α¼áΓ¿α«óá¡¿Ñ ¿ Γᬠñá½ÑÑ. Æá¬-
- ªÑ, ¬á¬ ¿¼ÑÑΓß∩ «ß¡«ó¡á∩ »α«úαá¼¼á, «»αÑñѽ∩εΘá∩ ú½«íá½∞¡δÑ ¬«¡ß-
- Γá¡Γδ, Γ¿»δ ñá¡¡δσ, »ÑαѼѡ¡δÑ, »α«µÑñπαδ ¿ Σπ¡¬µ¿¿, ΓᬠªÑ ¼«ªÑΓ
- ¿¼ÑΓ∞ ¼ÑßΓ« ¿ "ú½«íá½∞¡δ⌐" ¼«ñπ½∞, ¬«Γ«αδ⌐ ¿ß»«½∞ºπÑΓß∩ óßѼ¿
- ñαπú¿¼¿ ¼«ñπ½∩¼¿.
-
- ìáíα«ß«¬ í«½∞Φ«⌐ »α«úαá¼¼δ-αÑñá¬Γ«αá ¼«ªÑΓ ¿¼ÑΓ∞ ó¿ñ:
-
- program Editor;
- uses
- WinCrt, String { ßΓá¡ñáαΓ¡δÑ ¼«ñ㫨 ¿º TPW.TPL }
- EditGlobals, { ¼«ñπ½¿, ¡á»¿ßá¡¡δÑ »«½∞º«óáΓѽѼ }
- EditInuit,
- EditPrint,
- EditRead, EditWrite,
- EditFormat;
-
- { «»¿ßá¡¿Ñ, »α«µÑñπαδ ¿ Σπ¡¬µ¿¿ »α«úαá¼¼δ }
- begin { «ß¡«ó¡á∩ »α«úαá¼¼á }
- end. { ¬«¡Ñµ »α«úαá¼¼δ Editor }
-
- î«ñ㫨 ó ñá¡¡«⌐ »α«úαá¼¼Ñ ¼«úπΓ ß«ñÑαªáΓ∞ß∩ ó TPW.TPL, í¿í-
- ½¿«ΓÑ¬Ñ ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ Windows, ¿½¿ íδΓ∞ «Γñѽ∞¡δ¼¿ Σá⌐½á¼¿
- .TPW. é »«ß½Ññ¡Ñ¼ ß½πτáÑ Borland Pascal óδ»«½¡∩ÑΓ ºá óáß π»αáó½Ñ-
- ¡¿Ñ »α«Ñ¬Γ«¼. ¥Γ« «º¡áτáÑΓ, τΓ« »α¿ »ÑαѬ«¼»¿½∩µ¿¿ »α«úαá¼¼δ
- Editor ß »«¼«Θ∞ε óßΓα«Ñ¡¡«ú« ó ¬«¼»¿½∩Γ«α ßαÑñßΓóá Σ«α¼¿α«óá¡¿∩
- Borland Pascal ßαáó¡¿óáÑΓ ñáΓδ ¬áªñ«ú« Σá⌐½á .PAS ¿ .TPW ¿ »ÑαÑ-
- ¬«¼»¿½¿απÑΓ ½εí«⌐ ¼«ñπ½∞, ¿ßσ«ñ¡δ⌐ ¬«ñ ¬«Γ«α«ú« »ÑαѬ«¼»¿½¿α«óá¡.
-
- äαπúá∩ »α¿τ¿¡á ¿ß»«½∞º«óá¡¿∩ ¼«ñπ½Ñ⌐ ó í«½∞Φ¿σ »α«úαá¼¼áσ
- ß«ßΓ«¿Γ ó «úαá¡¿τÑ¡¿∩ ¬«ñ«ó«ú« ßÑú¼Ñ¡Γá. Åα«µÑßß«αδ 8086 (¿ α«ñß-
- ΓóÑ¡¡δÑ ¿¼) «úαá¡¿τ¿óáεΓ αẼÑα ßÑú¼Ñ¡Γá ¬«ñá 64 ¬¿½«íá⌐ΓἿ. ¥Γ«
- «º¡áτáÑΓ, τΓ« «ß¡«ó¡á∩ »α«úαá¼¼á ¿ ½εí«⌐ ñá¡¡δ⌐ ßÑú¼Ñ¡Γ ¡á ¼«ªÑΓ
- »αÑóδΦáΓ∞ 64è. Borland Pascal ¿¡ΓÑα»αÑΓ¿απÑΓ φΓ«, ß«ºñáóá∩ ñ½∩
- ¬áªñ«ú« ¼«ñπ½∩ «Γñѽ∞¡δ⌐ ßÑú¼Ñ¡Γ ¬«ñá. üѺ φΓ«ú« «íΩѼ ¬«ñá óáΦÑ⌐
- »α«úαá¼¼δ ¡Ñ ¼«ú íδ »αÑóδΦáΓ∞ 64è.
-
-
- B.Pascal 7 & Objects /UG - 175 -
-
- Åα¿¼Ñτá¡¿Ñ: Å«ñα«í¡ÑÑ « αáí«ΓÑ ß í«½∞Φ¿¼¿ »α«úαá¼¼¡δ¼¿
- »α«Ñ¬ΓἿ αáß߬áºδóáÑΓß∩ ó â½áóÑ 4 "Åα«úαá¼¼¿α«óá¡¿Ñ ó ¿¡-
- ΓÑúα¿α«óá¡¡«⌐ ßαÑñÑ ñ½∩ DOS".
-
-
- ôΓ¿½¿Γá TPUMOVER
- ─────────────────────────────────────────────────────────────────
-
- ä«»πßΓ¿¼, óδ σ«Γ¿ΓÑ ñ«íáó¿Γ∞ ßΓá¡ñáαΓ¡δ¼ ¼«ñπ½∩¼ σ«α«Φ« ¡á-
- »¿ßá¡¡δ⌐ ¿ »«½¡«ßΓ∞ε «Γ½áªÑ¡¡δ⌐ ¼«ñπ½∞ ß ΓѼ, τΓ«íδ «¡ ºáúαπªá½ß∩
- ó »á¼∩Γ∞ »α¿ ºá»π᪥ ¬«¼»¿½∩Γ«αá. ÅÑαÑß½áΓ∞ Ñú« ó í¿í½¿«ΓÑτ¡δ⌐
- Σá⌐½ ßΓá¡ñáαΓ¡δσ ¼«ñπ½Ñ⌐ ¼«ª¡« ß »«¼«Θ∞ε πΓ¿½¿Γδ TPUMOVER.EXE.
-
- èα«¼Ñ Γ«ú«, πΓ¿½¿Γá TPUMOVER ¿ß»«½∞ºπÑΓß∩ ñ½∩ πñá½Ñ¡¿∩ ¼«ñπ-
- ½Ñ⌐ ¿º í¿í½¿«ΓÑτ¡«ú« Σá⌐½á ßΓá¡ñáαΓ¡δσ ¼«ñπ½Ñ⌐ Borland Pascal,
- í½áú«ñáα∩ τѼπ π¼Ñ¡∞ΦáÑΓß∩ Ñú« αẼÑα ¿ ¬«½¿τÑßΓó« »á¼∩Γ¿, ¡Ñ«í-
- σ«ñ¿¼«⌐ ñ½∩ Ñú« ºáúαπº¬¿.
-
- Åα¿¼Ñτá¡¿Ñ: ü«½ÑÑ »«ñα«í¡« «í ¿ß»«½∞º«óá¡¿¿ πΓ¿½¿Γδ
- TPUMOVER ß¼. ó "Éπ¬«ó«ñßΓóÑ »« ¿¡ßΓαπ¼Ñ¡Γá½∞¡δ¼ ßαÑñßΓóá¼ ¿
- πΓ¿½¿Γá¼".
-
- èᬠóδ óÑα«∩Γ¡« »«¡∩½¿, »¿ßáΓ∞ ß«íßΓóÑ¡¡δÑ ¼«ñ㫨 áíß«½εΓ¡«
- ¡Ñ ß½«ª¡«. ò«α«Φ« ¡á»¿ßá¡¡δ⌐, σ«α«Φ« αÑ὿º«óá¡¡δ⌐ »α«úαá¼¼¡δ⌐
- ¼«ñπ½∞ π»α«ΘáÑΓ αáºαáí«Γ¬π »α«úαá¼¼δ; »α«í½Ñ¼δ αÑΦáεΓß∩ Γ«½∞¬«
- «ñ¿¡ αáº, á ¡Ñ »«óΓ«α¡« ñ½∩ ¬áªñ«⌐ ¡«ó«⌐ »α«úαá¼¼δ. ü«½ÑÑ Γ«ú«,
- ¿ß»«½∞º«óá¡¿Ñ ¼«ñπ½Ñ⌐ «íÑß»Ñτ¿óáÑΓ »α«ßΓ«Ñ ßαÑñßΓó« ñ½∩ ¡á»¿ßá¡¿∩
- í«½∞Φ¿σ »α«úαá¼¼.
-
-
-
-
- B.Pascal 7 & Objects /UG - 176 -
-
- ────────────────────────────────────────────────────────────────────────────
- â½áóá 8. êß»«½∞º«óá¡¿Ñ π¬áºáΓѽÑ⌐
- ─────────────────────────────────────────────────────────────────
-
- ô¬áºáΓѽ∞ - φΓ« ßßδ½¬á ¡á ñá¡¡δÑ ¿½¿ ¬«ñ óáΦÑ⌐ »α«úαá¼¼δ. Ä¡
- »αÑñßΓáó½∩ÑΓ áñαÑß ó »á¼∩Γ¿ φ½Ñ¼Ñ¡Γá, ¡á ¬«Γ«αδ⌐ π¬áºδóáÑΓ. êß-
- »«½∞º«óá¡¿Ñ π¬áºáΓѽÑ⌐ »«ºó«½∩ÑΓ »¿ßáΓ∞ í«½∞Φ¿Ñ ¿ í«½ÑÑ ú¿í¬¿Ñ
- »α«úαá¼¼δ ¿ «ß«íÑ¡¡« »«½Ñº¡«, ¬«úñá óδ ¡áτ¿¡áÑΓÑ »¿ßáΓ∞ «íΩѬΓ-
- ¡«-«α¿Ñ¡Γ¿α«óá¡¡δÑ »α«úαá¼¼δ.
-
- äá¡¡á∩ ú½áóá ñ«½ª¡á »«¼«τ∞ óá¼ ½πτΦÑ ¿ß»«½∞º«óáΓ∞ π¬áºáΓѽ¿,
- ¡Ñºáó¿ß¿¼« «Γ Γ«ú«, ¡áτ¿¡áÑΓÑ ½¿ óδ αáí«ΓáΓ∞ ß Åá߬á½Ñ¼ ¿½¿ πªÑ
- ñáó¡« »α«úαá¼¼¿απÑΓÑ ¡á Åá߬á½Ñ, ¡« αá¡∞ΦÑ ¡Ñ αáí«Γ὿ ß π¬áºáΓÑ-
- ½∩¼¿. Ä¡á «σóáΓδóáÑΓ ß½ÑñπεΘ¿Ñ ΓѼδ:
-
- * çáτѼ ¿ ¬«úñá ¿ß»«½∞ºπεΓß∩ π¬áºáΓѽ¿.
- * ùΓ« Γá¬«Ñ π¬áºáΓѽ∞.
- * èᬠ¿ß»«½∞º«óáΓ∞ π¬áºáΓѽ¿.
- * ¥ΣΣÑ¬Γ¿ó¡á∩ αáí«Γá ß π¬áºáΓѽ∩¼¿.
-
-
- ä½∩ τÑú« ¿ß»«½∞ºπεΓß∩ π¬áºáΓѽ¿?
- ─────────────────────────────────────────────────────────────────
-
- Éá¡« ¿½¿ »«ºñ¡« ¬áªñδ⌐ »α«úαá¼¼¿ßΓ, αáí«ΓáεΘ¿⌐ ¡á Åá߬á½Ñ,
- »«»áñáÑΓ ó ß¿Γπᵿε, ΓαÑíπεΘπε ¿ß»«½∞º«óá¡¿∩ π¬áºáΓѽÑ⌐. ô¬áºáΓÑ-
- ½¿ ΓαÑíπÑΓß∩ »α¿¼Ñ¡∩Γ∞ ó ß½ÑñπεΘ¿σ ß½πτá∩σ:
-
- * àß½¿ óáΦá »α«úαá¼¼á αáí«ΓáÑΓ ß í«½∞Φ¿¼¿ «íΩѼἿ ñá¡¡δσ
- («íΘ¿⌐ «íΩѼ ¬«Γ«αδσ »αÑóδΦáÑΓ 64è).
-
- * àß½¿ óáΦá »α«úαá¼¼á ó« óαѼ∩ ¬«¼»¿½∩µ¿∩ ¿ß»«½∞ºπÑΓ ñá¡¡δÑ
- ¡Ñ¿ºóÑßΓ¡«ú« αẼÑαá.
-
- * àß½¿ »α«úαá¼¼á ¿ß»«½∞ºπÑΓ óαѼѡ¡δÑ íπΣÑαδ ñá¡¡δσ.
-
- * àß½¿ óáΦá »α«úαá¼¼á αáí«ΓáÑΓ ß ¡Ñ߬«½∞¬¿¼¿ Γ¿»á¼¿ ñá¡¡δσ.
-
- * àß½¿ óáΦá »α«úαá¼¼á ¿ß»«½∞ºπÑΓ ßó∩ºá¡¡δÑ ß»¿ß¬¿ ñá¡¡δσ ¿½¿
- «íΩÑ¬Γ«ó.
-
- äáóá⌐ΓÑ »«ñα«í¡ÑÑ αáßß¼«Γα¿¼ ¬áªñπε »α¿τ¿¡π ¿ß»«½∞º«óá¡¿∩
- π¬áºáΓѽÑ⌐.
-
-
- Éáí«Γá ß í«½∞Φ¿¼¿ «íΩѼἿ ñá¡¡δσ
- ─────────────────────────────────────────────────────────────────
-
- Å« ¼ÑαÑ Γ«ú« ¬á¬ »α«úαá¼¼δ ßΓá¡«ó∩Γß∩ í«½ÑÑ ß½«ª¡δ¼¿, ¿ ΓαÑ-
- íπεΓß∩ αáí«Γá ß í«½∞Φ¿¼ ¬«½¿τÑßΓó«¼ ñá¡¡δσ, «í½áßΓ∞ «íΩѼ«¼ ó
- 64è, ºáαѺÑαó¿α«óá¡¡á∩ ó Borland Pascal ñ½∩ ñá¡¡δσ, ¼«ªÑΓ «¬á-
- ºáΓ∞ß∩ ¡Ññ«ßΓáΓ«τ¡«⌐, τΓ«íδ ß«ñÑαªáΓ∞ óßÑ ¡Ñ«íσ«ñ¿¼δÑ »α«úαá¼¼Ñ
- ñá¡¡δÑ. ô¬áºáΓѽ¿ »«ºó«½∩εΓ óá¼ «í«⌐Γ¿ φΓπ »α«í½Ñ¼π.
-
-
- B.Pascal 7 & Objects /UG - 177 -
-
- è«úñá óδ «»¿ßδóáÑΓÑ ó Borland Pascal ú½«íá½∞¡δÑ »ÑαѼѡ¡δÑ,
- ¬«¼»¿½∩Γ«α óδñѽ∩ÑΓ ñ½∩ ¡¿σ »á¼∩Γ∞ ó «í½áßΓ¿, ¬«Γ«αá∩ ¡áºδóáÑΓß∩
- ßÑú¼Ñ¡Γ«¼ ñá¡¡δσ. æÑú¼Ñ¡Γ ñá¡¡δσ ¿¼ÑÑΓ ¼á¬ß¿¼á½∞¡δ⌐ αẼÑα 64è.
- ¥Γ« «º¡áτáÑΓ, τΓ« «íΘ¿⌐ «íΩѼ óßÑσ óáΦ¿σ ú½«íá½∞¡δσ »ÑαѼѡ¡δσ ¡Ñ
- ¼«ªÑΓ »αÑóδΦáΓ∞ 64è. ä½∩ ¼¡«ú¿σ »α«úαá¼¼ φëà »αÑñѽ º¡áτÑ¡¿∩ ¡Ñ
- ¿¼ÑÑΓ, ¡« ó ¡Ñ¬«Γ«αδσ ß½πτá∩σ óá¼ ¼«ªÑΓ »«ΓαÑí«óáΓ∞ß∩ í«½∞Φ¿⌐
- «íΩѼ.
-
- Åα¿¼Ñτá¡¿Ñ: 﫬á½∞¡δÑ »ÑαѼѡ¡δÑ ¡Ñ »«¼ÑΘáεΓß∩ ó ßÑú-
- ¼Ñ¡Γ ñá¡¡δσ ¿ ó »αÑñÑ½Ñ 64è ¡Ñ πτ¿ΓδóáεΓß∩.
-
- ÅαÑñ»«½«ª¿¼, ¡á»α¿¼Ñα, τΓ« π óáß ÑßΓ∞ »α«úαá¼¼á, ΓαÑíπεΘá∩
- ¼áßß¿óá ó 400 ßΓ᫬ »« 100 ß¿¼ó«½«ó ¬áªñá∩. ä½∩ φΓ«ú« ¼áßß¿óá
- ΓαÑíπÑΓß∩ »α¿¼Ñα¡« 40è, τΓ« ¼Ñ¡∞ΦÑ ¼á¬ß¿¼π¼á ó 64è. àß½¿ «ßΓá½∞-
- ¡δÑ óáΦ¿ »ÑαѼѡ¡δÑ »«¼ÑΘáεΓß∩ ó «ßΓáóΦ¿Ñß∩ 24è, ¼áßß¿ó Γᬫú«
- «íΩÑ¼á »α«í½Ñ¼δ ¡Ñ »αÑñßΓáó½∩ÑΓ.
-
- ì« τΓ« Ñß½¿ óá¼ ¡πª¡« ñóá Γᬿσ ¼áßß¿óá? ¥Γ« »«ΓαÑí«óὫ íδ
- 80è, ¿ 64è ßÑú¼Ñ¡Γá ñá¡¡δσ ¡Ñ σóáΓ¿Γ. ùΓ«íδ αáí«ΓáΓ∞ ß í«½∞Φ¿¼¿
- «íΩѼἿ ñá¡¡δσ, óá¼ ¡πª¡« ¿ß»«½∞º«óáΓ∞ ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ñ-
- ¼πε «í½áßΓ∞ »á¼∩Γ¿. éáΦá »α«úαá¼¼á ¼«ªÑΓ óδñѽ¿Γ∞ ó ñ¿¡á¼¿τÑ߬¿
- αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿ 80è, »«ññÑনóá∩ π¬áºáΓѽ∞ ó ó¿ñÑ ßß佬π
- ¡á áñαÑß ñá¡¡δσ. ô¬áºáΓѽ∞ ºá¡¿¼áÑΓ ó ßÑú¼Ñ¡ΓÑ ñá¡¡δσ Γ«½∞¬« 4
- ¬¿½«íá⌐Γá.
-
- ùΓ« Γá¬«Ñ ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽá∩ «í½áßΓ∞ »á¼∩Γ¿?
-
- 信ἿτÑ߬¿ αáß»αÑñѽ∩Ѽá∩ «í½áßΓ∞ »á¼∩Γ¿ - φΓ« óß∩ »á¼∩Γ∞,
- ¬«Γ«απε óáΦá «»Ñαᵿ«¡¡á∩ ß¿ßΓѼá ñѽáÑΓ ñ«ßΓπ»¡«⌐ ñ½∩ »α«úαá¼¼δ
- ¿ ¬«Γ«αá∩ ¡Ñ ¿ß»«½∞ºπÑΓß∩ ÑÑ ¬«ñ«¼, ßÑú¼Ñ¡Γ«¼ ñá¡¡δσ ¿ ßΓѬ«¼.
- ÄíΩѼ«¼ αáß»αÑñѽ∩Ѽ«⌐ ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿ óδ ¼«ªÑΓÑ π»αáó½∩Γ∞ ß
- »«¼«Θ∞ε ñ¿αÑ¬Γ¿óδ ¬«¼»¿½∩Γ«αá $M.
-
- Äíδτ¡« ó Borland Pascal óδ ¼«ªÑΓÑ ºáαѺÑαó¿α«óáΓ∞ »á¼∩Γ∞ ó
- ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿, »«½πτ¿Γ∞ ¬ ¡Ñ⌐ ñ«ßΓπ» τÑαѺ
- π¬áºáΓѽ∞, á ºáΓѼ ß¡«óá «ßó«í«ñ¿Γ∞ »á¼∩Γ∞. Å«ñα«í¡«ßΓ¿ « αáß»αÑ-
- ñѽѡ¿¿ »á¼∩Γ¿ ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿ óδ ¼«ªÑΓÑ
- ¡á⌐Γ¿ ¡¿ªÑ ó αáºñÑ½Ñ "èᬠ¿ß»«½∞º«óáΓ∞ π¬áºáΓѽ¿?".
-
-
- Éáí«Γá ß ñá¡¡δ¼¿ ¡Ñ¿ºóÑßΓ¡«ú« αẼÑαá
- ─────────────────────────────────────────────────────────────────
-
- ìѬ«Γ«αδÑ φ½Ñ¼Ñ¡Γδ ñá¡¡δσ Borland Pascal (ó τáßΓ¡«ßΓ¿, ßΓα«-
- ¬¿ ¿ ¼áßß¿óδ) ΓαÑíπεΓ ºáñá¡¿∩ αẼÑα«ó ó« óαѼ∩ ¬«¼»¿½∩µ¿¿, ñáªÑ
- Ñß½¿ »α¿ óδ»«½¡Ñ¡¿¿ »α«úαá¼¼δ óá¼ ¡Ñ »«ΓαÑíπÑΓß∩ óß∩ óδñѽѡ¡á∩
- »á¼∩Γ∞. Åα«ßΓδ¼ »α¿¼Ñα«¼ ¼«ªÑΓ íδΓ∞ »α«úαá¼¼á, ßτ¿ΓδóáεΘá∩ óó«ñ¿-
- ¼πε »«½∞º«óáΓѽѼ ßΓ᫬π, ¡á»α¿¼Ñα, ¿¼∩ »«½∞º«óáΓѽ∞. ùΓ«íδ ºá»¿-
- ßáΓ∞ ¿¼∩ ó «íδτ¡«⌐ ßΓ᫬«ó«⌐ »ÑαѼѡ¡«⌐, óá¼ »«ΓαÑí«óὫß∞ íδ ºá-
- αѺÑαó¿α«óáΓ∞ ñ«ßΓáΓ«τ¡« »á¼∩Γ¿ ñ½∩ ¼á¬ß¿¼á½∞¡«⌐ 󫺼«ª¡«⌐ ßΓα«-
- ¬¿, ñáªÑ Ñß½¿ ¡áíαá¡¡«Ñ ¿¼∩ ß«ñÑαª¿Γ óßÑú« ¡Ñ߬«½∞¬« íπ¬ó. àß½¿
- óδ αáß»αÑñѽ∩ÑΓÑ »ÑαѼѡ¡δÑ ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿
- »á¼∩Γ¿ ó« óαѼ∩ óδ»«½¡Ñ¡¿∩, Γ« ¼«ªÑΓÑ óδñѽ¿Γ∞ Γ«τ¡« ßΓ«½∞¬«
-
- B.Pascal 7 & Objects /UG - 178 -
-
- íá⌐Γ, ߬«½∞¬« ¡Ñ«íσ«ñ¿¼« ñ½∩ Σá¬Γ¿τÑ߬«⌐ ßΓ᫬¿ ñá¡¡δσ.
-
- ¥Γ« Γα¿ó¿á½∞¡δ⌐ »α¿¼Ñα, ¡« ó »α¿½«ªÑ¡¿¿, ß«ñÑαªáΘѼ ß«Γ¡¿ ¿
- Γδß∩τ¿ Γᬿσ φ½Ñ¼Ñ¡Γ«ó ñá¡¡δσ (Γᬿσ ¬á¬ ¼¡«ªÑßΓóÑ¡¡δÑ «¬¡á ¿½¿
- ßτ¿ΓδóáѼδÑ ¿º Σá⌐½«ó ß»¿ß¬¿) óδñѽѡ¿Ñ Γ«τ¡«ú« «íΩÑ¼á »α«ßΓαá¡ß-
- Γóá ¼«ªÑΓ ó¼ÑßΓ« ß¿Γπᵿ¿ ¡ÑσóáΓ¬¿ »á¼∩Γ¿ »α¿óÑßΓ¿ ¬ πß»ÑΦ¡«¼π
- óδ»«½¡Ñ¡¿ε.
-
-
- Éáí«Γá ß óαѼѡ¡δ¼¿ íπΣÑαἿ ñá¡¡δσ
- ─────────────────────────────────────────────────────────────────
-
- ô¬áºáΓѽ¿ ¿ ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽá∩ «í½áßΓ∞ »á¼∩Γ¿ «ß«-
- íÑ¡¡« »«½Ñº¡δ ó ΓÑσ ß½πτá∩σ, ¬«úñá óá¼ ΓαÑíπÑΓß∩ óαѼѡ¡«Ñ óδñÑ-
- ½Ñ¡¿Ñ »á¼∩Γ¿, ¿ óδ ¡Ñ σ«Γ¿ΓÑ πñÑনóáΓ∞ ÑÑ ¡á óßÑ óαѼ∩ óδ»«½¡Ñ-
- ¡¿∩ »α«úαá¼¼δ. ìá»α¿¼Ñα, αÑñá¬Γ«απ Σá⌐½«ó «íδτ¡« ΓαÑíπÑΓß∩ íπΣÑα
- ñá¡¡δσ ñ½∩ ¬áªñ«ú« αÑñá¬Γ¿απѼ«ú« Σá⌐½á. é¼ÑßΓ« «»¿ßá¡¿∩ ¡á φΓá»Ñ
- ¬«¼»¿½∩µ¿¿, τΓ« óá¼ ¡Ñ«íσ«ñ¿¼« «»αÑñѽѡ¡«Ñ τ¿ß½« íπΣÑα«¼ ºáñá¡-
- ¡«ú« αẼÑαá, ¬«Γ«αδÑ óßÑúñá αáß»αÑñѽ∩εΓß∩ ñ½∩ Σá⌐½«ó, óδ ¼«ªÑΓÑ
- óδñѽ¿Γ∞ ¿σ ßΓ«½∞¬«, ߬«½∞¬« ¡Ñ«íσ«ñ¿¼« ó ¬áªñδ⌐ ¬«¡¬αÑΓ¡δ⌐ ¼«-
- ¼Ñ¡Γ, τΓ« ñѽáÑΓ »á¼∩Γ∞ ñ«ßΓπ»¡«⌐ ñ½∩ ñαπú¿σ µÑ½Ñ⌐.
-
- äαπú¿¼ «íΘ¿¼ »α¿¼Ñα«¼ ¿ß»«½∞º«óá¡¿∩ óαѼѡ¡«⌐ »á¼∩Γ¿ ∩ó½∩ÑΓ-
- ß∩ ß«αΓ¿α«ó¬á. Äíδτ¡« ¬«úñá óδ ß«αΓ¿απÑΓÑ í«½∞Φ«⌐ «íΩѼ ñá¡¡δσ,
- Γ« ñѽáÑΓÑ ¬«»¿ε ¼áßß¿óá, ß«αΓ¿απÑΓÑ ¬«»¿ε, á ºáΓѼ ºá»¿ßδóáÑΓÑ
- «Γß«αΓ¿α«óá¡¡δÑ ñá¡¡δÑ «íαáΓ¡« ó ¿ßσ«ñ¡δ⌐ ¼áßß¿ó. ¥Γ« ß«σαá¡∩ÑΓ
- µÑ½«ßΓ¡«ßΓ∞ óáΦ¿σ ñá¡¡δσ, ¡« ΓαÑíπÑΓ Γá¬ªÑ ¡á½¿τ¿∩ ó« óαѼ∩ ß«α-
- Γ¿α«ó¬¿ ñóπσ ¬«»¿⌐ ñá¡¡δσ. àß½¿ óδ σ«Γ¿ΓÑ αáß»αÑñѽ¿Γ∞ ß«αΓ¿απÑ-
- ¼δ⌐ ¼áßß¿ó ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿, Γ« ¼«ªÑΓÑ «Γß«α-
- Γ¿α«óáΓ∞ Ñú« ¿ ߬«»¿α«óáΓ∞ «íαáΓ¡« ó «α¿ú¿¡á½, á ºáΓѼ π¡¿τΓ«ª¿Γ∞
- ß«αΓ¿απѼδ⌐ ¼áßß¿ó, «ßó«í«ñ¿ó »á¼∩Γ∞ ñ½∩ ñαπú¿σ ¡πªñ.
-
-
- Éáí«Γá ß ¡Ñ߬«½∞¬¿¼¿ Γ¿»á¼¿ ñá¡¡δσ
- ─────────────────────────────────────────────────────────────────
-
- Äñ¡«⌐ ¿º «íΘ¿σ »α¿τ¿¡ ¿ß»«½∞º«óá¡¿∩ π¬áºáΓѽÑ⌐ ∩ó½∩ÑΓß∩
- ßßδ½¬á ¡á »ÑαѼѡ¡δÑ ßΓαπ¬Γπαδ ñá¡¡δσ, Γ« ÑßΓ∞ ºá»¿ß¿ ¿½¿ ¼áßß¿-
- óδ, ¬«Γ«αδÑ ¡Ñ óßÑúñá ¿¼ÑεΓ «ñ¡π ¿ Γπ ªÑ ßΓαπ¬Γπαπ. ìá»α¿¼Ñα, óδ
- ¼«ªÑΓÑ óδñѽ¿Γ∞ í½«¬ »á¼∩Γ¿, ºáαѺÑαó¿α«óá¡¡δ⌐ ñ½∩ "»α«Γ«¬«½á"
- φ½Ñ¼Ñ¡Γ«ó ßΓ᫬ αẽ¿τ¡«⌐ ñ½¿¡δ, ¡áíαá¡¡δσ ó »«½Ñ óó«ñá ñá¡¡δσ.
- ùΓ«íδ »α«τ¿ΓáΓ∞ ß»¿ß«¬ »α«Γ«¬«½á, »«ñ»α«úαá¼¼á ñ«½ª¡á »α«ß¼«ΓαÑΓ∞
- í½«¬ ¿ ¡á⌐Γ¿ «Γñѽ∞¡δÑ ßΓ᫬¿. ä½∩ π¬áºá¡¿∩ ¡áτá½á í½«¬á óδ ¼«ªÑ-
- ΓÑ ¿ß»«½∞º«óáΓ∞ »α«ßΓ«⌐ π¬áºáΓѽ∞. é φΓ«¼ ß½πτáÑ π¬áºáΓѽ∞ αáí«-
- ΓáÑΓ á¡á½«ú¿τ¡« »ÑαÑñáτÑ Σπ¡¬µ¿¿ ¿½¿ »α«µÑñπαÑ ¡ÑΓ¿»¿º¿α«óá¡¡«ú«
- »áαá¼ÑΓαá var - óδ »α«ßΓ« σ«Γ¿ΓÑ ß««íΘ¿Γ∞, úñÑ τΓ«-Γ« ¡áσ«ñ¿Γß∩,
- íѺ π¬áºá¡¿∩ Γ«ú«, τΓ« φΓ« ΓᬫÑ.
-
- Åα¿¼Ñτá¡¿Ñ: Ä ¡ÑΓ¿»¿º¿α«óá¡¡δσ »áαá¼ÑΓαáσ-»ÑαѼѡ¡δσ
- αáß߬áºδóáÑΓß∩ ó â½áóÑ 9 ("Åα«µÑñπαδ ¿ Σπ¡¬µ¿¿") "Éπ¬«ó«ñß-
- Γóá »« ∩ºδ¬π".
-
-
-
- B.Pascal 7 & Objects /UG - 179 -
-
- æó∩ºá¡¡δÑ ß»¿ß¬¿
- ─────────────────────────────────────────────────────────────────
-
- Äñ¡¿¼ ¿º «íΘ¿σ ß½πτáÑó ¿ß»«½∞º«óá¡¿∩ π¬áºáΓѽÑ⌐ ∩ó½∩ÑΓß∩ ß«-
- Ññ¿¡Ñ¡¿Ñ ßó∩ºá¡¡δσ ß»¿ß¬«ó ºá»¿ß¿. é« ¼¡«ú¿σ »α«ßΓδσ »α¿½«ªÑ¡¿∩σ
- Γ¿»á íẠñá¡¡δσ óδ ¼«ªÑΓÑ αẼÑΘáΓ∞ ºá»¿ß¿ ñá¡¡δσ ó ¼áßß¿óáσ ¿½¿
- Γ¿»¿º¿α«óá¡¡δσ Σá⌐½áσ, ¡« ¿¡«úñá ΓαÑíπÑΓß∩ τΓ«-Γ« í«½ÑÑ ú¿í¬«Ñ
- τѼ ¼áßß¿ó, ¬«Γ«αδ⌐ ¿¼ÑÑΓ Σ¿¬ß¿α«óá¡¡δ⌐ αẼÑα. Éáß»αÑñѽ∩∩ ñ¿¡á-
- ¼¿τÑ߬¿Ñ ºá»¿ß¿, ΓᬠτΓ« ¬áªñ«Ñ »«½Ñ ¿¼ÑÑΓ ºá»¿ß∞, π¬áºδóáεΘπε ¡á
- ß½ÑñπεΘ¿Ñ ºá»¿ß¿, óδ ¼«ªÑΓÑ »«ßΓα«¿Γ∞ ß»¿ß«¬, ß«ñÑαªáΘ¿⌐ ßΓ«½∞¬«
- φ½Ñ¼Ñ¡Γ«ó, ߬«½∞¬« óá¼ ΓαÑíπÑΓß∩.
-
-
- ùΓ« Γá¬«Ñ π¬áºáΓѽ∞?
- ─────────────────────────────────────────────────────────────────
-
- ô¬áºáΓѽ∞ - φΓ« ¬á¬«⌐-½¿í« áñαÑß ó »á¼∩Γ¿ óáΦÑú« ¬«¼»∞εΓÑαá.
- ¥Γ« ¼«ªÑΓ íδΓ∞ áñαÑß »ÑαѼѡ¡«⌐, ºá»¿ß¿ ñá¡¡δσ, ½¿í« »α«µÑñπαδ
- ¿½¿ Σπ¡¬µ¿¿. Äíδτ¡« óá¼ ¡Ñ ó᪡«, úñÑ αáß»«½«ªÑ¡ φ½Ñ¼Ñ¡Γ ó »á¼∩-
- Γ¿. éδ ¼«ªÑΓÑ »α«ßΓ« ßßδ½áΓ∞ß∩ ¡á ¡Ñú« »« ¿¼Ñ¡¿, ¿ Borland Pascal
- º¡áÑΓ, úñÑ Ñú« ¡πª¡« ¿ß¬áΓ∞.
-
- ê¼Ñ¡¡« φΓ« »α«¿ßσ«ñ¿Γ, ¬«úñá óδ «»¿ßδóáÑΓÑ »ÑαѼѡ¡πε. ìá»-
- α¿¼Ñα, Ñß½¿ »α«úαá¼¼á ó¬½ετáÑΓ ó ßÑí∩ ß½ÑñπεΘ¿⌐ ¬«ñ, Γ« óδ π¬áºδ-
- óáÑΓÑ ¬«¼»¿½∩Γ«απ ¡á ¡Ñ«íσ«ñ¿¼«ßΓ∞ ºáαѺÑαó¿α«óáΓ∞ «í½áßΓ∞ ó »á-
- ¼∩Γ¿, ¡á ¬«Γ«απε íπñÑΓÑ ßßδ½áΓ∞ß∩ »« ¿¼Ñ¡¿ SomeNumber.
-
- var SomeNumber: Integer;
-
- éá¼ ¡Ñ ¡πª¡« íÑß»«¬«¿Γ∞ß∩ « Γ«¼, úñÑ SomeNumber ¡áσ«ñ¿Γß∩ ó
- »á¼∩Γ¿. ê¼Ñ¡¡« ñ½∩ φΓ«ú« ºáñáÑΓß∩ ¿¼∩.
-
- ÇñαÑß αẼÑΘÑ¡¿∩ SomeNumber ó »á¼∩Γ¿ ¼«ª¡« ¡á⌐Γ¿ ß »«¼«Θ∞ε
- «»Ñαᵿ¿ @. @SomeNumber - φΓ« áñαÑß óáΦÑ⌐ µÑ½«τ¿ß½Ñ¡¡«⌐ »ÑαѼѡ-
- ¡«⌐. éδ ¼«ªÑΓÑ »α¿ßó«¿Γ∞ φëà áñαÑß »ÑαѼѡ¡«⌐-π¬áºáΓѽε, Γ« ÑßΓ∞
- »ÑαѼѡ¡«⌐, ß«ñÑαªáΘÑ⌐ áñαÑß ñá¡¡δσ ¿½¿ ¬«ñá ó »á¼∩Γ¿.
-
-
- æß佫τ¡δ⌐ Γ¿»
- ─────────────────────────────────────────────────────────────────
-
- ùΓ«íδ σαá¡¿Γ∞ π¬áºáΓѽ¿, óá¼ ΓαÑíπÑΓß∩ »ÑαѼѡ¡á∩-π¬áºáΓѽ∞,
- á ñ½∩ ß«ºñá¡¿∩ »ÑαѼѡ¡«⌐-π¬áºáΓѽ∩ óá¼ ¡Ñ«íσ«ñ¿¼ ßß佫τ¡δ⌐ Γ¿»
- (¿½¿ Γ¿» "π¬áºáΓѽ∞"). Åα«ßΓÑ⌐Φ¿¼ ßß佫τ¡δ¼ Γ¿»«¼ ∩ó½∩ÑΓß∩ ßΓá¡-
- ñáαΓ¡δ⌐ Γ¿» ß ¿¼Ñ¡Ñ¼ Pointer. ÅÑαѼѡ¡á∩ Γ¿»á Pointer - φΓ« «íΘ¿⌐
- (¡ÑΓ¿»¿º¿α«óá¡¡δ⌐) π¬áºáΓѽ∞, Γ« ÑßΓ∞, »α«ßΓ« áñαÑß. Ä¡ ¡Ñ ß«ñÑα-
- ª¿Γ ¿¡Σ«α¼áµ¿¿ « Γ«¼, ¡á τΓ« «¡ π¬áºδóáÑΓ.
-
- Æá¬¿¼ «íαẫ¼, τΓ«íδ ¿ß»«½∞º«óáΓ∞ ëà ªÑ »α¿¼Ñα SomeNumber,
- óδ ¼«ªÑΓÑ »α¿ßó«¿Γ∞ Ñú« áñαÑß »ÑαѼѡ¡«⌐-π¬áºáΓѽε:
-
- var
- SomeNumber: Integer;
-
- B.Pascal 7 & Objects /UG - 180 -
-
- SomeAddress: Pointer;
- begin
- SomeNumber := 17; {»α¿ßó«¿Γ∞ SomeNumber º¡áτÑ¡¿Ñ}
- SomeAddress := @SomeNumber; {»α¿ßó«¿Γ∞ SomeAddress áñαÑß}
- SomeAddress := Addr(SomeNumber); {ñαπú«⌐ ß»«ß«í »«½πτÑ¡¿∩
- áñαÑßá}
- end.
-
- ìÑΓ¿»¿º¿α«óá¡¡δÑ π¬áºáΓѽ¿ ó Åá߬á½Ñ ¡Ñ ¿ß»«½∞ºπεΓß∩, »«ß-
- ¬«½∞¬π «¡¿ «τÑ¡∞ «úαá¡¿τÑ¡δ. Ä¡¿ ¡á¿í«½ÑÑ »«½Ñº¡δ, ¬«úñá π¬áºδóá-
- Ѽδ⌐ φ½Ñ¼Ñ¡Γ íπñÑΓ ¿º¼Ñ¡∩Γ∞ß∩, Γᬠ¬á¬ ¡ÑΓ¿»¿º¿α«óá¡¡δ⌐ π¬áºáΓѽ∞
- ß«ó¼ÑßΓ¿¼ ß ½εíδ¼ ñαπú¿¼ π¬áºáΓѽѼ. Æ¿»¿º¿α«óá¡¡δÑ π¬áºáΓѽ¿
- º¡áτ¿Γѽ∞¡« í«½ÑÑ »«½Ñº¡δ, ¿ ¬á¬ óδ πº¡áÑΓÑ ó ß½ÑñπεΘѼ αáºñѽÑ,
- «¡¿ í«½ÑÑ ¡áñѪ¡δ.
-
-
- Æ¿»¿º¿α«óá¡¡δÑ π¬áºáΓѽ¿
- ─────────────────────────────────────────────────────────────────
-
- Äíδτ¡« óδ «»αÑñѽ∩ÑΓÑ ßß佫τ¡δÑ Γ¿»δ, ¬«Γ«αδÑ π¬áºδóáεΓ ¡á
- ¬«¡¬αÑΓ¡δ⌐ ó¿ñ φ½Ñ¼Ñ¡Γá, ¡á»α¿¼Ñα, µÑ½«Ñ º¡áτÑ¡¿Ñ ¿½¿ ºá»¿ß∞ ñá¡-
- ¡δσ. èᬠóδ ñá½ÑÑ πó¿ñ¿ΓÑ, ¼«ª¡« ¿ºó½Ñτ∞ »αÑ¿¼πΘÑßΓó« ¿º Γ«ú«
- Σá¬Γá, τΓ« π¬áºáΓÑ½ε ¿ºóÑßΓ¡«, ¡á τΓ« «¡ π¬áºδóáÑΓ. ùΓ«íδ «»αÑñÑ-
- ½¿Γ∞ Γ¿»¿º¿α«óá¡¡δ⌐ π¬áºáΓѽ∞, óδ ¼«ªÑΓÑ «»¿ßáΓ∞ ¡«óδ⌐ Γ¿», «»αÑ-
- ñѽѡ¡δ⌐ ß¿¼ó«½«¼ ¬áαÑ (^), ºá ¬«Γ«αδ¼ ß½ÑñπεΓ «ñ¿¡ ¿½¿ í«½ÑÑ
- ¿ñÑ¡Γ¿Σ¿¬áΓ«α«ó. ìá»α¿¼Ñα, τΓ«íδ «»αÑñѽ¿Γ∞ π¬áºáΓѽ∞ ¡á Integer,
- óδ ¼«ªÑΓÑ ßñѽáΓ∞ ß½ÑñπεΘÑÑ:
-
- type PIneger = ^Integer;
-
- ÆÑ»Ñα∞ óδ ¼«ªÑΓÑ «»¿ßáΓ∞ »ÑαѼѡ¡δÑ Γ¿»á PInteger. àß½¿ óδ
- ¡Ñ ß«í¿αáÑΓÑß∞ τáßΓ« ¿ß»«½∞º«óáΓ∞ ßß佫τ¡δ⌐ Γ¿», Γ« ¼«ªÑΓÑ »α«ß-
- Γ« «»¿ßáΓ∞ »ÑαѼѡ¡δÑ, ¬á¬ π¬áºáΓѽ¿ ¡á πªÑ «»αÑñѽѡ¡δ⌐ Γ¿».
- ìá»α¿¼Ñα, Ñß½¿ óδ «»αÑñѽ¿½¿ PInteger ¬á¬ ^Integer, Γ« ß½ÑñπεΘ¿Ñ
- «»¿ßá¡¿∩ »ÑαѼѡ¡«⌐ φ¬ó¿óá½Ñ¡Γ¡δ:
-
- var
- X: ^Integer:
- Y: PInteger;
-
-
- Éáºδ¼Ñ¡«óá¡¿Ñ π¬áºáΓѽÑ⌐
- ─────────────────────────────────────────────────────────────────
-
- ä« ß¿σ »«α ¼δ ó¿ñѽ¿, ¬á¬ ¼«ª¡« »α¿ßóá¿óáΓ∞ π¬áºáΓѽ∩¼ º¡á-
- τÑ¡¿∩, ¡« Ñß½¿ óδ ¡Ñ ¼«ªÑΓÑ »«½πτ¿Γ∞ º¡áτÑ¡¿∩ «íαáΓ¡«, »«½∞ºá «Γ
- φΓ«ú« ¡Ñóѽ¿¬á. Éáºδ¼Ñ¡«óáó Γ¿»¿º¿α«óá¡¡δ⌐ π¬áºáΓѽ∞, óδ ¼«ªÑΓÑ
- ¿¡ΓÑα»αÑΓ¿α«óáΓ∞ Γá¬, ¬á¬ Ñß½¿ íδ φΓ« íδ½á »ÑαѼѡ¡á∩ Γ¿»á, ¡á
- ¬«Γ«απε «¡ π¬áºδóáÑΓ. ùΓ«íδ αáºδ¼Ñ¡«óáΓ∞ π¬áºáΓѽ∞, »«¼ÑßΓ¿ΓÑ
- ß¿¼ó«½ ¬áαÑ (^) »«ß½Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá π¬áºáΓѽ∩.
-
- ì¿ªÑ »«¬áºá¡δ ¡Ñ¬«Γ«αδÑ »α¿¼Ñαδ αáºδ¼Ñ¡«óá¡¿∩ π¬áºáΓѽ∩:
-
-
- B.Pascal 7 & Objects /UG - 181 -
-
- type PInteger = ^Integer;
-
- var
- SomeNumber: Integer; { »α¿ßó«¿Γ∞ SomeNumber 17 }
- SomeAddress := @SomeNumber; { SomeAddress π¬áºδóáÑΓ ¡á
- SomeNumber }
- Writeln(SomeNumber); { ¡á»ÑτáΓáΓ∞ 17 }
- Writeln(SomeAddress); { ¡Ñ ñ«»π߬áÑΓß∩; π¬áºáΓѽ¿ »ÑτáΓáΓ∞
- ¡Ñ½∞º∩ }
- Writeln(SomeAddress^); { ¡á»ÑτáΓáΓ∞ 17 }
- AnotherAddress := SomeAddress; { Γá¬ªÑ π¬áºδóáÑΓ ¡á
- SomeNumber }
- AnotehrAddress^ := 99; { ¡«ó«Ñ º¡áτÑ¡¿Ñ ñ½∩ SomeNumber }
- Writeln(SomeNumber); { ¡á»ÑτáΓáΓ∞ 99 }
- end.
-
- Åα¿¼Ñα 8.1 Åα«ßΓδÑ »α¿¼Ñαδ αáºδ¼Ñ¡«óá¡¿∩ π¬áºáΓѽÑ⌐.
-
- ìá¿í«½ÑÑ óáª¡δ¼¿ ßΓα«¬á¼¿ ó Åα¿¼ÑαÑ 8.1 ∩ó½∩εΓß∩ ß½ÑñπεΘ¿Ñ:
-
- AnotherAddress := SomeAddress; { Γá¬ªÑ π¬áºδóáÑΓ ¡á
- SomeNumber }
- AnotehrAddress^ := 99; { ¡«ó«Ñ º¡áτÑ¡¿Ñ ñ½∩ SomeNumber }
-
- àß½¿ óδ »«⌐¼ÑΓÑ αạ¿µπ ¼Ñªñπ φΓ¿¼¿ ñóπ¼∩ «»ÑαáΓ«αἿ, Γ«
- »«⌐¼ÑΓÑ «ß¡«ó¡δÑ ¼«¼Ñ¡Γδ ó ¿ß»«½∞º«óá¡¿¿ π¬áºáΓѽÑ⌐. ÅÑαóδ⌐ «»Ñ-
- αáΓ«α »α¿ßóá¿óáÑΓ áñαÑß »ÑαѼѡ¡«⌐ AnotherAddress; «¡ ß««íΘáÑΓ
- Ñ⌐, ¬πñá ¡πª¡« π¬áºδóáΓ∞. éΓ«α«⌐ «»ÑαáΓ«α »α¿ßóá¿óáÑΓ ¡«ó«Ñ º¡á-
- τÑ¡¿Ñ φ½Ñ¼Ñ¡Γπ, ¡á ¬«Γ«αδ⌐ π¬áºδóáÑΓ AnotherAddress. ìá É¿ß. 8.1
- úαáΣ¿τÑ߬¿ »«¬áºá¡«, ¬á¬ ¿º¼Ñ¡∩ÑΓß∩ »ÑαѼѡ¡á∩.
-
- ┌──────────┐┌───────────┐┌───────────┐┌───────────┐
- SomeNumber │ 17 ││ 17 ││ 17 ││ 99 │
- ├──────────┤├───────────┤├───────────┤├───────────┤
- │ ¡Ñ ││ ││ ││ │
- SomeAddress │«»αÑñѽѡ«││@SomeNumber││@SomeNumber││@SomeNumber│
- ├──────────┤├───────────┤├───────────┤├───────────┤
- │ ¡Ñ ││ ¡Ñ ││ ││ │
- AnotherAddress│«»αÑñѽѡ«││«»αÑñѽѡ« ││@SomeNumber││@SomeNumber│
- └──────────┘└───────────┘└───────────┘└───────────┘
- ^ ^ ^ ^
- SomeNumber := 17; │ │ │
- SomeAddress := │ │
- @SomeNumber; │ │
- AnotherAddress │
- := SomeAddress: │
- AnotherAddress^
- := 99;
-
-
-
- B.Pascal 7 & Objects /UG - 182 -
-
- èᬠ¿ß»«½∞º«óáΓ∞ π¬áºáΓѽ¿?
- ─────────────────────────────────────────────────────────────────
-
- ÆÑ»Ñα∞ óδ »«½πτ¿½¿ ñ«ßΓáΓ«τ¡« σ«α«ΦÑÑ »αÑñßΓáó½Ñ¡¿Ñ « Γ«¼, ó
- ¬á¬¿σ ß¿Γπᵿ∩σ óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ π¬áºáΓѽ¿, ¿ ¼«ª¡« αáßß-
- ¼«ΓαÑΓ∞ ¿σ Σá¬Γ¿τÑ߬«Ñ »α¿¼Ñ¡Ñ¡¿Ñ. é ñá¡¡«¼ αáºñÑ½Ñ «σóáΓδóáεΓß∩
- ß½ÑñπεΘ¿Ñ ΓѼδ:
-
- * Éáß»αÑñѽѡ¿Ñ ñ¿¡á¼¿τÑ߬¿σ »ÑαѼѡ¡δσ.
-
- * Äßó«í«ªñÑ¡¿Ñ óδñѽѡ¡«⌐ ñ½∩ ñ¿¡á¼¿τÑ߬¿σ »ÑαѼѡ¡δσ »á¼∩-
- Γ¿.
-
- * Éáß»αÑñѽѡ¿Ñ ¿ «ßó«í«ªñÑ¡¿Ñ óδñѽѡ¡δσ «íΩѼ«ó »á¼∩Γ¿.
-
- * Åα«óÑα¬á ñ«ßΓπ»¡«ú« ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿
- »α«ßΓαá¡ßΓóá.
-
- Borland Pascal »αÑñπß¼áΓα¿óáÑΓ ñóÑ »áαδ »α«µÑñπα ñ½∩ óδñÑ-
- ½Ñ¡¿∩ ¿ «ßó«í«ªñÑ¡¿∩ »á¼∩Γ¿, αáß»αÑñѽ∩Ѽ«⌐ ñ½∩ ñ¿¡á¼¿τÑ߬¿σ »Ñ-
- αѼѡ¡δσ. ùáΘÑ óßÑú« ¿ß»«½∞ºπεΓß∩ »α«µÑñπαδ New ¿ Dispose, ¬«Γ«-
- αδÑ «ΓóÑτáεΓ í«½∞Φ¿¡ßΓóπ »«ΓαÑí¡«ßΓÑ⌐. Åα«µÑñπαδ GetMem ¿ FreeMem
- óδ»«½¡∩εΓ ΓÑ ªÑ Σπ¡¬µ¿¿, ¡« ¡á í«½ÑÑ ¡¿º¬«¼ πα«ó¡Ñ.
-
-
- éδñѽѡ¿Ñ »á¼∩Γ¿ ñ½∩ ñ¿¡á¼¿τÑ߬¿σ »ÑαѼѡ¡δσ
- ─────────────────────────────────────────────────────────────────
-
- Äñ¡¿¼ ¿º ¡á¿í«½ÑÑ ó᪡δσ ¼«¼Ñ¡Γ«ó ¿ß»«½∞º«óá¡¿∩ π¬áºáΓѽÑ⌐
- ∩ó½∩ÑΓß∩ αáß»αÑñѽѡ¿Ñ ñ¿¡á¼¿τÑ߬¿σ »ÑαѼѡ¡δσ ó ñ¿¡á¼¿τÑ߬¿
- αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿ »á¼∩Γ¿. Borland Pascal »αÑñπß¼áΓα¿óáÑΓ ñóá
- ß»«ß«íá óδñѽѡ¿∩ ñ½∩ π¬áºáΓѽ∩ »á¼∩Γ¿: »α«µÑñπαá New ¿ »α«µÑñπαá
- GetMem.
-
- êß»«½∞º«óá¡¿Ñ New ¬á¬ »α«µÑñπαδ
-
- New - φΓ« «τÑ¡∞ »α«ßΓá∩ »α«µÑñπαá. Å«ß½Ñ «»¿ßá¡¿∩ »ÑαѼѡ-
- ¡«⌐-π¬áºáΓѽ∩ óδ ¼«ªÑΓÑ óδºóáΓ∞ »α«µÑñπαπ New ñ½∩ óδñѽѡ¿∩
- »α«ßΓαá¡ßΓóá ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿ ñ½∩ π¬áºδóáѼ«ú«
- »ÑαѼѡ¡«⌐ φ½Ñ¼Ñ¡Γá. Åα¿óÑñѼ »α¿¼Ñα:
-
- var
- IntPointer: ^Integer;
- StringPointer: ^String;
-
- begin
- New(IntPointer); { óδñѽ∩ÑΓ ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñÑ-
- ½∩Ѽ«⌐ «í½áßΓ¿ ñóá íá⌐Γá }
- New(StringPointer); { óδñѽ∩ÑΓ ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñÑ-
- . ½∩Ѽ«⌐ «í½áßΓ¿ 256 íá⌐Γ }
- .
- .
- end.
-
- B.Pascal 7 & Objects /UG - 183 -
-
-
- Åα¿¼Ñα 8.2 Éáß»αÑñѽѡ¿Ñ ñ¿¡á¼¿τÑ߬«⌐ »ÑαѼѡ¡«⌐ ß »«¼«Θ∞ε
- »α«µÑñπαδ New.
-
- Å«ß½Ñ ó맮óá »α«µÑñπαδ New »ÑαѼѡ¡á∩-π¬áºáΓѽ∞ π¬áºδóáÑΓ ¡á
- »á¼∩Γ∞, óδñѽѡ¡πε ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿. é ñá¡¡«¼
- »α¿¼ÑαÑ IntPointer π¬áºδóáÑΓ ¡á ñóπσíá⌐Γ«óπε «í½áßΓ∞, óδñѽѡ¡πε
- »α«µÑñπα«⌐ New, á IntPointer^ - φΓ« ñ«»πßΓ¿¼á∩ µÑ½«τ¿ß½Ñ¡¡á∩ »Ñ-
- αѼѡ¡á∩ (σ«Γ∩ φΓ« µÑ½«τ¿ß½Ñ¡¡«Ñ º¡áτÑ¡¿Ñ ÑΘÑ ¡Ñ «»αÑñѽѡ«).
- ǡὫú¿τ¡«, StringPointer π¬áºδóáÑΓ ¡á óδñѽѡ¡δ⌐ ñ½∩ ßΓ᫬¿
- 256-íá⌐Γ«óδ⌐ í½«¬, á Ñú« αáºδ¼Ñ¡«óá¡¿Ñ ñáÑΓ ñ«ßΓπ»¡πε ñ½∩ ¿ß»«½∞-
- º«óá¡¿∩ ßΓ᫬«óπε »ÑαѼѡ¡πε.
-
- êß»«½∞º«óá¡¿Ñ New ¬á¬ Σπ¡¬µ¿¿
-
- èα«¼Ñ óδñѽѡ¿∩ »á¼∩Γ¿ ñ½∩ ¬«¡¬αÑΓ¡«⌐ ñ¿¡á¼¿τÑ߬«⌐ »ÑαѼѡ-
- ¡«⌐ óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ New ¬á¬ Σπ¡¬µ¿ε, ó«ºóαáΘáεΘπε π¬áºá-
- Γѽ∞ ¬«¡¬αÑΓ¡«ú« Γ¿»á. ìá»α¿¼Ñα, Ñß½¿ PInteger - φΓ« Γ¿», «»αÑñÑ-
- ½Ñ¡¡δ⌐ ¬á¬ ^Integer, á IntPopinter ¿¼ÑÑΓ Γ¿» PInteger, Γ« ß½Ññπε-
- Θ¿Ñ ñóá «»ÑαáΓ«αá φ¬ó¿óá½Ñ¡Γ¡δ:
-
- New(IntPointer);
- IntPointer := New(PInteger);
-
- ¥Γ« «ß«íÑ¡¡« »«½Ñº¡« ó ß½πτá∩σ, ¬«úñá ¼«ªÑΓ »«ΓαÑí«óáΓ∞ß∩
- »α¿ßóá¿óáΓ∞ »ÑαѼѡ¡«⌐-π¬áºáΓѽε φ½Ñ¼Ñ¡Γδ αẽ¿τ¡δσ Γ¿»«ó. ê¡«úñá
- ªÑ½áΓѽ∞¡« αáß»αÑñѽ∩Γ∞ ñ¿¡á¼¿τÑ߬πε »ÑαѼѡ¡πε, ¡Ñ »α¿ßóá¿óá∩
- ∩ó¡« π¬áºáΓѽ∞ ¬«¡¬αÑΓ¡«⌐ »ÑαѼѡ¡«⌐. éÑα«∩Γ¡«, óδ ¼«ªÑΓÑ ßñѽáΓ∞
- φΓ« Γ«½∞¬« ß«ºñáó ñ½∩ »α«µÑñπαδ ¿ Σπ¡¬µ¿¿ »áαá¼ÑΓα:
-
- SomeProcedure(New(PointerType));
-
- é φΓ«¼ ß½πτáÑ SomeProcedure íπñÑΓ ñ«íáó½∩Γ∞ »ÑαÑñáóáѼδ⌐ »á-
- αá¼ÑΓα ¬ ¡Ñ¬«Γ«α«¼π ß»¿ß¬π. é »α«Γ¿ó¡«¼ ß½πτáÑ αáß»αÑñѽ∩Ѽá∩ »á-
- ¼∩Γ∞ íπñÑΓ »«ΓÑα∩¡á. ü¿í½¿«ΓѬ¿ Borland Turbo Vision ¿ Borland
- Pascal Φ¿α«¬« ¿ß»«½∞ºπεΓ φëà ¼ÑΓ«ñ ñ½∩ »α¿ßóá¿óá¡¿∩ ñ¿¡á¼¿τÑ߬¿σ
- «íΩÑ¬Γ«ó ß»¿ß¬á¼.
-
- B.Pascal 7 & Objects /UG - 184 -
-
-
- êß»«½∞º«óá¡¿Ñ New ß «íΩѬΓἿ
-
- è«úñá óδ ¿ß»«½∞ºπÑΓÑ New ¬á¬ Σπ¡¬µ¿ε ¿½¿ »α«µÑñπαπ ñ½∩ óδñÑ-
- ½Ñ¡¿∩ ñ¿¡á¼¿τÑ߬«ú« «íΩѬΓá, Γ« ¼«ªÑΓÑ ñ«íáó¿Γ∞ ¡Ñ«í∩ºáΓѽ∞¡δ⌐
- óΓ«α«⌐ »áαá¼ÑΓα, ¬«Γ«αδ⌐ ºáñáÑΓ »α¿¼Ñ¡∩Ѽδ⌐ ñ½∩ ¿¡¿µ¿á½¿ºáµ¿¿
- «íΩѬΓá ¬«¡ßΓαπ¬Γ«α. é Åα¿¼ÑαÑ 8.3 »Ñαó«Ñ «íαáΘÑ¡¿Ñ ¬ New αáß»αÑ-
- ñѽ∩ÑΓ »α«ßΓαá¡ßΓó« ñ½∩ «íΩѬΓá, ¡« ¡Ñ ¿¡¿µ¿á½¿º¿απÑΓ φëà «íΩ-
- ѬΓ. éΓ«α«⌐ ó맮ó óδñѽ∩ÑΓ »á¼∩Γ∞ ¿ óδºδóáÑΓ ñ½∩ ºáñá¡¿∩ «íΩѬΓá
- ¬«¡ßΓαπ¬Γ«α Init.
-
- type
- PMyObject = ^TMyObject;
- TMyObject = object
- constructor Init;
- end;
-
- var
- MyObject, YourObject: PMyObject;
- begin
- New(MyObject); { «íΩÑ¬Γ ¡Ñ ¿¡¿µ¿á½¿º¿απÑΓß∩ }
- New(YourObject, Init); { ó맮ó Init ñ½∩ ¿¡¿µ¿á½¿ºáµ¿¿
- «íΩѬΓá }
-
- end.
-
- Åα¿¼Ñα 8.3 櫺ñá¡¿Ñ ñ¿¡á¼¿τÑ߬¿σ «íΩÑ¬Γ«ó.
-
- Åα¿¼Ñτá¡¿Ñ: Äí «íΩѬΓáσ ¿ ¿σ ¬«¡ßΓαπ¬Γ«αáσ αáß߬áºδóá-
- ÑΓß∩ ó â½áóÑ 9 "ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ".
-
-
-
- B.Pascal 7 & Objects /UG - 185 -
-
- Äßó«í«ªñÑ¡¿Ñ »á¼∩Γ¿,
- óδñѽѡ¡«⌐ ñ½∩ ñ¿¡á¼¿τÑ߬¿σ »ÑαѼѡ¡δσ
- ─────────────────────────────────────────────────────────────────
-
- Åá¼∩Γ∞, αáß»αÑñѽѡ¡á∩ ñ½∩ »ÑαѼѡ¡δσ ß »«¼«Θ∞ε New, »«ß½Ñ
- ºáóÑαΦÑ¡¿∩ αáí«Γδ ß ¡¿¼¿ ñ«½ª¡á «ßó«í«ªñáΓ∞ß∩. ¥Γ« »«ºó«½¿Γ ¿ß-
- »«½∞º«óáΓ∞ ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽπε »á¼∩Γ∞ ñ½∩ ñαπú¿σ »ÑαѼѡ-
- ¡δσ. ùΓ«íδ «ßó«í«ñ¿Γ∞ »á¼∩Γ∞, óδñѽѡ¡πε ñ½∩ ñ¿¡á¼¿τÑ߬«⌐ »ÑαÑ-
- ¼Ñ¡¡«⌐, óδ ñ«½ª¡δ ¿ß»«½∞º«óáΓ∞ »α«µÑñπαπ Dispose. é Åα¿¼ÑαÑ 8.2
- óδ ¼«ªÑΓÑ ñ«íáó¿Γ∞ ß½ÑñπεΘÑÑ:
-
- Dispose(StringPointer);
- Dispose(IntPointer);
-
- ìπª¡« »«¼¡¿Γ∞, τΓ« Ñß½¿ óδ αáß»αÑñѽ∩ÑΓÑ ñ¿¡á¼¿τÑ߬¿Ñ »ÑαÑ-
- ¼Ñ¡¡δÑ ß »«¼«Θ∞ε New, Γ« «ßó«í«ªñáΓ∞ óδñѽѡ¡πε ñ½∩ ¡¿σ »á¼∩Γ∞
- »«ß½Ñ ºáóÑαΦÑ¡¿∩ αáí«Γδ ß φΓ¿¼¿ »ÑαѼѡ¡δ¼¿ ¡πª¡« ß »«¼«Θ∞ε
- Dispose.
-
-
- Åα«µÑñπαδ GetMem ¿ FreeMem
- ─────────────────────────────────────────────────────────────────
-
- ê¡«úñá ¡ÑªÑ½áΓѽ∞¡« óδñѽ∩Γ∞ »á¼∩Γ∞ ΓѼ ß»«ß«í«¼, ¬á¬ φΓ«
- ñѽáÑΓ New. éá¼ ¼«ªÑΓ »«ΓαÑí«óáΓ∞ß∩ óδñѽ¿Γ∞ í«½∞ΦÑ ¿½¿ ¼Ñ¡∞ΦÑ
- »á¼∩Γ¿, τѼ φΓ« ñѽáÑΓ New »« π¼«½τá¡¿ε, ½¿í« ñ« ¡áτá½á óδ»«½¡Ñ-
- ¡¿∩ óδ ¼«ªÑΓÑ »α«ßΓ« ¡Ñ º¡áΓ∞, ߬«½∞¬« »á¼∩Γ¿ óá¼ ¡πª¡« ¿ß»«½∞º«-
- óáΓ∞. Borland Pascal óδ»«½¡∩ÑΓ Γá¬«Ñ αáß»αÑñѽѡ¿Ñ ß »«¼«Θ∞ε »α«-
- µÑñπαδ GetMem.
-
- Åα«µÑñπαá GetMem ó«ß»α¿¡¿¼áÑΓ ñóá »áαá¼ÑΓαá: »ÑαѼѡ¡πε-π¬á-
- ºáΓѽ∞, ñ½∩ ¬«Γ«α«⌐ óδ σ«Γ¿ΓÑ αáß»αÑñѽ¿Γ∞ »á¼∩Γ∞, ¿ τ¿ß½« αáß»-
- αÑñѽ∩Ѽδσ íá⌐Γ.
-
- 信ἿτÑ߬«Ñ óδñѽѡ¿Ñ »á¼∩Γ¿ ñ½∩ ßΓ᫬¿
-
- ÅπßΓ∞, ¡á»α¿¼Ñα, π óáß ÑßΓ∞ »α¿¬½áñ¡á∩ »α«úαá¼¼á, ¬«Γ«αá∩
- ßτ¿ΓδóáÑΓ 1000 ßΓ᫬ ¿º Σá⌐½á ¿ ºá»¿ßδóáÑΓ ¿σ ó ñ¿¡á¼¿τÑ߬πε »á-
- ¼∩Γ∞. éδ ¡Ñ º¡áÑΓÑ, ¡á߬«½∞¬« ñ½¿¡¡«⌐ íπñÑΓ ¬áªñá∩ ¿º φΓ¿σ ßΓ᫬,
- »«φΓ«¼π óá¼ »«ΓαÑíπÑΓß∩ «»¿ßáΓ∞ ßΓ᫬«óδ⌐ Γ¿» Γᬫú« αẼÑαá,
- ¬«Γ«αδ⌐ íπñÑΓ ß««ΓóÑΓßΓó«óáΓ∞ ¼á¬ß¿¼á½∞¡«⌐ 󫺼«ª¡«⌐ ßΓ᫬Ñ. àß½¿
- »αÑñ»«½«ª¿Γ∞, τΓ« ¡Ñ óßÑ ßΓ᫬¿ ¿¼ÑεΓ ¼á¬ß¿¼á½∞¡πε ñ½¿¡π, Γ« π
- óáß íπñÑΓ íÑß»«½Ñº¡« ¿ß»«½∞º«óáΓ∞ß∩ »á¼∩Γ∞.
-
- ùΓ«íδ αÑΦ¿Γ∞ φΓπ »α«í½Ñ¼π, óδ ¼«ªÑΓÑ ßτ¿ΓáΓ∞ ¬áªñπε ßΓ᫬π ó
- íπΣÑα, ºáΓѼ óδñѽ¿Γ∞ ßΓ«½∞¬« »á¼∩Γ¿, ߬«½∞¬« ΓαÑíπÑΓß∩ ñ½∩ Σá¬-
- Γ¿τÑ߬¿σ ñá¡¡δσ ó ßΓ᫬Ñ. Åα¿¼Ñα φΓ«ú« »«¬áºá¡ ¡¿ªÑ:
-
- type PString = ^String;
-
- var
- ReadBuffer: String;
- LinewRead: array[1..1000] of PString;
-
- B.Pascal 7 & Objects /UG - 186 -
-
- TheFile: Text;
- LineNumber: Integer;
-
- begin
- Assign(TheFile, 'FOO.TXT');
- Reset(TheFile);
- for LineNumber := 1 to 1000 do
- begin
- Readln(ReadBuffer);
- GetMem(LinesRead[LineNumber], Length(ReadBuffer) + 1);
- LinesRead[LineNumber]^ := ReadBuffer;
- end;
- end.
-
- Åα¿¼Ñα. 8.4 信ἿτÑ߬«Ñ αáß»αÑñѽѡ¿Ñ »á¼∩Γ¿ ñ½∩ ßΓ᫬¿.
-
- é¼ÑßΓ« óδñѽѡ¿∩ ñ½∩ ßΓ᫬ 256è (256 ß¿¼ó«½«ó ¡á ßΓ᫬π 1000
- αáº) óδ óδñѽ¿½¿ 4è (4 íá⌐Γá ¡á π¬áºáΓѽ∞ 1000 αáº), »½εß «íΩѼ,
- Σá¬Γ¿τÑ߬¿ ºá¡¿¼áѼδ⌐ ΓѬßΓ«¼.
-
- Äßó«í«ªñÑ¡¿Ñ óδñѽѡ¡«⌐ »á¼∩Γ¿
-
- ǡὫú¿τ¡« Γ«¼π, ¬á¬ ΓαÑíπÑΓß∩ «ßó«í«ªñáΓ∞ »á¼∩Γ∞, óδñѽѡ-
- ¡πε ß »«¼«Θ∞ε New, óá¼ ¡πª¡« «ßó«í«ªñáΓ∞ »á¼∩Γ∞, αáß»αÑñѽѡ¡πε ß
- »«¼«Θ∞ε »α«µÑñπαδ GetMem. ¥Γ« ¼«ª¡« ßñѽáΓ∞ ß »«¼«Θ∞ε »α«µÑñπαδ
- FreeMem. ǡὫú¿τ¡« Γ«¼π, ¬á¬ ¬áªñ«¼π ó맮óπ New ñ«½ªÑ¡ ß««ΓóÑΓß-
- Γó«óáΓ∞ »áα¡δ⌐ ó맮ó Dispose, ¬áªñ«¼π ó맮óπ »α«µÑñπαδ GetMem
- ñ«½ªÑ¡ ß««ΓóÑΓßΓó«óáΓ∞ ó맮ó FreeMem.
-
- èᬠ¿ GetMem, »α«µÑñπαá FreeMem ó«ß»α¿¡¿¼áÑΓ ñóá »áαá¼ÑΓαá:
- «ßó«í«ªñáѼπε »ÑαѼѡ¡πε ¿ «íΩѼ «ßó«í«ªñáѼ«⌐ »á¼∩Γ¿. é᪡«,
- τΓ«íδ «íΩѼ «ßó«í«ªñáѼ«⌐ »á¼∩Γ¿ Γ«τ¡« ß«ó»áñá½ ß «íΩѼ«¼ óδñÑ-
- ½Ñ¡¡«⌐ »á¼∩Γ¿. New ¿ Dispose, «ß¡«óδóá∩ß∞ ¡á Γ¿»Ñ π¬áºáΓѽ∩,
- óßÑúñá º¡áεΓ, ߬«½∞¬« íá⌐Γ ¡πª¡« óδñѽ∩Γ∞ ¿½¿ «ßó«í«ªñáΓ∞. ì« ó
- ß½πτáÑ GetMem ¿ FreeMem «íΩѼ óδñѽ∩Ѽ«⌐ »á¼∩Γ¿ ¡áσ«ñ¿Γß∩ óßѵѽ«
- »«ñ óáΦ¿¼ ¬«¡Γα«½Ñ¼.
-
- àß½¿ óδ «ßó«í«ñ¿ΓÑ ¼Ñ¡∞ΦÑ íá⌐Γ, τѼ í佫 óδñѽѡ«, Γ« «ßΓáó-
- Φ¿Ñß∩ íá⌐Γδ ΓÑα∩εΓß∩ (»α«¿ßσ«ñ¿Γ "πΓÑτ¬á" ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩-
- Ѽ«⌐ »á¼∩Γ¿). àß½¿ óδ «ßó«í«ñ¿ΓÑ í«½∞ΦÑÑ τ¿ß½« íá⌐Γ, τѼ í佫 óδ-
- ñѽѡ«, Γ« ¼«ªÑΓÑ «ßó«í«ñ¿Γ∞ »á¼∩Γ∞, αáß»αÑñѽѡ¡πε ñ½∩ ñαπú«⌐
- »ÑαѼѡ¡«⌐, τΓ« ¼«ªÑΓ »α¿óÑßΓ¿ ¬ »«ατÑ ñá¡¡δσ. é ºáΘ¿ΘÑ¡¡«¼ αѪ¿-
- ¼Ñ «ßó«í«ªñÑ¡¿Ñ í«½∞ΦÑú« «íΩÑ¼á »á¼∩Γ¿, τѼ í佫 óδñѽѡ«, ó맮-
- óÑΓ «Φ¿í¬π »« ¡áαπΦÑ¡¿ε ºáΘ¿Γδ (GP).
-
- ÅαÑñ»«½«ª¿¼, ¡á»α¿¼Ñα, τΓ« óδ ß«í¿αáÑΓÑß∞ óδñѽ¿Γ∞ »á¼∩Γ∞
- ñ½∩ «ñ¡«⌐ ¿½¿ í«½ÑÑ ºá»¿ßÑ⌐ ñá¡¡δσ Γ¿»á TCheck:
-
- type
- PCheck = ^ TCheck;
- TCheck = record
- Amount: Real;
- Mounth: 1..12;
-
- B.Pascal 7 & Objects /UG - 187 -
-
- Day: 1..31;
- Year: 1990..2000;
- Payee: string[39];
- end.
-
- Åα¿¼Ñα 8.5 Åα«ßΓ«⌐ Γ¿» ºá»¿ß¿.
-
- èáªñá∩ ºá»¿ß∞ Γ¿»á TCheck ºá¡¿¼áÑΓ 50 íá⌐Γ, »«φΓ«¼π, Ñß½¿ π
- óáß ÑßΓ∞ »ÑαѼѡ¡á∩ ThisCheck Γ¿»á PCheck, óδ ¼«ªÑΓÑ αáß»αÑñѽ¿Γ∞
- ñ¿¡á¼¿τÑ߬πε ºá»¿ß∞ ß½ÑñπεΘ¿¼ «íαẫ¼:
-
- GetMem(ThisGheck, 50);
-
- á »«ºñ¡ÑÑ «ßó«í«ñ¿Γ∞ ÑÑ ß »«¼«Θ∞ε ó맮óá:
-
- FreeMem(ThisCheck, 50);
-
- êß»«½∞º«óá¡¿Ñ ß »α«µÑñπα«⌐ GetMem Σπ¡¬µ¿¿ SizeOf
-
- Äñ¡á¬« πíÑñ¿Γ∞ß∩, τΓ« óδ ¬áªñδ⌐ αẠóδñѽ∩ÑΓÑ ¿ «ßó«í«ªñáÑΓÑ
- «ñ¿¡ ¿ ëà ªÑ «íΩѼ »á¼∩Γ¿, ¡Ññ«ßΓáΓ«τ¡«. éδ ñ«½ª¡δ «íÑß»Ñτ¿Γ∞
- αáß»αÑñѽѡ¿Ñ »αáó¿½∞¡«ú« «íΩÑ¼á »á¼∩Γ¿. ÅαÑñ»«½«ª¿¼, óδ ¿º¼Ñ¡¿½¿
- «»αÑñѽѡ¿Ñ TCheck. ìá»α¿¼Ñα, Ñß½¿ óδ »ÑαÑ«»αÑñѽ¿½¿ TCheck.Payee
- ¬á¬ 50-ß¿¼ó«½∞¡πε ßΓ᫬π ó¼ÑßΓ« 39-ß¿¼ó«½∞¡«⌐, Γ« ¡Ñ ß¼«ªÑΓÑ »«-
- ½πτ¿Γ∞ ¿ «ßó«í«ªñáΓ∞ ñ«ßΓáΓ«τ¡« »á¼∩Γ¿. ìáñѪ¡ÑÑ óßÑú« ¿ß»«½∞º«-
- óáΓ∞ ó »α«úαá¼¼Ñ Σπ¡¬µ¿ε SizeOf, ¡á»α¿¼Ñα:
-
- GetMem(ThisCheck, SizeOf(TCheck));
- .
- .
- .
-
- FreeMem(ThisCheck, SizeOf(TCheck));
-
- ¥Γ« ¡Ñ Γ«½∞¬« «íÑß»Ñτ¿óáÑΓ, τΓ« óδ óδñѽ∩ÑΓÑ ¿ «ßó«í«ªñáÑΓÑ
- «ñ¿¡ ¿ ëà ªÑ «íΩѼ, ¡« úáαá¡Γ¿απÑΓ, τΓ« »α¿ ¿º¼Ñ¡Ñ¡¿¿ αẼÑαá
- Γ¿»á óáΦá »α«úαá¼¼á óßÑ αáó¡« íπñÑΓ óδñѽ∩Γ∞ ¡πª¡πε »á¼∩Γ∞.
-
-
-
- B.Pascal 7 & Objects /UG - 188 -
-
- Åα«óÑα¬á «íΩѼá ñ«ßΓπ»¡«⌐
- ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿
- ─────────────────────────────────────────────────────────────────
-
- é Borland Pascal «»αÑñѽѡδ ñóÑ Σπ¡¬µ¿¿, ó«ºóαáΘáεΘ¿Ñ ó᪡πε
- ¿¡Σ«α¼áµ¿ε « ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿ »á¼∩Γ¿: MemAvail
- ¿ MaxAvail.
-
- öπ¡¬µ¿∩ MemAvail ó«ºóαáΘáÑΓ «íΘÑÑ τ¿ß½« íá⌐Γ, ñ«ßΓπ»¡δσ ñ½∩
- αáß»αÑñѽѡ¿∩ ó ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿. ÅÑαÑñ óδñѽѡ¿Ñ¼ í«½∞Φ«ú«
- «íΩѼá ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿ »«½Ñº¡« πíÑñ¿Γ∞ß∩, τΓ«
- Γᬫ⌐ «íΩѼ »á¼∩Γ¿ ñ«ßΓπ»Ñ¡.
-
- öπ¡¬µ¿∩ MaxAvail ó«ºóαáΘáÑΓ αẼÑα ¡á¿í«½∞ΦÑú« ñ«ßΓπ»¡«ú«
- í½«¬á ¡Ñ»αÑαδó¡«⌐ »á¼∩Γ¿ ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿.
- ÅÑαó«¡áτá½∞¡« »α¿ ºá»π᪥ »α«úαá¼¼δ MaxAvail αáó¡« MemAvail, »«ß-
- ¬«½∞¬π óß∩ ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽá∩ «í½áßΓ∞ »á¼∩Γ¿ ∩ó½∩ÑΓß∩
- ñ«ßΓπ»¡«⌐ ¿ ¡Ñ»αÑαδó¡«⌐. Å«ß½Ñ αáß»αÑñѽѡ¿∩ ¡Ñ߬«½∞¬¿σ í½«¬«ó
- »á¼∩Γ¿ »α«ßΓαá¡ßΓó« ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿ ߬«αÑÑ
- óßÑú« ßΓá¡ÑΓ Σαáú¼Ñ¡Γ¿α«óá¡¡δ¼. ¥Γ« «º¡áτáÑΓ, τΓ« ¼Ñªñπ τáßΓ∩¼¿
- ßó«í«ñ¡«ú« »α«ßΓαá¡ßΓóá ¿¼ÑεΓß∩ αáß»αÑñѽѡ¡δÑ í½«¬¿. öπ¡¬µ¿∩
- MaxAvail ó«ºóαáΘáÑΓ αẼÑα ¡á¿í«½∞ΦÑú« ßó«í«ñ¡«ú« í½«¬á.
-
- Å«ñα«í¡ÑÑ « Γ«¼, ¬á¬ Borland Pascal αáí«ΓáÑΓ ß ñ¿¡á¼¿τÑ߬¿
- αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ∞ε »á¼∩Γ¿, αáß߬áºδóáÑΓß∩ â½áóÑ 21 ("é«»α«ßδ
- ¿ß»«½∞º«óá¡¿∩ »á¼∩Γ¿") "Éπ¬«ó«ñßΓóá »« ∩ºδ¬π".
-
-
- ÄíΘ¿Ñ »α«í½Ñ¼δ ¿ß»«½∞º«óá¡¿∩ π¬áºáΓѽÑ⌐
- ─────────────────────────────────────────────────────────────────
-
- ô¬áºáΓѽ¿ »«ºó«½∩εΓ óá¼ ñѽáΓ∞ ó Åá߬á½Ñ ¡Ñ¬«Γ«αδÑ ó᪡δÑ
- óÑΘ¿, ¡« ÑßΓ∞ »áαá ¼«¼Ñ¡Γ«ó, ¬«Γ«αδÑ »α¿ αáí«ΓÑ ß π¬áºáΓѽ∩¼¿
- ¡πª¡« «Γ߽Ѫ¿óáΓ∞. Åα¿ ¿ß»«½∞º«óá¡¿¿ π¬áºáΓѽÑ⌐ ñ«»π߬áεΓß∩ ß½Ñ-
- ñπεΘ¿Ñ «íΘ¿Ñ «Φ¿í¬¿:
-
- - αáºδ¼Ñ¡«óá¡¿Ñ ¡Ñ¿¡¿µ¿á½¿º¿α«óá¡¡δσ π¬áºáΓѽÑ⌐;
- - »«ΓÑα¿ ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿ ("πΓÑτ¬¿").
-
-
- Éáºδ¼Ñ¡«óá¡¿Ñ ¡Ñ¿¡¿µ¿á½¿º¿α«óá¡¡δσ π¬áºáΓѽÑ⌐
- ─────────────────────────────────────────────────────────────────
-
- Äñ¡¿¼ ¿º «íΘ¿σ ¿ßΓ«τ¡¿¬«ó «Φ¿í«¬ »α¿ αáí«ΓÑ ß π¬áºáΓѽ∩¼¿
- ∩ó½∩ÑΓß∩ αáºδ¼Ñ¡«óá¡¿Ñ π¬áºáΓѽ∩, ¬«Γ«αδ⌐ ÑΘÑ ¡Ñ íδ½ ¿¡¿µ¿á½¿º¿-
- α«óá¡. èᬠ¿ ó ß½πτáÑ ñαπú¿σ »ÑαѼѡ¡δσ Åá߬á½∩, º¡áτÑ¡¿Ñ »ÑαÑ-
- ¼Ñ¡¡«⌐-π¬áºáΓѽ∩ ¡Ñ íπñÑΓ «»αÑñѽѡ«, »«¬á óδ ¡Ñ »α¿ßó«¿ΓÑ Ñ⌐
- º¡áτÑ¡¿Ñ, ΓᬠτΓ« «¡á ß¼«ªÑΓ π¬áºδóáΓ∞ ¡á ¬á¬«⌐-Γ« áñαÑß ó »á¼∩-
- Γ¿.
-
- ÅÑαÑñ ¿ß»«½∞º«ó᡿Ѽ π¬áºáΓѽÑ⌐ ¿¼ óßÑúñá ¡πª¡« »α¿ßóá¿óáΓ∞
- º¡áτÑ¡¿∩. àß½¿ óδ αáºδ¼Ñ¡«óδóáÑΓÑ π¬áºáΓѽ∞, ¬«Γ«α«¼π ÑΘÑ ¡Ñ
- »α¿ßó«Ñ¡« º¡áτÑ¡¿Ñ, Γ« ßτ¿Γá¡¡δÑ ¿º ¡Ñú« ñá¡¡δÑ ¼«úπΓ »αÑñßΓáó-
-
- B.Pascal 7 & Objects /UG - 189 -
-
- ½∩Γ∞ ß«í«⌐ ß½πτá⌐¡δÑ í¿Γδ, á »α¿ßóá¿óá¡¿Ñ º¡áτÑ¡¿∩ π¬áºδóáѼ«¼π
- φ½Ñ¼Ñ¡Γπ ¼«ªÑΓ ºáΓÑαÑΓ∞ ñαπú¿Ñ ñá¡¡δÑ, óáΦπ »α«úαá¼¼π ¿½¿ ñáªÑ
- «»Ñαᵿ«¡¡πε ß¿ßΓѼπ. ¥Γ« ºóπτ¿Γ ¡Ñ߬«½∞¬« »πúáεΘÑ, ¡« »α¿ «»αÑ-
- ñѽѡ¡«⌐ ñ¿ßµ¿»½¿¡Ñ Γá¬¿Ñ óÑΘ¿ ½Ñú¬« «Γ߽Ѫ¿óáεΓß∩.
-
- êß»«½∞º«óá¡¿Ñ »πßΓ«ú« π¬áºáΓѽ∩
-
- ùΓ«íδ ¿ºíѪáΓ∞ αáºδ¼Ñ¡«óá¡¿∩ π¬áºáΓѽÑ⌐, ¬«Γ«αδÑ ¡Ñ π¬áºδóá-
- εΓ ¡á τΓ«-½¿í« º¡áτáΘÑÑ, ¡πªÑ¡ ¡Ñ¬«Γ«αδ⌐ ß»«ß«í ¿¡Σ«α¼¿α«óá¡¿∩ «
- Γ«¼, τΓ« π¬áºáΓѽ∞ ¡Ññ«»πßΓ¿¼. é Åá߬á½Ñ »αÑñπß¼«ΓαÑ¡« ºáαѺÑαó¿-
- α«óá¡¡«Ñ ß½«ó« nil, ¬«Γ«α«Ñ óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ ó ¬áτÑßΓóÑ ß«-
- ñÑαªáΓѽ∞¡«ú« º¡áτÑ¡¿∩ π¬áºáΓѽÑ⌐, ¬«Γ«αδÑ ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ ¡¿ ¡á
- τΓ« ¡Ñ π¬áºδóáεΓ. ô¬áºáΓѽ∞ nil ∩ó½∩ÑΓß∩ ñ«»πßΓ¿¼δ¼, ¡« ¡¿ ß τѼ
- ¡Ñ ßó∩ºá¡¡δ¼. ÅÑαÑñ αáºδ¼Ñ¡«ó᡿Ѽ π¬áºáΓѽ∩ óδ ñ«½ª¡δ πíÑñ¿Γ∞ß∩,
- τΓ« «¡ «Γ½¿τÑ¡ «Γ nil (¡Ñ »πßΓ).
-
- ÅαÑñ»«½«ª¿¼, ¡á»α¿¼Ñα, τΓ« π óáß ÑßΓ∞ Σπ¡¬µ¿∩, ó«ºóαáΘáεΘá∩
- π¬áºáΓѽ∞ ¡á ¡Ñ¬«Γ«αδ⌐ φ½Ñ¼Ñ¡Γ ó »á¼∩Γ¿. éδ ¼«ªÑΓÑ π¬áºáΓ∞, τΓ«
- Γá¬á∩ Σπ¡¬µ¿∩ ¡Ñ ¼«ªÑΓ ¡á⌐Γ¿ φ½Ñ¼Ñ¡Γ, ó«ºóαáΘá∩ º¡áτÑ¡¿Ñ nil.
-
- var ItemPointer: Pointer;
-
- function FindIten: Pointer;
- begin
- .
- .
- .
- { ¡á⌐Γ¿ φ½Ñ¼Ñ¡Γ, ó«ºóαáΘá∩ π¬áºáΓѽ∞ ¡á ¡Ñú« ¿½¿ nil,
- Ñß½¿ φ½Ñ¼Ñ¡Γ ¡Ñ ¡á⌐ñÑ¡ }
-
- end;
-
- begin
- ItemPointer := nil; { ¡áτ¡Ñ¼ ó »αÑñ»«½«ªÑ¡¿¿ nil }
- ItemPointer := FindItem; { óδºóáΓ∞ Σπ¡¬µ¿ε }
- if ItemPointer <> nil then ... { ñ½∩ ¡áñѪ¡«ßΓ¿ αáºδ¼Ñ¡«-
- óá¡¿∩ ItemPointer }
- end.
-
-
- Å«ΓÑα¿ ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿
- ─────────────────────────────────────────────────────────────────
-
- Åα¿ ¿ß»«½∞º«óá¡¿¿ ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽδσ »ÑαѼѡ¡δσ τáß-
- Γ« 󫺡¿¬áÑΓ «íΘá∩ »α«í½Ñ¼á, ¡áºδóáѼá∩ πΓÑτ¬«⌐ ñ¿¡á¼¿τÑ߬«⌐ »á-
- ¼∩Γ¿. ôΓÑτ¬á »á¼∩Γ¿ - φΓ« ß¿Γπᵿ∩, ¬«úñá »α«ßΓαá¡ßΓó« óδñѽ∩ÑΓß∩
- ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿ ¿ ºáΓѼ ΓÑα∩ÑΓß∩ - »« ¬á-
- ¬¿¼-Γ« »α¿τ¿¡á¼ óáΦ π¬áºáΓѽ∞ ¡Ñ π¬áºδóáÑΓ í«½∞ΦÑ ¡á αáß»αÑñѽѡ-
- ¡πε «í½áßΓ∞, ΓᬠτΓ« óδ ¡Ñ ¼«ªÑΓÑ «ßó«í«ñ¿Γ∞ »α«ßΓαá¡ßΓó«.
-
- ÄíΘÑ⌐ »α¿τ¿¡«⌐ πΓÑτѬ »á¼∩Γ¿ ∩ó½∩ÑΓß∩ »ÑαÑ»α¿ßóá¿óá¡¿Ñ ñ¿¡á-
- ¼¿τÑ߬¿σ »ÑαѼѡ¡δσ íѺ «ßó«í«ªñÑ¡¿∩ »αÑñδñπΘ¿σ. Åα«ßΓÑ⌐Φ¿¼ ß½π-
- τáѼ ∩ó½∩ÑΓß∩ ß½ÑñπεΘ¿⌐:
-
- B.Pascal 7 & Objects /UG - 190 -
-
-
- var IntPointer: ^Integer;
-
- begin
- New(IntPointer);
- New(IntPointer);
- end.
-
- Åα¿¼Ñα 8.6 Åα«ßΓá∩ πΓÑτ¬á »á¼∩Γ¿.
-
- Åα¿ »Ñαó«¼ ó맮óÑ New ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿
- óδñѽ∩ÑΓß∩ 8 íá⌐Γ, ¿ ¡á ¡¿σ πßΓá¡áó½¿óáÑΓß∩ π¬áºáΓѽ∞ IntPointer.
- éΓ«α«⌐ ó맮ó New óδñѽ∩ÑΓ ñαπú¿Ñ 8 íá⌐Γ, ¿ IntPointer πßΓá¡áó½¿-
- óáÑΓß∩ ¡á ¡¿σ. ÆÑ»Ñα∞ π óáß ¡ÑΓ π¬áºáΓѽ∩, ßßδ½áεΘÑú«ß∩ ¡á »ÑαóδÑ
- 8 íá⌐Γ, »«φΓ«¼π óδ ¡Ñ ¼«ªÑΓÑ ¿σ «ßó«í«ñ¿Γ∞. é »α«úαá¼¼Ñ φΓ¿ íá⌐Γδ
- íπñπΓ »«ΓÑα∩¡δ.
-
- àßΓÑßΓóÑ¡¡«, πΓÑτ¬á »á¼∩Γ¿ ¼«ªÑΓ íδΓ∞ ¡Ñ Γᬫ⌐ «τÑó¿ñ¡«⌐,
- ¬á¬ ó Åα¿¼ÑαÑ 8.6. éδñѽѡ¿Ñ »á¼∩Γ¿ »«τΓ¿ ¡¿¬«úñá ¡Ñ »α«¿ßσ«ñ¿Γ ó
- »«ß½Ññ«óáΓѽ∞¡δσ «»ÑαáΓ«αáσ, ¡« ¼«ªÑΓ óδ»«½¡∩Γ∞ß∩ ó «Γñѽ∞¡δσ
- »α«µÑñπαáσ ¿½¿ ñá½Ñ¬« «ΓßΓ«∩Θ¿σ ñαπú «Γ ñαπúá τáßΓ∩σ »α«úαá¼¼δ. é
- ½εí«¼ ß½πτáÑ ½πτΦ¿⌐ ß»«ß«í «Γ߽Ѫ¿óá¡¿∩ ñ¿¡á¼¿τÑ߬¿σ »ÑαѼѡ¡δσ -
- φΓ« πßΓá¡«ó¬á ¿σ ó nil »α¿ «ßó«í«ªñÑ¡¿¿. Æ«úñá »α¿ »«»δ⪥ αáß»-
- αÑñѽ¿Γ∞ ¿σ ß¡«óá óδ ¼«ªÑΓÑ πíÑñ¿Γ∞ß∩ τΓ« «¡¿ ¿¼ÑεΓ º¡áτÑ¡¿Ñ nil:
-
- var IntPointer: ^Integer;
-
- begin
- New(IntPointer);
- .
- .
- .
- Dispose(IntPointer);
- IntPointer := nil;
- .
- .
- .
- if IntPointer = nil then New(IntPointer);
- end.
-
-
- ô»αáó½Ñ¡¿Ñ ßó∩ºá¡¡δ¼ ß»¿ß¬«¼
- ─────────────────────────────────────────────────────────────────
-
- ÅαÑñ»«½«ª¿¼, óδ σ«Γ¿ΓÑ ¡á»¿ßáΓ∞ »α«úαá¼¼π ñ½∩ óÑñÑ¡¿∩ ßó«¿σ
- ½¿τ¡δσ ßτÑΓ«ó. éδ ¼«ªÑΓÑ σαá¡¿Γ∞ óßÑ ñá¡¡δÑ « ßτÑΓáσ ó ºá»¿ß∩σ,
- Γᬿσ ¬á¬ ºá»¿ß∞ Γ¿»á TCheck, «»αÑñѽѡ¡á∩ ó Åα¿¼ÑαÑ 8.5. ì« »α¿
- ¡á»¿ßá¡¿¿ »α«úαá¼¼δ Γαπñ¡« »αÑñ»«½«ª¿Γ∞, ß ¬á¬¿¼ ¬«½¿τÑßΓó«¼ ßτÑ-
- Γ«ó óá¼ »α¿ñÑΓß∩ ¿¼ÑΓ∞ ñѽ«. Äñ¡« ¿º αÑΦÑ¡¿⌐ ºñÑß∞ ß«ßΓ«¿Γ ó ß«º-
- ñá¡¿¿ í«½∞Φ«ú« ¼áßß¿óá ºá»¿ßÑ⌐ ßτÑΓ«ó, ¡« φΓ« »α¿óÑñÑΓ ¬ ½¿Φ¡¿¼
- ºáΓαáΓá¼ »á¼∩Γ¿. ü«½ÑÑ φ½Ñúá¡Γ¡«Ñ ¿ ú¿í¬«Ñ αÑΦÑ¡¿Ñ ß«ßΓ«¿Γ ó αáß-
- Φ¿αÑ¡¿¿ «»αÑñѽѡ¿∩ ºá»¿ß¿ ¿ ó¬½ετÑ¡¿¿ ó ¡ÑÑ π¬áºáΓѽ∩ ¡á ß½Ññπε-
- Θπε ºá»¿ß∞ ß»¿ß¬á, τΓ« »α¿óÑñÑΓ ¬ «íαẫóá¡¿ε ßó∩ºá¡¡«ú« ß»¿ß¬á,
-
- B.Pascal 7 & Objects /UG - 191 -
-
- »«¬áºá¡¡«ú« ¡¿ªÑ:
-
- type
- PCheck = ^TCheck;
- TCheck = record
- Amount: Real;
- Month: 1..12;
- Day: 1..31;
- Year: 1990..2000;
- Payee: string[39];
- Next: PCheck; { π¬áºδóáÑΓ ¡á ß½ÑñπεΘπε ºá»¿ß∞ }
- end.
-
- Åα¿¼Ñα 8.7 çỿ߿ ó ßó∩ºá¡¡«¼ ß»¿ß¬Ñ.
-
- ÆÑ»Ñα∞ óδ ¼«ªÑΓÑ ßτ¿ΓáΓ∞ ¬áªñπε ºá»¿ß∞ ßτÑΓá ¿º Σá⌐½á ¿ óδ-
- ñѽ¿Γ∞ ñ½∩ ¡ÑÑ »á¼∩Γ∞. àß½¿ ºá»¿ß∞ ¡áσ«ñ¿Γß∩ ó ¬«¡µÑ ß»¿ß¬á, »«½Ñ
- Next ß½ÑñπÑΓ ßñѽáΓ∞ αáó¡δ¼ nil. é óáΦÑ⌐ »α«úαá¼¼Ñ ΓαÑíπÑΓß∩ «Γß-
- ½Ñª¿óáΓ∞ Γ«½∞¬« ñóá π¬áºáΓѽ∩: »Ñαóδ⌐ ßτÑΓ ó ß»¿ß¬Ñ ¿ "ΓѬπΘ¿⌐"
- ßτÑΓ.
-
-
-
- B.Pascal 7 & Objects /UG - 192 -
-
- Å«ßΓα«Ñ¡¿Ñ ß»¿ß¬á
- ─────────────────────────────────────────────────────────────────
-
- ì¿ªÑ »α¿óÑñÑ¡á »α«µÑñπαá, ¬«Γ«αá∩ ßΓα«¿Γ ßó∩ºá¡¡δ⌐ ß»¿ß«¬
- ºá»¿ßÑ⌐, ßτ¿Γδóá∩ ¿σ ¿º Σá⌐½á. çñÑß∞ »«ñαáºπ¼ÑóáÑΓß∩, τΓ« óδ «Γ¬-
- α뫨 Σá⌐½ ºá»¿ßÑ⌐ TCheck ¿ ¿¼Ñ¡Ñ¼ CheckFile, ¬«Γ«αδ⌐ ß«ñÑαª¿Γ »«
- ¬αá⌐¡Ñ⌐ ¼ÑαÑ «ñ¡π ºá»¿ß∞.
-
- var ListChecks, CurrentCheck: PCheck;
-
- procedure ReadChecks;
- begin
- New(ListOfChecks); { óδñѽ¿Γ∞ »á¼∩Γ∞ ñ½∩ »Ñαó«⌐ ºá»¿ß¿ }
- Read(CheckFile, ListOfChecks^); { ßτ¿ΓáΓ∞ »Ñαóπε ºá»¿ß∞ }
- CurrentCheck := ListOfChecks; { ßñѽáΓ∞ »Ñαóπε ºá»¿ß∞
- ΓѬπΘÑ⌐ }
- while not Eof(CheckFile do
- begin
- New(CurrentCheck^.Next); { óδñѽ¿Γ∞ »á¼∩Γ∞ ñ½∩
- ß½ÑñπεΘÑ⌐ ºá»¿ß¿ }
- Read(CheckFile, CurrentCheck^.Next^); { ßτ¿ΓáΓ∞
- ß½ÑñπεΘπε ºá»¿ß∞ }
- CurrentCheck := CurrentCheck^.Next; { ßñѽáΓ∞ ß½ÑñπεΘπε
- ºá»¿ß∞ ΓѬπΘÑ⌐ }
- end;
- CurrentCheck^.Next := nil; { »«ß½Ñ »«ß½Ññ¡Ñ⌐ ßτ¿Γá¡¡«⌐
- ºá»¿ß¿ ß½ÑñπεΘÑ⌐ ¡ÑΓ }
- end.
-
- Åα¿¼Ñα 8.8 Å«ßΓα«Ñ¡¿Ñ ßó∩ºá¡¡«ú« ß»¿ß¬á.
-
-
- ÅÑαѼÑΘÑ¡¿Ñ »« ß»¿ß¬π
- ─────────────────────────────────────────────────────────────────
-
- è«úñá π óáß ÑßΓ∞ ß»¿ß«¬, óδ ¼«ªÑΓÑ ½Ñú¬« óδ»«½¡∩Γ∞ »«¿ß¬ ó
- ¡Ñ¼ ¬«¡¬αÑΓ¡«⌐ ºá»¿ß¿. é Åα¿¼ÑαÑ 8.9 »«¬áºá¡á Σπ¡¬µ¿∩, ¬«Γ«αá∩
- ¡áσ«ñ¿Γ »Ñαóδ⌐ ßτÑΓ ß ¬«¡¬αÑΓ¡«⌐ ßπ¼¼«⌐ ¿ ó«ºóαáΘáÑΓ π¬áºáΓѽ∞ ¡á
- ¡Ñú«.
-
- function FindCheckByAmount(AnAmount: Real): PCheck;
- var Check: PCheck;
- begin
- TempCheck := ListOfChecks; { π¬áºδóáÑΓ ¡á »Ñαóπε ºá»¿ß∞ }
- while (Check^.Amount <> AnAmount) and
- (Check^.Next <> nil) do
- Check := Check^.Next;
- if Check^.Amount = AnAmount then
- FindCheckByAmount := Check { ó«ºóαáΘáÑΓ π¬áºáΓѽ∞ ¡á
- ¡á⌐ñÑ¡¡πε ºá»¿ß∞ }
- else FindCheckByAmount := nil; { ¿½¿ nil, Ñß½¿ Γᬿσ
- ºá»¿ßÑ⌐ ¡ÑΓ }
- end;
-
- B.Pascal 7 & Objects /UG - 193 -
-
-
- É¿ß. 8.9 Å«¿ß¬ ó ßó∩ºá¡¡«¼ ß»¿ß¬Ñ.
-
-
- Äßó«í«ªñÑ¡¿Ñ óδñѽѡ¡«⌐ ñ½∩ ß»¿ß¬á »á¼∩Γ¿
- ─────────────────────────────────────────────────────────────────
-
- èᬠ»«¬áºá¡« ó »α«µÑñπαÑ DisposeChecks ó Åα¿¼ÑαÑ 8.10, óδ
- ¼«ªÑΓÑ »ÑαÑíαáΓ∞ ß»¿ß«¬, ñ«⌐ñ∩ ñ« ¬áªñ«ú« φ½Ñ¼Ñ¡Γá ¿ «ßó«í«ñ¿ó
- Ñú«.
-
- procedure DisposeChecks;
- var Temp: PCheck;
- begin
- CurrentCheck := ListOfChecks; { π¬áºδóáÑΓ ¡á »Ñαóπε
- ºá»¿ß∞ }
- while CurrentCheck <> nil do
- begin
- Temp := CurrentCheck^.Next { ß«σαá¡¿Γ∞ π¬áºáΓѽ∞ Next }
- Dispose(CurrentCheck); { «ßó«í«ªñÑ¡¿Ñ ΓѬπΘÑ⌐ ºá»¿ß¿ }
- CurrentCheck := Temp; { ßñѽáΓ∞ ß«σαá¡Ñ¡¡πε ºá»¿ß∞
- ΓѬπΘÑ⌐ }
- end;
- end;
-
- Åα¿¼Ñα 8.10 Äßó«í«ªñÑ¡¿Ñ »á¼∩Γ¿ ñ½∩ ßó∩ºá¡¡«ú« ß»¿ß¬á.
-
-
-
-
- B.Pascal 7 & Objects /UG - 194 -
-
- ────────────────────────────────────────────────────────────────────────────
- â½áóá 9. ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ
- ─────────────────────────────────────────────────────────────────
-
- ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ »αÑñßΓáó½∩ÑΓ ß«í«⌐
- ¼ÑΓ«ñ »α«úαá¼¼¿α«óá¡¿∩, ¬«Γ«αδ⌐ óÑß∞¼á í½¿º¬« ¡á»«¼¿¡áÑΓ ¡áΦÑ »«-
- óÑñÑ¡¿Ñ. Ä¡« ∩ó½∩ÑΓß∩ ÑßΓÑßΓóÑ¡¡«⌐ φó«½εµ¿Ñ⌐ í«½ÑÑ αá¡¡¿σ ¡«ó«ó-
- óÑñÑ¡¿⌐ ó αáºαáí«Γ¬Ñ ∩ºδ¬«ó »α«úαá¼¼¿α«óá¡¿∩. ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«-
- óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ ∩ó½∩ÑΓß∩ í«½ÑÑ ßΓαπ¬Γπα¡δ¼, τѼ óßÑ »αÑ-
- ñδñπΘ¿Ñ αáºαáí«Γ¬¿, ¬áßáεΘ¿Ñß∩ ßΓαπ¬Γπα¡«ú« »α«úαá¼¼¿α«óá¡¿∩. Ä¡«
- Γá¬ªÑ ∩ó½∩ÑΓß∩ í«½ÑÑ ¼«ñπ½∞¡δ¼ ¿ í«½ÑÑ áíßΓαá¬Γ¡δ¼, τѼ »αÑñδñπ-
- Θ¿Ñ »«»δΓ¬¿ áíßΓαáú¿α«óá¡¿∩ ñá¡¡δσ ¿ »ÑαÑ¡«ßá ñÑΓá½Ñ⌐ »α«úαá¼¼¿-
- α«óá¡¿∩ ¡á ó¡πΓαÑ¡¡¿⌐ πα«óÑ¡∞. ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δ⌐ ∩ºδ¬
- »α«úαá¼¼¿α«óá¡¿∩ σáαá¬ΓÑਧπÑΓß∩ ΓαѼ∩ «ß¡«ó¡δ¼¿ ßó«⌐ßΓóἿ:
-
- 1. ꡬá»ßπ½∩µ¿∩. è«¼í¿¡¿α«óá¡¿Ñ ºá»¿ßÑ⌐ ß »α«µÑñπαἿ ¿
- Σπ¡¬µ¿∩¼¿, ¼á¡¿»π½¿απεΘ¿¼¿ »«½∩¼¿ φΓ¿σ ºá»¿ßÑ⌐, Σ«α¼¿απÑΓ
- ¡«óδ⌐ Γ¿» ñá¡¡δσ - «íΩѬΓ.
-
- 2. ìáß½Ññ«óá¡¿Ñ. Ä»αÑñѽѡ¿Ñ «íΩѬΓá ¿ Ñú« ñá½∞¡Ñ⌐ΦÑÑ ¿ß-
- »«½∞º«óá¡¿Ñ ñ½∩ »«ßΓα«Ñ¡¿∩ ¿Ñαáασ¿¿ »«α«ªñÑ¡¡δσ «íΩÑ¬Γ«ó
- ß ó«º¼«ª¡«ßΓ∞ε ñ½∩ ¬áªñ«ú« »«α«ªñÑ¡¡«ú« «íΩѬΓá, «Γ¡«ß∩-
- ΘÑú«ß∩ ¬ ¿Ñαáασ¿¿, ñ«ßΓπ»á ¬ ¬«ñπ ¿ ñá¡¡δ¼ óßÑσ »«α«ªñáε-
- Θ¿σ «íΩÑ¬Γ«ó.
-
- 3. Å«½¿¼«αΣ¿º¼. Åα¿ßóá¿óá¡¿Ñ ñÑ⌐ßΓó¿ε «ñ¡«ú« ¿¼Ñ¡¿, ¬«Γ«α«Ñ
- ºáΓѼ ß«ó¼ÑßΓ¡« ¿ß»«½∞ºπÑΓß∩ 󡿺 ¿ óóÑασ »« ¿Ñαáασ¿¿
- «íΩÑ¬Γ«ó, »α¿τѼ ¬áªñδ⌐ «íΩÑ¬Γ ¿Ñαáασ¿¿ óδ»«½¡∩ÑΓ φΓ«
- ñÑ⌐ßΓó¿Ñ ß»«ß«í«¼, ¿¼Ñ¡¡« Ñ¼π »«ñσ«ñ∩Θ¿¼.
-
- ƒºδ¬«óδÑ αáßΦ¿αÑ¡¿∩ Borland Pascal »αÑñ«ßΓáó½∩εΓ óá¼ óßÑ
- ßαÑñßΓóá «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¿α«óá¡¿∩: í«½∞Φπε
- ßΓαπ¬Γπα¿α«óá¡¡«ßΓ∞ ¿ ¼«ñπ½∞¡«ßΓ∞, í«½∞Φπε áíßΓαá¬Γ¡«ßΓ∞ ¿ óßΓα«-
- Ñ¡¡πε ¡Ñ»«ßαÑñßΓóÑ¡¡« ó ∩ºδ¬ 󫺼«ª¡«ßΓ∞ »«óΓ«α¡«ú« ¿ß»«½∞º«óá-
- ¡¿∩. éßÑ φΓ¿ σáαá¬ΓÑα¿ßΓ¿¬¿ ß««ΓóÑΓßΓóπεΓ ¬«ñπ, ¬«Γ«αδ⌐ ∩ó½∩ÑΓß∩
- í«½ÑÑ ßΓαπ¬Γπα¿α«óá¡¡δ¼, í«½ÑÑ ú¿í¬¿¼ ¿ í«½ÑÑ ½Ñú¬¿¼ ñ½∩ «íß½πª¿-
- óá¡¿∩.
-
- ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ »«α«⌐ ΓαÑíπÑΓ «Γ
- óáß «ßΓáó¿Γ∞ ó ßΓ«α«¡Ñ σáαá¬ΓÑα¡δÑ »αÑñßΓáó½Ñ¡¿∩ « »α«úαá¼¼¿α«óá-
- ¡¿¿, ¬«Γ«αδÑ ñ«½ú¿Ñ ú«ñδ αáßß¼áΓα¿ó὿ß∞, ¬á¬ ßΓá¡ñáαΓ¡δÑ. Äñ¡á¬«
- »«ß½Ñ Γ«ú«, ¬á¬ φΓ« ßñѽᡫ, «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿-
- α«óá¡¿Ñ ßΓá¡«ó¿Γß∩ »α«ßΓδ¼, ¡áú½∩ñ¡δ¼ ¿ »αÑó«ßσ«ñ¡δ¼ ßαÑñßΓó«¼
- αáºαÑΦÑ¡¿∩ ¼¡«ú¿σ »α«í½Ñ¼, ¬«Γ«αδÑ ñ«ßΓáó½∩εΓ ¡Ñ»α¿∩Γ¡«ßΓ¿ Γαáñ¿-
- µ¿«¡¡«¼π »α«úαá¼¼¡«¼π «íÑß»ÑτÑ¡¿ε.
-
- äáñ¿¼ σ«α«Φ¿⌐ ß«óÑΓ Γ«¼π, ¬Γ« πªÑ ¿¼Ñ½ ñѽ« ß «íΩÑ¬Γ¡«-«α¿-
- Ñ¡Γ¿α«óá¡¡δ¼ »α«úαá¼¼¿α«ó᡿Ѽ ¡á ñαπú¿σ ∩ºδ¬áσ. ÄßΓáó∞ΓÑ ó ßΓ«-
- α«¡Ñ óáΦ¿ »αѪ¡¿Ñ ó»ÑτáΓ½Ñ¡¿∩ «í «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«¼ »α«ú-
- αá¼¼¿α«óá¡¿¿ ¿ ¿ºπτá⌐ΓÑ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δÑ σáαá¬ΓÑα¿ßΓ¿¬¿
- Borland Pascal ó ¿σ ß«íßΓóÑ¡¡δσ ΓÑନ¡áσ. ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡-
- ¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ ¡Ñ ∩ó½∩ÑΓß∩ Ññ¿¡ßΓóÑ¡¡δ¼ »πΓѼ, «¡« »αÑñß-
- Γáó½∩ÑΓ ß«í«⌐ ¬«¡Γ¿¡ππ¼ ¿ñÑ⌐. Å« ßó«Ñ⌐ «íΩÑ¬Γ¡«⌐ Σ¿½«ß«Σ¿¿
- Borland Pascal í«½∞ΦÑ ¡á»«¼¿¡áÑΓ æ++, τѼ Smalltalk. Smalltalk
-
- B.Pascal 7 & Objects /UG - 195 -
-
- ∩ó½∩ÑΓß∩ ¿¡ΓÑα»αÑΓáΓ«α«¼, Γ«úñá ¬á¬ Borland Pascal ß ßἫú« ¡áτá-
- ½á íδ½ τ¿ßΓδ¼ ¬«¼»¿½∩Γ«α«¼ αÑá½∞¡«ú« ¬«ñá. 諼»¿½∩Γ«α αÑá½∞¡«ú«
- ¬«ñá óδ»«½¡∩ÑΓ αáí«Γπ ¿¡áτÑ (¿ º¡áτ¿Γѽ∞¡« íδßΓαÑÑ), τѼ ¿¡ΓÑα»-
- αÑΓáΓ«α. Borland Pascal íδ½ ß¬«¡ßΓαπ¿α«óá¡, ¬á¬ ¿¡ßΓαπ¼Ñ¡Γ αáºαá-
- í«Γ¬¿ »α«ñπ¬Γ«ó, á ¡Ñ ¬á¬ ¿¡ßΓαπ¼Ñ¡Γ ¿ßß½Ññ«óá¡¿∩.
-
- ä½∩ ΓÑσ, ¬Γ« ¡Ñ ¿¼ÑÑΓ «í φΓ«¼ ¡¿ ¼á½Ñ⌐ΦÑú« »«¡∩Γ¿∩, ¼δ ¡Ñ
- íπñѼ »«ñα«í¡« «íΩ∩ß¡∩Γ∞, τΓ« Γá¬«Ñ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ
- »α«úαá¼¼¿α«óá¡¿Ñ. é φëà ó«»α«ß ¿ ΓᬠπªÑ ó¡ÑßÑ¡« ñ«ßΓáΓ«τ¡« »π-
- Γá¡¿µδ. Å«φΓ«¼π ºáíπñ∞ΓÑ « Γ«¼, τΓ« ½εñ¿ ú«ó«α¿½¿ óá¼ «í «íΩÑ¬Γ¡«
- -«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿¿. ì´πτΦ¿⌐ ß»«ß«í (¿, Σá¬Γ¿τÑß-
- ¬¿, Ññ¿¡ßΓóÑ¡¡δ⌐) ¿ºπτ¿Γ∞ τΓ«-½¿í« »«½Ñº¡«Ñ «í «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿-
- α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿¿ - φΓ« ßñѽáΓ∞ Γ«, τΓ« óδ πªÑ »«τΓ¿ ßñÑ-
- ½á½¿: ßÑßΓ∞ ¿ »«»δΓáΓ∞ß∩ πº¡áΓ∞ óßÑ ßἫßΓ«∩Γѽ∞¡«.
-
- ÄíΩѬΓδ
- ─────────────────────────────────────────────────────────────────
-
- ū߼«Γα¿ΓÑ ó«¬απú ßÑí∩... ¿ óδ «í¡áαπª¿ΓÑ ∩í½«¬«, ¬«Γ«α«Ñ óδ
- ¬π»¿½¿ ¬ ºáóΓαá¬π. ä«»πßΓ¿¼, τΓ« óδ ¡á¼ÑαÑ¡δ «»¿ßáΓ∞ ∩í½«¬« ó
- ΓÑନ¡áσ »α«úαá¼¼¿α«óá¡¿∩. ÅÑαó«Ñ, τΓ« óδ, 󫺼«ª¡«, »«»δΓáÑΓÑß∞
- ßñѽáΓ∞, ΓᬠφΓ« αáßß¼«ΓαÑΓ∞ Ñú« »« τáßΓ∩¼; »πßΓ∞ S »αÑñßΓáó½∩ÑΓ
- »½«Θáñ∞ ¬«ªπαδ, J »αÑñßΓáó½∩ÑΓ ß«ñÑαªáΘ¿⌐ß∩ ó ∩í½«¬Ñ «íΩѼ ª¿ñ¬«-
- ú« ß«¬á, F »αÑñßΓáó½∩ÑΓ óÑß Σαπ¬Γá ó¡πΓα¿ ¬«ªπαδ, D - τ¿ß½« ßѼÑ-
- 祪...
-
- ìÑ ñπ¼á⌐ΓÑ Γᬿ¼ «íαẫ¼. äπ¼á⌐ΓÑ ¬á¬ ª¿ó«»¿ßѵ. éδ ó¿ñ¿ΓÑ
- ∩í½«¬« ¿ óδ α¿ßπÑΓÑ ∩í½«¬«. 꺫íαáªÑ¡¿Ñ ∩í½«¬á ¡Ñ ÑßΓ∞ ßἫ ∩í½«-
- ¬«. Ä¡« ∩ó½∩ÑΓß∩ ß¿¼ó«½«¼ ¡á »½«ß¬«⌐ »«óÑασ¡«ßΓ¿. ì« «¡« ¡Ñ ¼«ªÑΓ
- íδΓ∞ áíßΓαáú¿α«óá¡« ó ¡Ñ߬«½∞¬« τ¿ßѽ, ¬áªñ«Ñ ¿º ¬«Γ«αδσ αáß»«½«-
- ªÑ¡« «Γñѽ∞¡« ¿ ¡Ñºáó¿ß¿¼« úñÑ-¡¿íπñ∞ ó ßÑú¼Ñ¡ΓÑ ñá¡¡δσ. àú« ¬«¼-
- »«¡Ñ¡Γδ «ßΓáεΓß∩ ó¼ÑßΓÑ ó ¿σ ßπΘÑßΓóÑ¡¡«⌐ óºá¿¼«ßó∩º¿ ñαπú ß ñαπ-
- ú«¼.
-
- ÄíΩѬΓδ ¼«ñѽ¿απεΓ σáαá¬ΓÑα¿ßΓ¿¬¿ ¿ »«óÑñÑ¡¿Ñ φ½Ñ¼Ñ¡Γ«ó ¼¿-
- αá, ó ¬«Γ«α«¼ ¼δ ª¿óѼ. Ä¡¿ ∩ó½∩εΓß∩ «¬«¡τáΓѽ∞¡«⌐ áíßΓαᬵ¿Ñ⌐
- ñá¡¡δσ.
-
- Åα¿¼Ñτá¡¿Ñ: ÄíΩѬΓδ ß«ñÑαªáΓ ó¼ÑßΓÑ óßÑ ßó«¿ σáαá¬ΓÑ-
- α¿ßΓ¿¬¿ ¿ «ß«íÑ¡¡«ßΓ¿ »«óÑñÑ¡¿∩.
-
- ƒí½«¬« ¼«ª¡« αáºαѺáΓ∞ ¡á τáßΓ¿, ¡« ¬á¬ Γ«½∞¬« «¡« íπñÑΓ
- αáºαѺᡫ, «¡« í«½∞ΦÑ ¡Ñ íπñÑΓ ∩í½«¬«¼. ÄΓ¡«ΦÑ¡¿∩ τáßΓÑ⌐ ¬ µÑ½«¼π
- ¿ óºá¿¼««Γ¡«ΦÑ¡¿∩ ¼Ñªñπ τáßΓ∩¼¿ ßΓá¡«ó∩Γß∩ »«¡∩Γ¡ÑÑ Γ«úñá, ¬«úñá
- óßÑ ß«ñÑনΓß∩ ó¼ÑßΓÑ ó «ñ¡«⌐ π»á¬«ó¬Ñ. ¥Γ« ¡áºδóáÑΓß∩ ¿¡¬á»ßπ½∩-
- µ¿Ñ⌐ ¿ ∩ó½∩ÑΓß∩ «τÑ¡∞ óáª¡δ¼ »«¡∩Γ¿Ñ¼. ìѼ¡«ú« »«ºªÑ ¼δ ¬ ¡Ñ¼π
- óÑα¡Ñ¼ß∩.
-
- ìÑ ¼Ñ¡ÑÑ óáª¡δ¼ ∩ó½∩ÑΓß∩ ¿ ëà Σá¬Γ, τΓ« «íΩѬΓδ ¼«úπΓ ¡áß-
- ½Ññ«óáΓ∞ σáαá¬ΓÑα¿ßΓ¿¬¿ ¿ »«óÑñÑ¡¿Ñ Γ«ú«, τΓ« ¼δ ¡áºδóáѼ »«α«ª-
- ñáεΘ¿Ñ, α«ñ¿Γѽ∞߬¿Ñ «íΩѬΓδ (¿½¿ »αÑñ¬¿). çñÑß∞ »α«¿ßσ«ñ¿Γ ¬á-
- τÑßΓóÑ¡¡δ⌐ ߬áτ«¬: ¡áß½Ññ«óá¡¿Ñ, 󫺼«ª¡«, ∩ó½∩ÑΓß∩ ßÑú«ñ¡∩
- Ññ¿¡ßΓóÑ¡¡δ¼ ßá¼δ¼ ¬απ»¡δ¼ αẽ¿τ¿Ñ¼ ¼Ñªñπ «íδτ¡δ¼ »α«úαá¼¼¿α«óá-
-
- B.Pascal 7 & Objects /UG - 196 -
-
- ¡¿Ñ¼ ¡á Åá߬á½Ñ ¿ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δ¼ »α«úαá¼¼¿α«ó᡿Ѽ ó
- Borland Pascal.
-
-
- ìáß½Ññ«óá¡¿Ñ
- ─────────────────────────────────────────────────────────────────
-
- ûѽ∞ε ¡á㪨 ∩ó½∩ÑΓß∩ «»¿ßá¡¿Ñ óºá¿¼«ñÑ⌐ßΓó¿⌐ ó« óßѽѡ¡«⌐.
- ü«½∞Φá∩ τáßΓ∞ αáí«Γδ ó ¡áπ¬Ñ »α¿ »α«ñó¿ªÑ¡¿¿ ¬ µÑ½¿ ºá¬½ετáÑΓß∩
- »α«ßΓ« ó »«ßΓα«Ñ¡¿¿ úÑ¡ÑὫú¿τÑ߬¿σ ñÑαÑó∞Ñó. è«úñá φ¡Γ«¼«½«ú
- ó«ºóαáΘáÑΓß∩ ß Ç¼áº«¡¬¿ ß ¡Ñ¿ºóÑßΓ¡δ¼ αá¡ÑÑ ¡áßѬ«¼δ¼ ó íᡬÑ, Γ«
- ú½áó¡«⌐ Ñú« ºáí«Γ«⌐ ∩ó½∩ÑΓß∩ «»αÑñѽѡ¿Ñ, úñÑ φΓ« ¡áßѬ«¼«Ñ αáß-
- »«½áúáÑΓß∩ ó ú¿úá¡Γ߬«⌐ ßσѼÑ, ¡á ¬«Γ«α«⌐ ß«íαá¡δ ¡áπτ¡δÑ ¡áºóá-
- ¡¿∩ óßÑσ ñαπú¿σ ¡áßѬ«¼δσ. ǡὫú¿τ¡δÑ ßσѼδ ß«ßΓáó½Ñ¡δ ñ½∩ αáß-
- ΓÑ¡¿⌐, αδí, ¼½Ñ¬«»¿ΓáεΘ¿σ, αÑ»Γ¿½¿⌐, σ¿¼¿τÑ߬¿σ φ½Ñ¼Ñ¡Γ«ó, φ½Ñ-
- ¼Ñ¡Γáα¡δσ τáßΓ¿µ ¿ ¬«ß¼¿τÑ߬¿σ úá½á¬Γ¿¬. éßÑ «¡¿ óδú½∩ñ∩Γ ¬á¬ úÑ-
- ¡ÑὫú¿τÑ߬¿Ñ ñÑαÑó∞∩: ß Ññ¿¡«⌐ óßÑ«íΘÑ⌐ ¬áΓÑú«α¿Ñ⌐ ó óÑαΦ¿¡Ñ ¿
- óßÑ πóѽ¿τ¿óáεΘ¿¼¿ß∩ τ¿ß½« ¬áΓÑú«α¿⌐, ¬«Γ«αδÑ ½ÑªáΓ ¡¿ªÑ φΓ«⌐
- Ññ¿¡ßΓóÑ¡¡«⌐ ¬áΓÑú«α¿¿, ¿ αáºó«αáτ¿óáεΓß∩ óÑÑα«¼ »« ¼ÑαÑ »α¿í½¿-
- ªÑ¡¿∩ ¬ úαá¡¿µá¼ αạ««íαế∩.
-
- é¡πΓα¿ ¬áΓÑú«α¿¿ "¡áßѬ«¼δÑ" ¿¼ÑÑΓß∩ ñóá »«ñαáºñѽѡ¿∩: ¡á-
- ßѬ«¼δÑ ß ó¿ñ¿¼δ¼¿ ¬αδ½∞∩¼¿ ¿ ¡áßѬ«¼δÑ ß« ß»α∩Γá¡¡δ¼¿ ¬αδ½∞∩¼¿
- ¿½¿ ó««íΘÑ íÑ߬αδ½δÑ. æαÑñ¿ ¬αδ½áΓδσ ¿¼ÑÑΓß∩ í«½∞ΦÑÑ τ¿ß½« ¬áΓÑ-
- ú«α¿⌐; ¼«Γδ½∞¬¿, íáí«τ¬¿, ¼πσ¿ ¿ Γ.ñ. èáªñá∩ ¬áΓÑú«α¿∩ ß«ñÑনΓ
- í«½∞Φ«Ñ τ¿ß½« »«ñ¬áΓÑú«α¿⌐, á ¡¿ªÑ φΓ¿σ »«ñ¬áΓÑú«α¿⌐ ¼«ªÑΓ ¿¼ÑΓ∞-
- ß∩ ñáªÑ ÑΘÑ í«½∞ΦÑÑ τ¿ß½« »«ñ¬áΓÑú«α¿⌐ (ß¼. É¿ß. 9.1).
-
- ¥Γ«Γ »α«µÑßß ¬½áßß¿Σ¿¬áµ¿¿ ¡áºδóáÑΓß∩ Γá¬ß«¡«¼¿Ñ⌐. ¥Γ« »αѬ-
- αáß¡á∩ ¡áτá½∞¡á∩ ¼ÑΓáΣ«αá ñ½∩ ¼Ñσá¡¿º¼á ¡áß½Ññ«óá¡¿∩ ó «íΩѬΓ-
- ¡«-«α¿Ñ¡Γ¿α«óá¡¡«¼ »α«úαá¼¼¿α«óá¡¿¿.
-
- é«»α«ßἿ, ¬«Γ«αδÑ ºáñáÑΓ πτÑ¡δ⌐ »α¿ »«»δ⪥ ¬½áßß¿Σ¿¬áµ¿¿
- ¡Ñ¬«Γ«α«ú« ª¿ó«Γ¡«ú« ¿½¿ «íΩѬΓá, ∩ó½∩εΓß∩ ß½ÑñπεΘ¿Ñ. é τѼ φΓ«Γ
- «íΩÑ¬Γ »«σ«ª ¡á ñαπú¿Ñ «íΩѬΓδ ¿º «íΘÑú« ¬½áßßá? é τѼ «¡ «Γ½¿τá-
- ÑΓß∩ «Γ ñαπú¿σ «íΩÑ¬Γ«ó? èáªñδ⌐ ¬«¡¬αÑΓ¡δ⌐ ¬½áßß ¿¼ÑÑΓ ¼¡«ªÑßΓó«
- ßó«⌐ßΓó »«óÑñÑ¡¿∩ ¿ σáαá¬ΓÑα¿ßΓ¿¬, «»αÑñѽ∩εΘ¿σ φëà ¬½áßß. ôτÑ-
- ¡δ⌐ ¡áτ¿¡áÑΓ ß óÑαΦ¿¡δ ¬«¡¬αÑΓ¡«ú« úÑ¡ÑὫú¿τÑ߬«ú« ñÑαÑóá ¿ »α«-
- σ«ñ¿Γ »« ñ«τÑα¡¿¼ «í½áßΓ∩¼, ºáñáóá∩ ßÑíÑ φΓ¿ ó«»α«ßδ. ìá¿óδßΦ¿⌐
- πα«óÑ¡∞ ßá¼δ⌐ «íΘ¿⌐, á ó«»α«ßδ ßá¼δÑ »α«ßΓδÑ, ¡á»α¿¼Ñα, ¬αδ½áΓ«Ñ
- ¿½¿ íÑ߬α佫Ñ? èáªñδ⌐ »«ß½ÑñπεΘ¿⌐ πα«óÑ¡∞ ∩ó½∩ÑΓß∩ í«½ÑÑ ß»Ñµ¿Σ¿-
- τÑ߬¿¼, τѼ »αÑñδñπΘ¿⌐, ¿ ¼Ñ¡ÑÑ «íΘ¿¼. é ¬«¡µÑ ¬«¡µ«ó, πτÑ¡δ⌐ ñ«-
- í¿αáÑΓß∩ ñ« Γ«τ¬¿ »«ñßτÑΓá 󫽫߬«ó ¡á ΓαÑΓ∞Ѽ ßÑú¼Ñ¡ΓÑ ºáñ¡Ñ⌐
- ¡«ú¿ ¡áßѬ«¼«ú« - τΓ« ó«¿ßΓ¿¡π ߻ѵ¿Σ¿τ¡«. (ê ߬«αÑÑ óßÑú« « ¡Ñ¼
- ß½ÑñπÑΓ ß¬áºáΓ∞, τΓ« «¡ ¡Ñ φ¡Γ«¼«½«ú.)
-
-
- B.Pascal 7 & Objects /UG - 197 -
-
- ┌───────────┐
- │ ¡áßѬ«¼δÑ │
- └─┬───────┬─┘
- ┌───────────────┘ │
- │ │
- ┌────┴─────┐ ┌───┴───────┐
- │ ¬αδ½áΓδÑ │ │ íÑ߬αδ½δÑ │
- └┬───┬───┬─┘ └───────────┘
- ┌────────┘ │ └───────┐
- ┌───┴──────┐┌────┴────┐┌─────┴────┐
- │ ¼«Γδ½∞¬¿ ││ íáí«τ¬¿ ││ ¼πσ¿ │
- └──────────┘└─────────┘└──────────┘
-
- É¿ß. 9.1 Æá¬ß«¡«¼¿τÑ߬á∩ ßσÑ¼á ¡áßѬ«¼δσ.
-
- é᪡« »«¼¡¿Γ∞ Γ«, τΓ« Ñß½¿ σáαá¬ΓÑα¿ßΓ¿¬á «ñ¡áªñδ «»αÑñѽÑ-
- ¡á, Γ« óßÑ ¬áΓÑú«α¿¿, αáß»«½«ªÑ¡¡δÑ ¡¿ªÑ ñá¡¡«ú« «»αÑñѽѡ¿∩, ß«-
- ñÑαªáΓ φΓπ σáαá¬ΓÑα¿ßΓ¿¬π. Æá¬¿¼ «íαẫ¼, ¬á¬ Γ«½∞¬« óδ «»αÑñѽ¿-
- ½¿ ¡áßѬ«¼«Ñ, ¬á¬ τ½Ñ¡á «Γα∩ñá diptera (¼πσ¿), Γ« óá¼ ¡Ñ ß½ÑñπÑΓ
- «Γ¼ÑτáΓ∞ ß¡«óá, τΓ« π ¼πσ ¿¼ÑÑΓß∩ «ñ¡á »áαá ¬αδ½∞Ñó. Éạ«ó¿ñ-
- ¡«ßΓ∞ ¡áßѬ«¼δσ, ¬«Γ«απε ¼δ º«óѼ ¼πσ¿, ¡áß½ÑñπÑΓ φΓπ σáαá¬ΓÑα¿ß-
- Γ¿¬π «Γ ßó«Ñú« «Γα∩ñá.
-
- èᬠóδ »«¡∩½¿, «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ ó
- í«½∞Φ«⌐ ßΓѻѡ¿ ∩ó½∩ÑΓß∩ »α«µÑßß«¼ »«ßΓα«Ñ¡¿∩ úÑ¡ÑὫú¿τÑ߬«ú«
- ñÑαÑóá ñ½∩ ßΓαπ¬Γπα ñá¡¡δσ. Äñ¡«⌐ ¿º ó᪡δσ «ß«íÑ¡¡«ßΓÑ⌐, ¬«Γ«αδÑ
- «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ ñ«íáó½∩ÑΓ Γαáñ¿µ¿«¡¡δ¼
- ∩ºδ¬á¼ Γ¿»á Åá߬á½∞, ∩ó½∩ÑΓß∩ ¼Ñσá¡¿º¼, ß »«¼«Θ∞ε ¬«Γ«α«ú« Γ¿»δ
- ñá¡¡δσ ¼«úπΓ ¡áß½Ññ«óáΓ∞ σáαá¬ΓÑα¿ßΓ¿¬¿ í«½ÑÑ »α«ßΓδσ, í«½ÑÑ «í-
- Θ¿σ Γ¿»«ó. ¥Γ¿¼ ¼Ñσá¡¿º¼«¼ ∩ó½∩ÑΓß∩ ¡áß½Ññ«óá¡¿Ñ.
-
-
-
- B.Pascal 7 & Objects /UG - 198 -
-
- ÄíΩѬΓδ: ¡áß½ÑñπεΘ¿Ñ ºá»¿ß¿
- ─────────────────────────────────────────────────────────────────
-
- é ΓÑନ¡áσ Åá߬á½∩, «íΩÑ¬Γ ó« ¼¡«ú«¼ ßσ«ª ß ºá»¿ß∞ε, ¬«Γ«αá∩
- ∩ó½∩ÑΓß∩ «í«½«τ¬«⌐ ñ½∩ «íΩÑñ¿¡Ñ¡¿∩ ¡Ñ߬«½∞¬¿σ ßó∩ºá¡¡δσ φ½Ñ¼Ñ¡Γ«ó
- »«ñ «ñ¡¿¼ ¿¼Ñ¡Ñ¼. ÅαÑñ»«½«ª¿¼, óδ σ«Γ¿ΓÑ αáºαáí«ΓáΓ∞ »α«úαá¼¼π
- óδó«ñá »½áΓѪ¡«⌐ óÑñ«¼«ßΓ¿, »ÑτáΓáεΘπε «ΓτÑΓ ¿ »«¬áºδóáεΘπε,
- ߬«½∞¬« ¡πª¡« óδ»½áΓ¿Γ∞ ¬áªñ«¼π ß½πªáΘѼπ ºá αáí«τ¿⌐ ñÑ¡∞. çỿß∞
- ¼«ª¡« «αúá¡¿º«óáΓ∞ ß½ÑñπεΘ¿¼ «íαẫ¼:
-
- TEmployee = record
- Name: string[25];
- Title: string[25];
- Rate: Real;
- end;
-
- Åα¿¼Ñτá¡¿Ñ: Å« ß«ú½áΦÑ¡¿ε óßÑ Γ¿»δ ¡áτ¿¡áεΓß∩ ß íπ¬óδ
- T. éδ Γá¬ªÑ ¼«ªÑΓÑ ß½Ññ«óáΓ∞ φΓ«¼π »αáó¿½π.
-
- çñÑß∞ TEmployee ∩ó½∩ÑΓß∩ Γ¿»«¼ ºá»¿ß¿, Γ.Ñ. Φáí½«¡«¼, ¿ß-
- »«½∞ºπÑ¼δ¼ ¬«¼»¿½∩Γ«α«¼ ñ½∩ ß«ºñá¡¿∩ »ÑαѼѡ¡δσ Γ¿»á ºá»¿ß∞. ÅÑ-
- αѼѡ¡á∩ Γ¿»á TEmployee ∩ó½∩ÑΓß∩ φ¬ºÑ¼»½∩α«¼ φΓ«ú« Γ¿»á. ÆÑନ¡
- "φ¬ºÑ¼»½∩α" íπñÑΓ óá¼ ¡ÑαÑñ¬« óßΓαÑτáΓ∞ß∩ ó Åá߬á½Ñ. Ä¡ »«ßΓ«∩¡¡«
- »α¿¼Ñ¡∩ÑΓß∩ ΓѼ¿, ¬Γ« ¿ß»«½∞ºπÑΓ ¼ÑΓ«ñδ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú«
- »α«úαá¼¼¿α«óá¡¿∩, »«φΓ«¼π íπñÑΓ σ«α«Φ«, Ñß½¿ óδ ¡áτ¡ÑΓÑ ¼δß½¿Γ∞ ó
- ΓÑନ¡áσ Γ¿»«ó ¿ φ¬ºÑ¼»½∩α«ó φΓ¿σ Γ¿»«ó.
-
- éδ ¼«ªÑΓÑ «»Ñα¿α«óáΓ∞ ß Γ¿»«¼ TEmployee ñó«∩¬«. éδ ¼«ªÑΓÑ
- αáßß¼áΓα¿óáΓ∞ »«½∩ Name, Title ¿ Rate »« «Γñѽ∞¡«ßΓ¿, á ¬«úñá «
- »«½∩σ, ¬á¬ « αáí«ΓáεΘ¿σ «ñ¡«óαѼѡ¡« ñ½∩ «»¿ßá¡¿∩ ¬«¡¬αÑΓ¡«ú«
- αáí«τÑú«, óδ ¼«ªÑΓÑ αáßß¼áΓα¿óáΓ∞ ¿σ ß«ó«¬π»¡«ßΓ∞, ¬á¬ TEmployee.
-
- ÅαÑñ»«½«ª¿¼, τΓ« ¡á óáΦÑ⌐ Σ¿α¼Ñ αáí«ΓáÑΓ ¡Ñ߬«½∞¬« Γ¿»«ó
- αáí«τ¿σ. Äñ¡¿ ¿º ¡¿σ ¿¼ÑεΓ »«τáß«óπε «»½áΓπ, ñαπú¿Ñ - «¬½áñ,
- ΓαÑΓ∞¿ - Γáα¿Σ¡πε ßΓáó¬π ¿ Γᬠñá½ÑÑ. éáΦá »α«úαá¼¼á ñ«½ª¡á πτ¿-
- ΓδóáΓ∞ óßÑ φΓ¿ Γ¿»δ. éδ ¼«ªÑΓÑ ß«ºñáΓ∞ ñαπú«⌐ Γ¿» ºá»¿ß¿ ñ½∩ ¬áª-
- ñ«ú« Γ¿»á αáí«τÑú«. ìá»α¿¼Ñα, ñ½∩ »«½πτÑ¡¿∩ ñá¡¡δσ « Γ«¼, ߬«½∞¬«
- ñ«½ªÑ¡ »«½πτ¿Γ∞ αáí«τ¿⌐ ß »«τáß«ó«⌐ «»½áΓ«⌐, ¡πª¡« º¡áΓ∞, ߬«½∞¬«
- τáß«ó «¡ «Γαáí«Γá½. ¡« »«ßΓα«¿Γ∞ ºá»¿ß∞ THourly ó¿ñá:
-
- THourly = record
- Name: string[25];
- Title: string[25];
- Rate: Real;
- end;
-
- éδ ¼«ªÑΓÑ Γá¬ªÑ «¬áºáΓ∞ß∩ ¡Ñ߬«½∞¬« ñ«úáñ½¿óÑÑ ¿ ß«σαá¡¿Γ∞
- Γ¿» TEmployee »πΓѼ ß«ºñá¡¿∩ »«½∩ Γ¿»á TEmployee ó¡πΓα¿ Γ¿»á
- THourly:
-
- THourly = record
- Worker: TEmployee;
- Time: integer;
-
- B.Pascal 7 & Objects /UG - 199 -
-
- end;
-
- Æá¬á∩ ¬«¡ßΓαπ¬µ¿∩ αáí«ΓáÑΓ, ¿ »α«úαá¼¼¿ßΓδ, αáí«ΓáεΘ¿Ñ ¡á
- Åá߬á½Ñ, ñѽáεΓ φΓ« »«ßΓ«∩¡¡«. àñ¿¡ßΓóÑ¡¡«Ñ, τÑú« φëà ¼ÑΓ«ñ ¡Ñ
- ñѽáÑΓ, ΓᬠφΓ« Γ«, τΓ« «¡ ºáßΓáó½∩ÑΓ óáß ñπ¼áΓ∞ « Γ«¼, ß τѼ óδ
- αáí«ΓáÑΓÑ ó óáΦѼ »α«úαá¼¼¡«¼ «íÑß»ÑτÑ¡¿¿. éá¼ ß½ÑñπÑΓ ºáñáΓ∞ß∩
- ó«»α«ß«¼ Γ¿»á; "ùѼ »«τáß«ó¿¬ «Γ½¿τáÑΓß∩ «Γ ñpπú¿σ páí«τ¿σ?" ÄΓ-
- óÑΓ »α«ßΓ: »«τáß«ó¿¬ - φΓ« páí«τ¿⌐, ¬«Γ«p«¼π »½áΓ¿Γß∩ ºá ¬«½¿-
- τÑßΓó« τáß«ó páí«Γδ. Åα«ñπ¼á⌐ΓÑ ß¡«óá »Ñαóπε τáßΓ∞ »αÑñ½«ªÑ¡¿∩;
- »«τáß«ó¿¬ - φΓ« páí«τ¿⌐...
-
- ÆÑ»Ñα∞ óδ »«¡∩½¿!
-
- çỿß∞ ñ½∩ páí«Γ¡¿¬á-»«τáß«ó¿¬á hourly ñ«½ª¡á ¿¼ÑΓ∞ óßÑ ºá-
- »¿ß¿, ¬«Γ«pδÑ ¿¼ÑεΓß∩ ó ºá»¿ß¿ employee. T¿» THourly ∩ó½∩ÑΓß∩ ñ«-
- τÑα¡¿¼ Γ¿»«¼ ñ½∩ Γ¿»á TEmployee. THourly ¡áß½ÑñπÑΓ óßÑ, τΓ« »α¿-
- ¡áñ½Ñª¿Γ TEmployee, ¿ ¬α«¼Ñ Γ«ú« ¿¼ÑÑΓ ¬«Ñ-τΓ« ¡«ó«Ñ, τΓ« ñѽáÑΓ
- THourly π¡¿¬á½∞¡δ¼.
-
- ¥Γ«Γ »α«µÑßß, ß »«¼«Θ∞ε ¬«Γ«α«ú« «ñ¿¡ Γ¿» ¡áß½ÑñπÑΓ σáαá¬ΓÑ-
- α¿ßΓ¿¬¿ ñαπú«ú« Γ¿»á, ¡áºδóáÑΓß∩ ¡áß½Ññ«ó᡿Ѽ. ìáß½Ññ¡¿¬ ¡áºδóá-
- ÑΓß∩ »«α«ªñÑ¡¡δ¼ (ñ«τÑα¡¿¼) Γ¿»«¼, á Γ¿», ¬«Γ«α«¼π ¡áß½ÑñπÑΓ ñ«-
- τÑα¡¿⌐ Γ¿», ¡áºδóáÑΓß∩ »«α«ªñáεΘ¿¼ (α«ñ¿Γѽ∞߬¿¼) Γ¿»«¼.
-
- Éá¡ÑÑ ¿ºóÑßΓ¡δÑ Γ¿»δ ºá»¿ßÑ⌐ Åá߬á½∩ ¡Ñ ¼«úπΓ ¡áß½Ññ«óáΓ∞.
- Äñ¡á¬« Borland Pascal αáßΦ¿α∩ÑΓ ∩ºδ¬ Åá߬á½∞ ñ½∩ »«ññÑ᪬¿ ¡áß½Ñ-
- ñ«óá¡¿∩. Äñ¡¿¼ ¿º φΓ¿σ αáßΦ¿αÑ¡¿⌐ ∩ó½∩ÑΓß∩ ¡«óá∩ ¬áΓÑú«α¿∩ ßΓαπ¬-
- Γπαδ ñá¡¡δσ, ßó∩ºá¡¡á∩ ß ºá»¿ß∩¼¿, ¡« º¡áτ¿Γѽ∞¡« í«½ÑÑ ¼«Θ¡á∩.
- Æ¿»δ ñá¡¡δσ ó φΓ«⌐ ¡«ó«⌐ ¬áΓÑú«α¿¿ «»αÑñѽ∩εΓß∩ ß »«¼«Θ∞ε ¡«ó«ú«
- ºáαѺÑαó¿α«óá¡¡«ú« ß½«óá object. Æ¿» «íΩѬΓá ¼«ªÑΓ íδΓ∞ «»αÑñѽѡ
- ¬á¬ »«½¡δ⌐, ßἫßΓ«∩Γѽ∞¡δ⌐ Γ¿» ó ¼á¡ÑαÑ «»¿ßá¡¿∩ ºá»¿ßÑ⌐ Åá߬á-
- ½∩, ¡« «¡ ¼«ªÑΓ «»αÑñѽ∩Γ∞ß∩ ¿ ¬á¬ »«Γ«¼«¬ ßπΘÑßΓóπεΘÑú« Γ¿»á
- «íΩѬΓá »πΓѼ »«¼ÑΘÑ¡¿∩ »«α«ªñáεΘÑú« (α«ñ¿Γѽ∞߬«ú«) Γ¿»á ó ߬«í-
- ¬¿ »«ß½Ñ ºáαѺÑαó¿α«óá¡¡«ú« ß½«óá object.
-
- é »α¿ó«ñ¿¼«¼ ºñÑß∞ »α¿¼ÑαÑ »½áΓѪ¡«⌐ óÑñ«¼«ßΓ¿ ñóá ßó∩ºá¡¡δσ
- Γ¿»á «íΩÑ¬Γ«ó ¼«ú½¿ íδ «»αÑñѽ∩Γ∞ß∩ ß½ÑñπεΘ¿¼ «íαẫ¼:
-
- type
- TEmployee = object
- Name: string[25];
- Title: string[25];
- Rate : Real;
- end;
-
- THourly = object(TEmployee)
- Time : Integer;
- end;
-
- Åα¿¼Ñτá¡¿Ñ: ÄíαáΓ¿ΓÑ ó¡¿¼á¡¿Ñ, τΓ« ºñÑß∞ ¿ß»«½∞º«óá¡¿Ñ
- ߬«í«¬ «º¡áτáÑΓ ¡áß½Ññ«óá¡¿Ñ.
-
- çñÑß∞ TEmployee ∩ó½∩ÑΓß∩ α«ñ¿Γѽ∞߬¿¼ Γ¿»«¼, á THourly - ñ«-
-
- B.Pascal 7 & Objects /UG - 200 -
-
- τÑα¡¿¼ Γ¿»«¼. èᬠóδ πó¿ñ¿ΓÑ τπΓ∞ »«ºñ¡ÑÑ, φëà »α«µÑßß ¼«ªÑΓ
- »α«ñ«½ªáΓ∞ß∩ ¡Ñ«»αÑñѽѡ¡« ñ«½ú«. éδ ¼«ªÑΓÑ «»αÑñѽ¿Γ∞ ñ«τÑα¡¿⌐
- Γ¿» THourly, ñ«τÑα¡¿⌐ ¬ Γ¿»π THourly Γ¿» ¿ Γ.ñ. ü«½∞Φá∩ τáßΓ∞
- ¬«¡ßΓαπ¿α«óá¡¿∩ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δσ »α¿¬½áñ¡δσ »α«úαá¼¼ ß«ß-
- Γ«¿Γ ó »«ßΓα«Ñ¡¿¿ Γᬫ⌐ ¿Ñαáασ¿¿ «íΩÑ¬Γ«ó, ∩ó½∩εΘÑ⌐ß∩ «ΓαáªÑ¡¿Ñ¼
- úÑ¡ÑὫú¿τÑ߬«ú« ñÑαÑóá «íΩÑ¬Γ«ó ó »α¿½«ªÑ¡¿∩σ.
-
- éßÑ ó«º¼«ª¡δÑ Γ¿»δ, ¡áß½ÑñπεΘ¿Ñ Γ¿» TEmployee, ¡áºδóáεΓß∩
- ñ«τÑα¡¿¼¿ Γ¿»á¼¿ Γ¿»á TEmployee, Γ«úñá ¬á¬ THourly ∩ó½∩ÑΓß∩ ¡Ñ-
- »«ßαÑñßΓóÑ¡¡δ¼ ñ«τÑα¡¿¼ Γ¿»«¼ Γ¿»á TEmployee. ìá«í«α«Γ, TEmployee
- ∩ó½∩ÑΓß∩ ¡Ñ»«ßαÑñßΓóÑ¡¡δ¼ α«ñ¿ΓѽѼ Γ¿»á THourly. Æ¿» «íΩѬΓá (ó
- Γ«τ¡«ßΓ¿ ¬á¬ »«ñ¬áΓὫú ó DOS) ¼«ªÑΓ ¿¼ÑΓ∞ ½εí«Ñ τ¿ß½« ¡Ñ»«ßαÑñß-
- ΓóÑ¡¡δσ ñ«τÑα¡¿σ Γ¿»«ó, ¡« ó Γ« ªÑ óαѼ∩ Γ«½∞¬« «ñ¡«ú« ¡Ñ»«ßαÑñß-
- ΓóÑ¡¡«ú« α«ñ¿Γѽ∩.
-
- èᬠ»«¬áºá½¿ ñá¡¡δÑ «»αÑñѽѡ¿∩, «íΩѬΓδ ΓÑß¡« ßó∩ºá¡δ ß ºá-
- »¿ß∩¼¿. ì«ó«Ñ ºáαѺÑαó¿α«óá¡¡«Ñ ß½«ó« object ∩ó½∩ÑΓß∩ ¡á¿í«½ÑÑ
- «τÑó¿ñ¡δ¼ αẽ¿τ¿Ñ¼, ¡« ¬á¬ óδ πó¿ñ¿ΓÑ »«ºñ¡ÑÑ, ¿¼ÑÑΓß∩ í«½∞Φ«Ñ
- τ¿ß½« ñαπú¿σ αẽ¿τ¿⌐, ¡Ñ¬«Γ«αδÑ ¿º ¬«Γ«αδσ ñ«ó«½∞¡« Γ«¡¬¿Ñ.
-
- ìá»α¿¼Ñα, »«½∩ Name, Title ¿ Rate ó Γ¿»Ñ TEmployee ¡Ñ π¬áºá-
- ¡δ ∩ó¡« ó Γ¿»Ñ THourly, ¡« ó ½εí«¼ ß½πτáÑ Γ¿» THourly ß«ñÑαª¿Γ ¿σ
- í½áú«ñáα∩ ßó«⌐ßΓóπ ¡áß½Ññ«óá¡¿∩. éδ ¼«ªÑΓÑ ú«ó«α¿Γ∞ « óѽ¿τ¿¡Ñ
- Name Γ¿»á THourly ó Γ«τ¡«ßΓ¿ ΓᬠªÑ, ¬á¬ « óѽ¿τ¿¡Ñ Name Γ¿»á
- TEmployee.
-
- ¥¬ºÑ¼»½∩αδ «íΩÑ¬Γ¡δσ Γ¿»«ó
- ─────────────────────────────────────────────────────────────────
-
- ¥¬ºÑ¼»½∩αδ «íΩÑ¬Γ¡δσ Γ¿»«ó «»¿ßδóáεΓß∩ ó Γ«τ¡«ßΓ¿ ΓᬠªÑ,
- ¬á¬ ó Åá߬á½Ñ «»¿ßδóáÑΓß∩ ½εíá∩ »ÑαѼѡ¡á∩, ½¿í« ßΓáΓ¿τÑ߬á∩, ½¿-
- í« π¬áºáΓѽ∞, ßßδ½áεΘ¿⌐ß∩ ¡á αẼÑΘÑ¡¡πε ó ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿
- »ÑαѼѡ¡πε:
-
- type
- PHourly = ^THourly;
- var
- StatHourly: THourly; { ú«Γ«ó« }
- DynaHourly: PHourly; { »ÑαÑñ ¿ß»«½∞º«ó᡿Ѽ »á¼∩Γ∞ ñ«½ª¡á
- óδñѽ∩Γ∞ß∩ ß »«¼«Θ∞ε New }
-
-
- Å«½∩ «íΩÑ¬Γ«ó
- ─────────────────────────────────────────────────────────────────
-
- éδ ¼«ªÑΓÑ «íαáΓ¿Γ∞ß∩ ¬ »«½ε «íΩѬΓá ó Γ«τ¡«ßΓ¿ ΓᬠªÑ, ¬á¬ ¬
- »«½ε «íδτ¡«⌐ ºá»¿ß¿, ½¿í« ß »«¼«Θ∞ε «»ÑαáΓ«αá with, ½¿í« »πΓѼ
- πΓ«τ¡Ñ¡¿∩ ¿¼Ñ¡¿ ß »«¼«Θ∞ε Γ«τ¬¿. ìá»α¿¼Ñα:
-
- AnHourly.Rate := 9.45;
-
- with AnHourly do
- begin
-
- B.Pascal 7 & Objects /UG - 201 -
-
- Name := 'Sanderson, Arthur';
- Title := 'Word processor';
- end;
-
- Åα¿¼Ñτá¡¿Ñ: ìÑ ºáíδóá⌐ΓÑ « Γ«¼, τΓ« ¡áß½ÑñπѼδÑ »«½∩
- «íΩÑ¬Γ«ó ¡Ñ ¿¡ΓÑα»αÑΓ¿απεΓß∩ «ß«íδ¼ «íαẫ¼ Γ«½∞¬« »«Γ«¼π,
- τΓ« «¡¿ ∩ó½∩εΓß∩ ¡áß½ÑñπÑ¼δ¼¿.
-
- ê¼Ñ¡¡« ßÑ⌐τáß óδ ñ«½ª¡δ ºá»«¼¡¿Γ∞ (ó ¬«¡µÑ ¬«¡µ«ó φΓ« »α¿ñÑΓ
- ßἫ ß«í«⌐), τΓ« ¡áß½ÑñπѼδÑ »«½∩ ∩ó½∩εΓß∩ ßΓ«½∞ ªÑ ñ«ßΓπ»¡δ¼¿,
- ¬á¬ Ñß½¿ íδ «¡¿ í뫨 «íΩ∩ó½Ñ¡δ ó¡πΓα¿ Γ¿»á «íΩѬΓá. ìá»α¿¼Ñα, ñá-
- ªÑ Ñß½¿ Name, Title ¿ Rate ¡Ñ ∩ó½∩εΓß∩ τáßΓ∞ε «»¿ßá¡¿∩ Γ¿»á
- THourly («¡¿ ¡áß½Ññ«óá¡δ «Γ Γ¿»á TEmployee), Γ« óδ ¼«ªÑΓÑ ßßδ-
- ½áΓ∞ß∩ ¡á ¡¿σ, ß½«ó¡« «¡¿ «»¿ßá¡δ ó THourly:
-
- AnHourly.Name := 'Arthur Sanderson';
-
-
- ò«α«Φá∩ ¿ »½«σá∩ ΓÑσ¡¿¬á »α«úαá¼¼¿α«óá¡¿∩
- ─────────────────────────────────────────────────────────────────
-
- äáªÑ Ñß½¿ óδ ¼«ªÑΓÑ «íαáΓ¿Γ∞ß∩ ¬ »«½∩¼ «íΩѬΓá ¡Ñ»«ßαÑñß-
- ΓóÑ¡¡«, φΓ« íπñÑΓ ¡Ñ ß«óßѼ σ«α«ΦÑ⌐ ¿ñÑÑ⌐. Åα¿¡µ¿»δ «íΩÑ¬Γ¡«-«α¿-
- Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¿α«óá¡¿∩ ΓαÑíπεΓ, τΓ«íδ »«½∩ «íΩÑ¬Γ«ó í뫨
- ¿ß¬½ετÑ¡δ ¿º ¿ßσ«ñ¡«ú« ¬«ñá, ¡á߬«½∞¬« φΓ« 󫺼«ª¡«. ¥Γ« «úαá¡¿-
- τÑ¡¿Ñ »«¡áτá½π ¼«ªÑΓ »«¬áºáΓ∞ß∩ ß»«α¡δ¼ ¿ ªÑßΓ¬¿¼, ¡« «¡« ∩ó½∩ÑΓ-
- ß∩ Γ«½∞¬« τáßΓ∞ε «úα«¼¡«⌐ ¬áαΓ¿¡δ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«ú-
- αá¼¼¿α«óá¡¿∩, ¬«Γ«απε ¼δ ¡áα¿ßπѼ ó φΓ«⌐ ú½áóÑ. æ« óαѼѡѼ óδ
- πó¿ñ¿ΓÑ ß¼δß½, ߬αδΓδ⌐ ó φΓ«¼ ¡«ó«¼ «»αÑñѽѡ¿¿ σ«α«ΦÑ⌐ »αá¬Γ¿¬¿
- »α«úαá¼¼¿α«óá¡¿∩, σ«Γ∩ ¿¼ÑεΓß∩ ¡Ñ¬«Γ«αδÑ «ß¡«óá¡¿∩ »α¿«Γ¬αδΓ∞ Ñú«
- »ÑαÑñ ΓѼ, ¬á¬ óßÑ »α¿ñÑΓ ßἫ. Ç »«¬á ªÑ »α¿¼¿ΓÑ ¡á óÑαπ: ¿ºíÑ-
- úá⌐ΓÑ »α∩¼«ú« «íαáΘÑ¡¿∩ ¬ »«½∩¼ ñá¡¡δσ.
-
- Åα¿¼Ñτá¡¿Ñ: Borland Pascal »«ºó«½∩ÑΓ óá¼ ñѽáΓ∞ »«½∩
- «íΩѬΓá ¿ Ñú« ¼ÑΓ«ñδ τáßΓ¡δ¼¿. Å«ñα«í¡ÑÑ «í φΓ«¼ αáß߬áºδ-
- óáÑΓß∩ ¡¿ªÑ.
-
- êΓá¬, ¬á¬ ªÑ «íαáΘáΓ∞ß∩ ¬ »«½∩¼ «íΩѬΓá? èᬠτ¿ΓáΓ∞ ¿σ ¿ ¬á¬
- »α¿ßóá¿óáΓ∞ ¿¼ º¡áτÑ¡¿∩?
-
- Åα¿¼Ñτá¡¿Ñ: Å«½∩ ñá¡¡δσ «íΩѬΓá - φΓ« Γ«, τΓ« «íΩѬΓ
- "º¡áÑΓ", á ¼ÑΓ«ñδ «íΩѬΓá - φΓ« Γ«, τΓ« «íΩÑ¬Γ "ñѽáÑΓ".
-
- ÄΓóÑΓ«¼ ºá¬½ετáÑΓß∩ ó Γ«¼, τΓ« »α¿ óß∩¬«⌐ 󫺼«ª¡«ßΓ¿ ñ½∩
- ñ«ßΓπ»á ¬ »«½∩¼ ñá¡¡δσ ñ«½ª¡δ ¿ß»«½∞º«óáΓ∞ß∩ ¼ÑΓ«ñδ «íΩѬΓá. îÑ-
- Γ«ñ ∩ó½∩ÑΓß∩ »α«µÑñπα«⌐ ¿½¿ Σπ¡¬µ¿Ñ⌐, «»¿ßá¡¡«⌐ ó¡πΓα¿ «íΩѬΓá ¿
- ªÑßΓ¬« «úαá¡¿τÑ¡¡«⌐ φΓ¿¼ «íΩÑ¬Γ«¼.
-
-
-
-
- B.Pascal 7 & Objects /UG - 202 -
-
- îÑΓ«ñδ
- ─────────────────────────────────────────────────────────────────
-
- îÑΓ«ñδ ∩ó½∩εΓß∩ «ñ¡¿¼¿ ¿º ¡á¿í«½ÑÑ »α¿¼ÑτáΓѽ∞¡δσ áΓα¿íπΓ«ó
- «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿∩ ¿ ΓαÑíπεΓ ¡Ñ¬«Γ«α«⌐
- »αá¬Γ¿¬¿ »ÑαÑñ ¿ß»«½∞º«ó᡿Ѽ. éÑα¡Ñ¼ß∩ ß¡áτá½á ¬ ¿ßσ«ñ¡«¼π ó«»-
- α«ßπ « ΓΘÑΓ¡«⌐ »«»δ⪥ ßΓαπ¬Γπα¡«ú« »α«úαá¼¼¿α«óá¡¿∩, ßó∩ºá¡¡«⌐ ß
- ¿¡¿µ¿á½¿ºáµ¿Ñ⌐ ßΓαπ¬Γπα ñá¡¡δσ. Éáßß¼«Γα¿¼ ºáñáτπ ¿¡¿µ¿á½¿ºáµ¿¿
- ºá»¿ß¿ ß« ß½ÑñπεΘ¿¼ «»αÑñѽѡ¿Ñ¼:
-
- TEmployee = object
- Name: string[25];
- Title: string[25];
- Rate: Real;
- end;
-
- ü«½∞Φ¿¡ßΓó« »α«úαá¼¼¿ßΓ«ó ¿ß»«½∞º«ó὿ íδ «»ÑαáΓ«α with ñ½∩
- »α¿ßó«Ñ¡¿∩ »«½∩¼ Name, Title ¿ Rate ¡áτá½∞¡δσ º¡áτÑ¡¿⌐:
-
- var
- MyEmployee: Employee;
- with MyEmployee do
- begin
- Name := 'Sanderson, Arthur';
- Title := 'Word processor';
- Rate := 9.45;
- end;
-
- ¥Γ« Γ«ªÑ ¡Ñ»½«σ«, ¡« ºñÑß∞ ¼δ ªÑßΓ¬« «úαá¡¿τÑ¡δ «ñ¡«⌐ ߻ѵ¿-
- Σ¿τÑ߬¿¼ φ¬ºÑ¼»½∩α«¼ ºá»¿ß¿ - MyEmployee. àß½¿ »«ΓαÑíπÑΓß∩ ¿¡¿µ¿-
- ὿º¿α«óáΓ∞ í«½ÑÑ «ñ¡«⌐ ºá»¿ß¿ Γ¿»á Employee, Γ« óá¼ »α¿ñÑΓß∩ ¿ß-
- »«½∞º«óáΓ∞ í«½∞ΦÑÑ τ¿ß½« «»ÑαáΓ«α«ó with, ¬«Γ«αδÑ óδ»«½¡∩εΓ ó
- Γ«τ¡«ßΓ¿ ΓÑ ªÑ ñÑ⌐ßΓó¿∩. æ½ÑñπεΘ¿¼ ÑßΓÑßΓóÑ¡¡δ¼ Φáú«¼ ∩ó½∩ÑΓß∩
- ß«ºñá¡¿Ñ ¿¡¿µ¿á½¿º¿απεΘÑ⌐ »α«µÑñπαδ, ¬«Γ«αá∩ «í«íΘáÑΓ «»ÑαáΓ«α
- with »α¿¼Ñ¡¿Γѽ∞¡« ¬ ½εí«¼π φ¬ºÑ¼»½∩απ Γ¿»á TEmployee, »ÑαÑßδ½áÑ-
- ¼«⌐ ó ¬áτÑßΓóÑ »áαá¼ÑΓαá:
-
- procedure InitTEmployee(var Worker: TEmployee; AName,
- ATitle: String; ARate: Real);
- begin
- with Worker do
- begin
- Name := NewName ;
- Title := NewTitle;
- Rate := NewRate;
- end;
- end;
-
- ¥Γ« íπñÑΓ αáí«ΓáΓ∞, óßÑ ó »«α∩ñ¬Ñ, «ñ¡á¬« Ñß½¿ óδ »«τπóßΓóπ-
- ÑΓÑ, τΓ« »α¿ φΓ«¼ ΓαáΓ¿ΓÑ í«½∞ΦÑ óαѼѡ¿, τѼ ¡Ñ«íσ«ñ¿¼«, Γ« óδ
- »«τπóßΓóπÑΓÑ Γ« ªÑ ßἫÑ, τΓ« τπóßΓó«óá½ αá¡¡¿⌐ ßΓ«α«¡¡¿¬ «íΩѬΓ-
- ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¿α«óá¡¿∩.
-
-
- B.Pascal 7 & Objects /UG - 203 -
-
- ¥Γ« τπóßΓó« º¡áτ¿Γ, τΓ«, ¡π, ߬áªÑ¼, óδ αáºαáíáΓδóáÑΓÑ »α«-
- µÑñπαπ InitTEmployee ߻ѵ¿á½∞¡« ñ½∩ «íß½πª¿óá¡¿∩ Γ¿»á TEmployee.
- Æ«úñá »«τѼπ óδ ñ«½ª¡δ »«¼¡¿Γ∞, ¬á¬«⌐ Γ¿» ºá»¿ß¿ ¿ ¬á¬«⌐ Ñú« φ¬-
- ºÑ¼»½∩α «íαáíáΓδóáÑΓ InitTEmployee? 䫽ªÑ¡ ßπΘÑßΓó«óáΓ∞ ¡Ñ¬«Γ«αδ⌐
- »πΓ∞ «íΩÑñ¿¡Ñ¡¿∩ Γ¿»á ºá»¿ß¿ ¿ «íß½πª¿óáεΘÑú« ¬«ñá ó «ñ¡« Ññ¿¡«Ñ
- µÑ½«Ñ.
-
- Æá¬«⌐ »πΓ∞ ¿¼ÑÑΓß∩ ¿ ¡áºδóáÑΓß∩ ¼ÑΓ«ñ«¼. îÑΓ«ñ - φΓ« »α«µÑ-
- ñπαá ¿½¿ Σπ¡¬µ¿∩, «íΩÑñ¿¡Ñ¡¡á∩ ß ñá¡¡δ¼ Γ¿»«¼ ßΓ«½∞ ΓÑß¡«, τΓ«
- ¼ÑΓ«ñ ∩ó½∩ÑΓß∩ ¬á¬ íδ «¬απªÑ¡¡δ¼ ¡Ñó¿ñ¿¼δ¼ «»ÑαáΓ«α«¼ with, τΓ«
- ñѽáÑΓ φ¬ºÑ¼»½∩α ñá¡¡«ú« Γ¿»á ñ«ßΓπ»¡δ¼¿ ¿º¡πΓα¿ ñ½∩ ¼ÑΓ«ñá. Ä»-
- αÑñѽѡ¿Ñ Γ¿»á ó¬½ετáÑΓ ºáú«½«ó«¬ ¼ÑΓ«ñá. Å«½¡«Ñ «»αÑñѽѡ¿Ñ ¼Ñ-
- Γ«ñá ¬óá½¿Σ¿µ¿απÑΓß∩ ó ¿¼Ñ¡¿ Γ¿»á. Æ¿» «íΩѬΓá ¿ ¼ÑΓ«ñ «íΩѬΓá
- ∩ó½∩εΓß∩ ñóπ¼∩ ½¿µá¼¿ φΓ«⌐ ¡«ó«⌐ αạ«ó¿ñ¡«ßΓ¿ ßΓαπ¬Γπαδ, ¿¼Ñ¡πÑ-
- ¼«⌐ ¼ÑΓ«ñ«¼.
-
- type
- TEmployee = object
- Name, Title: string[25];
- Rate: Real;
- procedure Init (NewName, NewTitle: string[25];
- NewRate: Real);
- end;
-
- procedure TEmployee.Init (NewName, NewTitle: string[25];
- NewRate: Real);
- begin
- Name := NewName ; { Å«½Ñ Name «íΩѬΓá TEmployee }
- Title := NewTitle; { Å«½Ñ Tutle «íΩѬΓá TEmployee }
- Rate := NewRate; { Å«½Ñ Rate «íΩѬΓá TEmployee }
- end;
-
- ÆÑ»Ñα∞ ñ½∩ ¿¡¿µ¿á½¿ºáµ¿¿ φ¬ºÑ¼»½∩αá Γ¿»á TEmployee óδ »α«ßΓ«
- óδºδóáÑΓÑ Ñú« ¼ÑΓ«ñ, ß½«ó¡« ¼ÑΓ«ñ ∩ó½∩ÑΓß∩ »«½Ñ¼ ºá»¿ß¿, τΓ« ¿¼Ñ-
- ÑΓ ó»«½¡Ñ αÑá½∞¡δ⌐ ß¼δß½:
-
- var
- AnEmployee: TEmployee;
- AnEmployee.Init('Sara Adams, Account manager, 15000');
- {»p«ßΓ«, ¡Ñ Γᬠ½¿?}
-
-
- æ«ó¼ÑΘÑ¡¡δÑ ¬«ñ ¿ ñá¡¡δÑ
- ─────────────────────────────────────────────────────────────────
-
- Äñ¡¿¼ ¿º ó᪡Ñ⌐Φ¿σ »α¿¡µ¿»«ó «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«ú-
- αá¼¼¿α«óá¡¿∩ ∩ó½∩ÑΓß∩ Γ«, τΓ« »α«úαá¼¼¿ßΓ ó« óαѼ∩ αáºαáí«Γ¬¿
- »α«úαá¼¼δ ñ«½ªÑ¡ ñπ¼áΓ∞ « ¬«ñÑ ¿ « ñá¡¡δσ ß«ó¼ÑßΓ¡«. ì¿ ¬«ñ, ¡¿
- ñá¡¡δÑ ¡Ñ ßπΘÑßΓóπεΓ ó óá¬ππ¼Ñ. äá¡¡δÑ π»αáó½∩εΓ »«Γ«¬«¼ ¬«ñá, á
- ¬«ñ ¼á¡¿»π½¿απÑΓ «íαáºá¼¿ ¿ º¡áτÑ¡¿∩¼¿ ñá¡¡δσ.
-
- àß½¿ óáΦ¿ ¬«ñ ¿ ñá¡¡δÑ ∩ó½∩εΓß∩ αáºñѽѡ¡δ¼¿ φ½Ñ¼Ñ¡ΓἿ, Γ«
- óßÑúñá ßπΘÑßΓóπÑΓ «»áß¡«ßΓ∞ ó맮óá »αáó¿½∞¡«⌐ »α«µÑñπαδ ß ¡ÑóÑα-
-
- B.Pascal 7 & Objects /UG - 204 -
-
- ¡δ¼¿ ñá¡¡δ¼¿ ¿½¿ «Φ¿í«τ¡«⌐ »α«µÑñπαδ ß »αáó¿½∞¡δ¼¿ ñá¡¡δ¼¿. çáí«-
- Γá « ß«ó»áñÑ¡¿¿ φΓ¿σ φ½Ñ¼Ñ¡Γ«ó 󫺽áúáÑΓß∩ ¡á »α«úαá¼¼¿ßΓá, ¿ σ«-
- Γ∩ ßΓα«úá∩ Γ¿»¿ºáµ¿∩ Åá߬á½∩ ºñÑß∞ »«¼«úáÑΓ, ßá¼«Ñ ½πτΦÑÑ, τΓ« «¡
- ¼«ªÑΓ ßñѽáΓ∞ - φΓ« π¬áºáΓ∞ ¡á ¡Ñß««ΓóÑΓßΓó¿Ñ.
-
- Ä Γ«¼, τΓ« ñÑ⌐ßΓó¿Γѽ∞¡« ßπΘÑßΓóπÑΓ ó¼ÑßΓÑ, Åá߬á½∞ ¡¿úñÑ ¡Ñ
- ß««íΘáÑΓ. àß½¿ φΓ« ¡Ñ «Γ¼ÑτÑ¡« ¬«¼¼Ñ¡Γáα¿Ñ¼ ¿½¿ ¡Ñ Γ«, « τѼ óδ
- óßÑ óαѼ∩ »«¼¡¿ΓÑ, Γ« óδ ¿úαáÑΓÑ ß ßπñ∞í«⌐.
-
- ÄíΩÑ¬Γ «ßπΘÑßΓó½∩ÑΓ ß¿¡σα«¡¿ºáµ¿ε ¬«ñá ¿ ñá¡¡δσ »πΓѼ ß«ó-
- ¼ÑßΓ¡«ú« »«ßΓα«Ñ¡¿∩ ¿σ «»¿ßá¡¿⌐. ÉÑá½∞¡«, τΓ«íδ »«½πτ¿Γ∞ º¡áτÑ¡¿Ñ
- «ñ¡«ú« ¿º »«½Ñ⌐ «íΩѬΓá, óδ óδºδóáÑΓÑ «Γ¡«ß∩Θ¿⌐ß∩ ¬ φΓ«¼π «íΩѬΓπ
- ¼ÑΓ«ñ, ¬«Γ«αδ⌐ ó«ºóαáΘáÑΓ º¡áτÑ¡¿Ñ ¡πª¡«ú« »«½∩. ùΓ«íδ »α¿ßó«¿Γ∞
- »«½ε º¡áτÑ¡¿Ñ, óδ óδºδóáÑΓÑ ¼ÑΓ«ñ, ¬«Γ«αδ⌐ ¡áº¡áτáÑΓ ñá¡¡«¼π »«½ε
- ¡«ó«Ñ º¡áτÑ¡¿Ñ.
-
- Äñ¡á¬«, Borland Pascal ¡Ñ óδ¡πªñáÑΓ óáß ñѽáΓ∞ φΓ«. èᬠóß∩-
- ¬«Ñ ßΓαπ¬Γπα¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ, «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«ú-
- αá¼¼¿α«óá¡¿Ñ ∩ó½∩ÑΓß∩ ñ¿ßµ¿»½¿¡«⌐, ¬«Γ«απε óδ ñ«½ª¡δ ¡áó∩ºáΓ∞ ßÑ-
- íÑ, ¿ß»«½∞ºπ∩ »αÑñ«ßΓáó½∩ѼδÑ ∩ºδ¬«¼ ßαÑñßΓóá. Borland Pascal
- »«ºó«½∩ÑΓ óá¼ «íαáΘáΓ∞ß∩ ¬ »«½∩¼ «íΩѬΓá ¡Ñ»«ßαÑñßΓóÑ¡¡« ¿ºó¡Ñ
- «íΩѬΓá, «ñ¡á¬« «¡ »««Θα∩ÑΓ óáß ¿ß»«½∞º«óáΓ∞ »αÑ¿¼πΘÑßΓóá «íΩѬΓ-
- ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¿α«óá¡¿∩ ¿ ß«ºñáóáΓ∞ ¼ÑΓ«ñδ ñ½∩ ¼á¡¿-
- »π½¿α«óá¡¿∩ »«½∩¼¿ «íΩѬΓá ó¡πΓα¿ ßἫú« «íΩѬΓá. Borland Pascal
- »«ºó«½∩ÑΓ ºáñáΓ∞ »α¿¡πñ¿Γѽ∞¡πε ¿¡¬á»ßπ½∩µ¿ε ß »«¼«Θ∞ε ¿ß»«½∞º«-
- óá¡¿∩ «»¿ßá¡¿∩ private ó «íΩ∩ó½Ñ¡¿¿ «íΩѬΓá.
-
- Åα¿¼Ñτá¡¿Ñ: Å«ñα«í¡ÑÑ « »α¿¡πñ¿Γѽ∞¡«⌐ ¿¡¬á»ßπ½∩µ¿¿
- αáß߬áºδóáÑΓß∩ ¡¿ªÑ ó αáºñÑ½Ñ "æÑ¬µ¿∩ private".
-
-
- Ä»αÑñѽѡ¿Ñ ¼ÑΓ«ñ«ó
- ─────────────────────────────────────────────────────────────────
-
- Åα«µÑßß «»αÑñѽѡ¿∩ ¼ÑΓ«ñ«ó «íΩÑ¬Γ«ó ¡á»«¼¿¡áÑΓ ¼«ñπ½¿
- Borland Pascal. é¡πΓα¿ «íΩѬΓá ¼ÑΓ«ñ «»αÑñѽ∩ÑΓß∩ ºáú«½«ó¬«¼ »α«-
- µÑñπαδ ¿½¿ Σπ¡¬µ¿¿, ñÑ⌐ßΓóπεΘÑ⌐ ¬á¬ ¼ÑΓ«ñ:
-
- type
- TEmployee = object
- Name, Title: string[25];
- Rate: Real;
- procedure Init (AName, ATitle: String; ARate: Real);
- function GetName : String;
- function GetTitle : String;
- function GetRate : Real;
- end;
-
- Åα¿¼Ñτá¡¿Ñ: Å«½∩ ñá¡¡δσ ñ«½ª¡δ íδΓ∞ «»¿ßá¡δ »ÑαÑñ »Ñα-
- óδ¼ «»¿ß᡿Ѽ ¼ÑΓ«ñá.
-
- èᬠ¿ «»¿ßá¡¿∩ »α«µÑñπα ¿ Σπ¡¬µ¿⌐ ó ¿¡ΓÑαΣÑ⌐ß¡«⌐ ßѬµ¿¿ ¼«-
- ñπ½∩ (interface), «»¿ßá¡¿Ñ ¼ÑΓ«ñ«ó ó¡πΓα¿ «íΩѬΓá ú«ó«α¿Γ, τΓ«
-
- B.Pascal 7 & Objects /UG - 205 -
-
- ¼ÑΓ«ñδ ñѽáεΓ, ¡« ¡Ñ ú«ó«α¿Γ, ¬á¬.
-
- ¥Γ« «»αÑñѽ∩ÑΓß∩ ó¡Ñ «»αÑñѽѡ¿∩ «íΩѬΓá, ó «Γñѽ∞¡«¼ «»¿ßá-
- ¡¿¿ »α«µÑñπαδ ¿½¿ Σπ¡¬µ¿¿. àß½¿ ¼ÑΓ«ñ »«½¡«ßΓ∞ε «»αÑñѽ∩ÑΓß∩ ó¡Ñ
- «íΩѬΓá, Γ« ¿¼Ñ¡¿ ¼ÑΓ«ñá ñ«½ª¡« »αÑñΦÑßΓó«óáΓ∞ ¿¼∩ Γ¿»á «íΩѬΓá,
- ¬«Γ«α«¼π »α¿¡áñ½Ñª¿Γ φëà ¼ÑΓ«ñ, ß »«ß½ÑñπεΘÑ⌐ Γ«τ¬«⌐:
-
- procedure TEmployee.Init(AName, ATitle: string;ARate: Real);
- begin
- Name := AName;
- Title := ATitle;
- Rate := ARate;
- end;
-
- function TEmployee.GetName: String;
- GetName := Name;
- end;
-
- function TEmployee.GetTitle: String;
- begin
- GetTitle := Title;
- end;
-
- function TEmployee.GetRate: Real;
- begin
- GetRate := Rate;
- end;
-
- îÑΓ«ñ «»pÑñѽѡ¿∩ ß½ÑñπÑΓ ¼ÑΓ«ñπ ¿¡Γπ¿Γ¿ó¡«ú« páºñѽѡ¿∩
- Γ«τ¬á¼¿ ñ½∩ π¬áºá¡¿∩ »«½∩ ºá»¿ß¿. èp«¼Ñ ¡á½¿τ¿∩ «»pÑñѽѡ¿∩
- TEmployee.GetName ¼«ª¡« í佫 íδ «»pÑñѽ¿Γ∞ »p«µÑñπpπ ß ¿¼Ñ¡Ñ¼
- GetName, ó ¿¼Ñ¡¿ ¬«Γ«p«⌐ ¡ÑΓ »pÑñΦÑßΓóπεΘÑú« ¿ñÑ¡Γ¿Σ¿¬áΓ«pá
- TEmployee. Äñ¡á¬«, Γá¬á∩ "ó¡ÑΦ¡∩∩" GetName ¡Ñ íπñÑΓ ¿¼ÑΓ∞ ¡¿¬á¬«⌐
- ßó∩º¿ ß «íΩÑ¬Γ«¼ Γ¿»á TEmployee ¿ íπñÑΓ Γ«½∞¬« ºá»πΓδóáΓ∞ ß¼δß½
- »p«úpá¼¼δ.
-
-
- Äí½áßΓ∞ ñÑ⌐ßΓó¿∩ ¼ÑΓ«ñá ¿ »áαá¼ÑΓα Self
- ─────────────────────────────────────────────────────────────────
-
- çá¼ÑΓ∞ΓÑ, τΓ« ¡¿ ó «ñ¡«¼ ¿º »αÑñδñπΘ¿σ »α¿¼Ñα«ó ¬«¡ßΓαπ¬µ¿∩:
- with «íΩÑ¬Γ do... ¡Ñ óßΓαÑτáÑΓß∩ ó ∩ó¡«¼ ó¿ñÑ. Å«½∩ ñá¡¡δσ «íΩѬ-
- Γá ½Ñú¬« ñ«ßΓπ»¡δ ß »«¼«Θ∞ε ¼ÑΓ«ñ«ó «íΩѬΓá. ò«Γ∩ ó ¿ßσ«ñ¡«¼ ¬«ñÑ
- »«½∩ ñá¡¡δσ «íΩѬΓá ¿ ΓÑ½á ¼ÑΓ«ñ«ó αáºñѽѡδ, ¡á ßἫ¼ ñÑ½Ñ «¡¿
- ß«ó¼ÑßΓ¡« ¿ß»«½∞ºπεΓ «ñ¡π ¿ Γπ ªÑ «í½áßΓ∞ ñÑ⌐ßΓó¿∩.
-
- ê¼Ñ¡¡« »«φΓ«¼π «ñ¿¡ ¿º ¼ÑΓ«ñ«ó TEmployee ¼«ªÑΓ ß«ñÑαªáΓ∞
- «»ÑαáΓ«α GetTitle := Title íѺ ¬á¬«ú«-½¿í« ¬óá½¿Σ¿¬áΓ«αá »ÑαÑñ
- Title. ê ¿¼Ñ¡¡« »«φΓ«¼π Title »α¿¡áñ½Ñª¿Γ Γ«¼π «íΩѬΓπ, ¬«Γ«αδ⌐
- óδºδóáÑΓ ¼ÑΓ«ñ. àß½¿ «íΩÑ¬Γ óδºδóáÑΓ ¼ÑΓ«ñ, Γ« óδ»«½¡∩ÑΓß∩ ¡Ñ∩ó-
- ¡δ⌐ «»ÑαáΓ«α with myself do method, ßó∩ºδóáεΘ¿⌐ «íΩÑ¬Γ ¿ Ñú« ¼Ñ-
- Γ«ñδ ó «í½áßΓ¿ ñÑ⌐ßΓó¿∩.
-
-
- B.Pascal 7 & Objects /UG - 206 -
-
- ìÑ∩ó¡δ⌐ «»ÑαáΓ«α with óδ»«½¡∩ÑΓß∩ »πΓѼ »ÑαÑñáτ¿ ¡Ñó¿ñ¿¼«ú«
- »áαá¼ÑΓαá ¼ÑΓ«ñπ óß∩¬¿⌐ αáº, ¬«úñá φëà ¼ÑΓ«ñ óδºδóáÑΓß∩. ¥Γ«Γ
- »áαá¼ÑΓα ¡áºδóáÑΓß∩ Self ¿ ó ñÑ⌐ßΓó¿Γѽ∞¡«ßΓ¿ ∩ó½∩ÑΓß∩ 32-αáºα∩ñ-
- ¡δ¼ π¬áºáΓѽѼ ¡á φ¬ºÑ¼»½∩α «íΩѬΓá, «ßπΘÑßΓó½∩εΘÑú« ó맮ó ¼ÑΓ«-
- ñá. ÄΓ¡«ß∩Θ¿⌐ß∩ ¬ TEmployee ¼ÑΓ«ñ GetRate »α¿í½¿º¿Γѽ∞¡« φ¬ó¿óá-
- ½Ñ¡ΓÑ¡ ß½ÑñπεΘѼπ:
-
- function TEmployee.GetRate(var Self: TEmployee): integer;
- begin
- GetRate := Self.Rate;
- end;
-
- Åα¿¼Ñτá¡¿Ñ: æ¿¡Γá¬ß¿τÑ߬¿ φëà »α¿¼Ñα ¡Ñ ß«óßѼ ¬«α-
- αѬΓÑ¡. Ä¡ »α¿óÑñÑ¡ Γ«½∞¬« ºáΓѼ, τΓ«íδ ñáΓ∞ óá¼ í«½ÑÑ »«½-
- ¡«Ñ »αÑñßΓáó½Ñ¡¿Ñ « ߻ѵ¿Σ¿τÑ߬«⌐ ßó∩º¿ ¼Ñªñπ «íΩÑ¬Γ«¼ ¿
- Ñú« ¼ÑΓ«ñ«¼.
-
- ì« ó᪡« ½¿ óá¼ º¡áΓ∞ « ßπΘÑßΓó«óá¡¿¿ »áαá¼ÑΓαá Self? Äíδτ¡«
- ¡ÑΓ. âÑ¡Ñα¿απѼδ⌐ Borland Pascal ¬«ñ óδ»«½¡∩ÑΓ óßÑ φΓ« áóΓ«¼áΓ¿-
- τÑ߬¿. Äñ¡á¬« ó ¡Ñ¬«Γ«αδσ ¡Ñ¼¡«ú«τ¿ß½Ñ¡¡δσ ß½πτá∩σ óδ ¼«ªÑΓÑ ºá-
- σ«ΓÑΓ∞ »α«¡¿¬¡πΓ∞ ó¡πΓα∞ ¼ÑΓ«ñá ¿ ¿ß»«½∞º«óáΓ∞ »áαá¼ÑΓα Self ∩ó-
- ¡«.
-
- Åα¿¼Ñτá¡¿Ñ: ƒó¡«Ñ ¿ß»«½∞º«óá¡¿Ñ »áαá¼ÑΓαá Self ñ«»π߬á-
- ÑΓß∩, ¡« óδ ñ«½ª¡δ ¿ºíÑúáΓ∞ ß¿Γπᵿ⌐, ó ¬«Γ«αδσ φΓ« ΓαÑíπÑΓ-
- ß∩.
-
- Åáαá¼ÑΓα Self ∩ó½∩ÑΓß∩ τáßΓ∞ε Σ¿º¿τÑ߬«ú« ¬áñαá ßΓÑ¬á »α¿
- óßÑσ ó맮óáσ ¼ÑΓ«ñ«ó. îÑΓ«ñδ, ¿ß»«½∞ºπѼδÑ ¬á¬ ó¡ÑΦ¡¿Ñ ¡á ∩ºδ¬Ñ
- ÇßßѼí½Ñαá, ñ«½ª¡δ πτ¿ΓδóáΓ∞ Self »α¿ »«½πτÑ¡¿¿ ñ«ßΓπ»á ¬ »áαá-
- ¼ÑΓαá¼ ¼ÑΓ«ñá ó ßΓѬÑ.
-
- Åα¿¼Ñτá¡¿Ñ: ü«½ÑÑ »«ñα«í¡« «í ¿ß»«½∞º«óá¡¿¿ ¼ÑΓ«ñ«¼
- úαá¡¿µ ßΓѬá αáß߬áºδóáÑΓß∩ ó â½áóÑ 22 "Éπ¬«ó«ñßΓóá »« ∩ºδ-
- ¬π".
-
-
- Å«½∩ ñá¡¡δσ «íΩѬΓá ¿ Σ«α¼á½∞¡δÑ »áαá¼ÑΓαδ ¼ÑΓ«ñá
- ─────────────────────────────────────────────────────────────────
-
- éδó«ñ«¼ ¿º Γ«ú« Σá¬Γá, τΓ« ¼ÑΓ«ñδ ¿ ¿σ «íΩѬΓδ αáºñѽ∩εΓ «í-
- Θπε «í½áßΓ∞ ñÑ⌐ßΓó¿∩, ∩ó½∩ÑΓß∩ Γ«, τΓ« Σ«α¼á½∞¡δÑ »áαá¼ÑΓαδ ¼ÑΓ«-
- ñá ¡Ñ ¼«úπΓ íδΓ∞ ¿ñÑ¡Γ¿τ¡δ¼¿ ½εí«¼π ¿º »«½Ñ⌐ ñá¡¡δσ «íΩѬΓá. ¥Γ«
- ∩ó½∩ÑΓß∩ ¡Ñ ¬á¬¿¼-Γ« ¡«óδ¼ «úαá¡¿τÑ¡¿Ñ¼, ¡á½áúáÑ¼δ¼ «íΩÑ¬Γ¡«-«α¿-
- Ñ¡Γ¿α«óá¡¡δ¼ »α«úαá¼¼¿α«ó᡿Ѽ, á ߬«αÑÑ ΓѼ¿ ªÑ ßá¼δ¼¿ ßΓáα묨
- »αáó¿½á¼¿ «í½áßΓ¿ ñÑ⌐ßΓó¿∩, ¬«Γ«αδÑ Åá߬á½∞ ¿¼Ñ½ óßÑúñá. ¥Γ« Γ«
- ªÑ ßἫÑ, τΓ« ¿ ºá»αÑΓ ñ½∩ Σ«α¼á½∞¡δσ »áαá¼ÑΓα«ó »α«µÑñπαδ íδΓ∞
- ¿ñÑ¡Γ¿τ¡δ¼¿ ½«¬á½∞¡δ¼ »ÑαѼѡ¡δ¼ φΓ«⌐ »α«µÑñπαδ:
-
- procedure CrunchIt(Crunchee: MyDataRec,
- Crunchby, ErrorCode: integer);
- var
- A, B: char;
-
- B.Pascal 7 & Objects /UG - 207 -
-
- ErrorCode: integer;
- begin
- .
- .
- .
-
- 﫬á½∞¡δÑ »ÑαѼѡ¡δÑ »α«µÑñπαδ ¿ ÑÑ Σ«α¼á½∞¡δÑ »áαá¼ÑΓαδ
- ß«ó¼ÑßΓ¡« ¿ß»«½∞ºπεΓ «íΘπε «í½áßΓ∞ ñÑ⌐ßΓó¿∩ ¿ »«φΓ«¼π ¡Ñ ¼«úπΓ
- íδΓ∞ ¿ñÑ¡Γ¿τ¡δ¼¿. éδ »«½πτ¿ΓÑ ß««íΘÑ¡¿Ñ "Error 4: Duplicate
- identifier" (ÄΦ¿í¬á 4; Å«óΓ«αÑ¡¿Ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá), Ñß½¿ »«»δΓáÑ-
- ΓÑß∞ ¬«¼»¿½¿α«óáΓ∞ τΓ«-½¿í« »«ñ«í¡«Ñ, Γá ªÑ «Φ¿í¬á 󫺡¿¬áÑΓ »α¿
- »«»δ⪥ »α¿ßó«¿Γ∞ Σ«α¼á½∞¡«¼π »áαá¼ÑΓαπ ¼ÑΓ«ñá ¿¼Ñ¡¿ »«½∩ «íΩѬ-
- Γá, ¬«Γ«α«¼π ñá¡¡δ⌐ ¼ÑΓ«ñ »α¿¡áñ½Ñª¿Γ.
-
- ÄíßΓ«∩Γѽ∞ßΓóá ¡Ñ߬«½∞¬« «Γ½¿τáεΓß∩, Γᬠ¬á¬ »«¼ÑΘÑ¡¿Ñ ºáú«-
- ½«ó¬á »α«µÑñπαδ ó¡πΓα∞ ßΓαπ¬Γπαδ ñá¡¡δσ ∩ó½∩ÑΓß∩ ¡á¼Ñ¬«¼ ¡á ¡«ó-
- ΦÑßΓó« ó Æπαí« Åá߬á½Ñ, ¡« «ß¡«ó¡δÑ »α¿¡µ¿»δ «í½áßΓ¿ ñÑ⌐ßΓó¿∩
- Åá߬á½∩ ¡Ñ ¿º¼Ñ¡¿½¿ß∞.
-
-
- ÄíΩѬΓδ, φ¬ß»«αΓ¿απѼδÑ ¼«ñπ½∩¼¿
- ─────────────────────────────────────────────────────────────────
-
- ê¼ÑÑΓ ß¼δß½ «»αÑñѽ∩Γ∞ «íΩѬΓδ ó ¼«ñπ½Ñ »«ßαÑñßΓó«¼ «»¿ßá¡¿⌐
- Γ¿»á «íΩѬΓá ó ¿¡ΓÑαΣÑ⌐ß¡«⌐ τáßΓ¿ ¼«ñπ½∩, á ΓÑ½á »α«µÑñπα ¿ ¼ÑΓ«-
- ñδ «íΩѬΓá - ó ßѬµ¿¿ αÑ὿ºáµ¿¿. ä½∩ «»αÑñѽѡ¿∩ «íΩѬΓá ó ¼«ñπ-
- ½Ñ ¡Ñ ΓαÑíπÑΓß∩ ¡¿¬á¬¿σ ߻ѵ¿á½∞¡δσ ß«ú½áΦÑ¡¿⌐.
-
- Åα¿¼Ñτá¡¿Ñ: ¥¬ß»«αΓ¿απѼδ⌐ - «º¡áτáÑΓ "«»αÑñѽѡ¡δ⌐ ó
- ¿¡ΓÑαΣÑ⌐ß¡«⌐ τáßΓ¿ ¼«ñπ½∩".
-
- î«ñ㫨 ¼«úπΓ ¿¼ÑΓ∞ ßó«¿ ß«íßΓóÑ¡¡δÑ »α¿óáΓ¡δÑ (τáßΓ¡δÑ) «»-
- αÑñѽѡ¿∩ Γ¿»«ó «íΩÑ¬Γ«ó ó¡πΓα¿ óδ»«½¡∩Ѽ«⌐ ßѬµ¿¿, ¿ φΓ¿ Γ¿»δ
- »«ñóÑαªÑ¡δ ΓѼ ªÑ «úαá¡¿τÑ¡¿∩¼, ¬á¬ ¿ óß∩¬¿Ñ ñαπú¿Ñ Γ¿»δ, «»αÑñÑ-
- ½Ñ¡¡δÑ ó ßѬµ¿¿ αÑ὿ºáµ¿¿. Æ¿»δ «íΩÑ¬Γ«ó, «»αÑñѽѡ¡δÑ ó ¿¡ΓÑα-
- ΣÑ⌐ß¡«⌐ τáßΓ¿ ¼«ñπ½∩, ¼«úπΓ ¿¼ÑΓ∞ ñ«τÑα¡¿Ñ Γ¿»δ «íΩÑ¬Γ«ó, «»αÑñÑ-
- ½Ñ¡¡δÑ ó ßѬµ¿¿ αÑ὿ºáµ¿¿ ¼«ñπ½∩. é Γ«¼ ß½πτáÑ, ¬«úñá ¼«ñπ½∞ B
- ¿ß»«½∞ºπÑΓ ¼«ñπ½∞ A, ¼«ñπ½∞ B Γá¬ªÑ ¼«ªÑΓ «»αÑñѽ∩Γ∞ ñ«τÑα¡¿Ñ Γ¿-
- »δ ½εí«ú« Γ¿»á «íΩѬΓá, φ¬ß»«αΓ¿απѼ«ú« ¼«ñπ½Ñ¼ A.
-
- Ä»¿ßá¡¡δÑ αá¡ÑÑ Γ¿»δ «íΩÑ¬Γ«ó ¿ ¼ÑΓ«ñδ ¼«ª¡« «»αÑñѽ¿Γ∞ ó
- ¼«ñπ½Ñ, ¬á¬ »«¬áºá¡« ó »α«úαá¼¼Ñ WORKERS.PAS ¡á ñ¿ßΓα¿íπΓ¿ó¡«¼
- ñ¿ß¬Ñ. ùΓ«íδ ¿ß»«½∞º«óáΓ∞ Γ¿»δ «íΩÑ¬Γ«ó ¿ ¼ÑΓ«ñδ, «»αÑñѽѡ¡δÑ ó
- ¼«ñπ½Ñ Workers, óδ ¼«ªÑΓÑ »α«ßΓ« ¿ß»«½∞º«óáΓ∞ φëà ¼«ñπ½∞ ó ßó«Ñ⌐
- »α«úαá¼¼Ñ ¿ «»¿ßáΓ∞ φ¬ºÑ¼»½∩α Γ¿»á THourly ó ßѬµ¿¿ »ÑαѼѡ¡δσ
- »α«úαá¼¼δ:
-
- program HourPrt;
-
- uses WinCrt, Workers;
-
- var
- AnHourly: THourly;
-
- B.Pascal 7 & Objects /UG - 208 -
-
- .
- .
- .
-
- ä½∩ ß«ºñá¡¿∩ ¿ óδó«ñá ΣἿ½¿¿ páí«τÑú«-»«τáß«ó¿¬á, Ñú« ñ«½ª-
- ¡«ßΓ¿ ¿ pẼÑpá óδ»½áΓδ, »pÑñßΓáó½Ñ¡¡«⌐ »ÑpѼѡ¡«⌐ AnHourly, óδ
- »α«ßΓ« óδºδóáÑΓÑ ¼ÑΓ«ñδ AnHourly, ¿ß»«½∞ºπ∩ ß½ÑñπεΘ¿⌐ ß¿¡Γá¬ß¿ß:
-
- AnHourlye.Init('Sara Adams', 'Account manager', 1400);
- { ºá»¿ßδóáÑΓ ó φ¬ºÑ¼»½∩p THourly }
- { ñá¡¡δÑ ñ½∩ æápδ Çñá¼ß: ΣἿ½¿ε, }
- { ñ«½ª¡«ßΓ∞ ¿ pẼÑp óδ»½áΓδ. }
- AnHourly.Show;
-
- Åα¿¼Ñτá¡¿Ñ: ÄíΩѬΓἿ ¼«úπΓ íδΓ∞ Γá¬ªÑ Γ¿»¿º¿α«óá¡¡δÑ
- ¬«¡ßΓá¡Γδ.
-
- ÄíΩѬΓδ, íπñπτ¿ «τÑ¡∞ ßσ«ª¿¼¿ ß ºá»¿ß∩¼¿, ¼«úπΓ ¿ß»«½∞º«-
- óáΓ∞ß∩ ó¡πΓα¿ «»ÑαáΓ«αá with. é φΓ«¼ ß½πτáÑ π¬áºá¡¿Ñ ¿¼Ñ¡¿ «íΩѬ-
- Γá, ∩ó½∩εΘÑú«ß∩ ß«íßΓóÑ¡¡¿¬«¼ ¼ÑΓ«ñ«ó, ¡Ñ ∩ó½∩ÑΓß∩ ¡Ñ«íσ«ñ¿¼δ¼:
-
- with AnHourly do
- begin
- Init('Sara Adams', 'Account manager', 1400);
- Show;
- end;
-
- èᬠ¿ ó ß½πτá∩σ ß ºá»¿ß∩¼¿, «íΩѬΓδ ¼«úπΓ »ÑαÑñáóáΓ∞ß∩ ó ¬á-
- τÑßΓóÑ »áαá¼ÑΓαá »α«µÑñπαÑ ¿ (¬á¬ óδ πó¿ñ¿ΓÑ »«ºñ¡ÑÑ) ¼«úπΓ αáº-
- ¼ÑΘáΓ∞ß∩ ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ »á¼∩Γ¿.
-
-
- æÑ¬µ¿∩ private
- ─────────────────────────────────────────────────────────────────
-
- é ¡Ñ¬«Γ«αδσ ß½πτá∩σ π óáß ¼«úπΓ ¿¼ÑΓ∞ß∩ τáßΓ¿ «»¿ßá¡¿⌐ «íΩ-
- Ñ¬Γ«ó, ¬«Γ«αδÑ φ¬ß»«αΓ¿α«óáΓ∞ ¡ÑªÑ½áΓѽ∞¡«. ìá»α¿¼Ñα, óδ ¼«ªÑΓÑ
- »αÑñπß¼«ΓαÑΓ∞ «íΩѬΓδ ñ½∩ ñαπú¿σ »α«úαá¼¼¿ßΓ«ó, ¬«Γ«αδÑ «¡¿ ¼«úπΓ
- ¿ß»«½∞º«óáΓ∞, ¡« ¡Ñ ¼«úπΓ ¡Ñ»«ßαÑñßΓóÑ¡¡« ¼á¡¿»π½¿α«óáΓ∞ ß ñá¡¡δ-
- ¼¿ «íΩѬΓá. ùΓ«íδ «í½Ñúτ¿Γ∞ φΓ«, Borland Pascal »«ºó«½∩ÑΓ ºáñá-
- óáΓ∞ ó¡πΓα¿ «íΩÑ¬Γ«ó »α¿óáΓ¡δÑ (ºá¬αδΓδÑ) »«½∩ ¿ ¼ÑΓ«ñδ.
-
- Åα¿óáΓ¡δÑ »«½∩ ¿ ¼ÑΓ«ñδ ñ«ßΓπ»¡δ Γ«½∞¬« ó¡πΓα¿ Γ«ú« ¼«ñπ½∩,
- ó ¬«Γ«α«¼ «»¿ßá¡ «íΩѬΓ. é »αÑñδñπΘѼ »α¿¼ÑαÑ, Ñß½¿ íδ Γ¿»
- THourly ß«ñÑαªá½ »α¿óáΓ¡δÑ »«½∩, Γ« ñ«ßΓπ» ¬ ¡¿¼ ¼«ª¡« í佫 íδ
- »«½πτ¿Γ∞ Γ«½∞¬« ó ¼«ñπ½Ñ THourly. äáªÑ Ñß½¿ ñαπú¿Ñ τáßΓ¿ «íΩѬΓá
- THourly ¼«ª¡« í佫 íδ φ¬ß»«αΓ¿α«óáΓ∞, (τáßΓ¿, «»¿ßá¡¡δÑ, ¬á¬ »α¿-
- óáΓ¡δÑ, í뫨 íδ ¡Ññ«ßΓπ»¡δ¼¿.
-
- Åα¿óáΓ¡δÑ »«½∩ ¿ ¼ÑΓ«ñδ «»¿ßδóáεΓß∩ ¡Ñ»«ßαÑñßΓóÑ¡¡« »«ß½Ñ
- «íδτ¡δσ »«½Ñ⌐ ¿ ¼ÑΓ«ñ«ó, óß½Ññ ºá ºáαѺÑαó¿α«óá¡¡δ¼ ß½«ó«¼
- private. Æá¬¿¼ «íαẫ¼, »«½¡δ⌐ ß¿¡Γá¬ß¿ß «»¿ßá¡¿∩ «íΩѬΓá íπñÑΓ
- ß½ÑñπεΘ¿¼:
-
- B.Pascal 7 & Objects /UG - 209 -
-
-
- type
- NewObject = object(α«ñ¿Γѽ∞)
- »«½∩; { «íΘÑñ«ßΓπ»¡δÑ }
- ¼ÑΓ«ñδ; { «íΘÑñ«ßΓπ»¡δÑ }
- private
- »«½∩; { »α¿óáΓ¡δÑ }
- ¼ÑΓ«ñδ; { »α¿óáΓ¡δÑ }
- end;
-
-
- Åα«úαá¼¼¿α«óá¡¿Ñ ó "ñÑ⌐ßΓó¿Γѽ∞¡«¼ ºá½«úÑ"
- ─────────────────────────────────────────────────────────────────
-
- ü«½∞Φá∩ τáßΓ∞ ¿º Γ«ú«, τΓ« ú«ó«α¿½«ß∞ «í «íΩѬΓáσ ñ« ß¿σ
- »«α, ¿ßσ«ñ¿Γ ¿º πñ«íßΓó ¿ »Ñαß»Ñ¬Γ¿ó Borland Pascal, »«ß¬«½∞¬π
- ¡á¿í«½ÑÑ óÑα«∩Γ¡«, τΓ« φΓ« ¿¼Ñ¡¡« Γ«, ß τÑú« óδ ¡áτ¡ÑΓÑ. ÆÑ»Ñα∞
- ¡áτ¡πΓß∩ ¿º¼Ñ¡Ñ¡¿∩, »«ß¬«½∞¬π ¼δ »«ñ«Φ½¿ ¬ ¬«¡µÑ»µ¿∩¼ «íΩѬΓ-
- ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¿α«óá¡¿∩ ß »«¼«Θ∞ε ¡Ñ¬«Γ«αδσ »α¿¡µ¿-
- »«ó »α«úαá¼¼¿α«óá¡¿∩ ¡á ßΓá¡ñáαΓ¡«¼ Åá߬á½Ñ. ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«-
- óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ ¿¼ÑÑΓ ßó«Ñ ß«íßΓóÑ¡¡«Ñ «Γñѽ∞¡«Ñ ¼¡«ªÑßΓ-
- ó« »«¡∩Γ¿⌐, τáßΓ¿τ¡« í½áú«ñáα∩ ¡áτá½á¼ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú«
- »α«úαá¼¼¿α«óá¡¿∩ (ñ« ¡Ñ¬«Γ«α«⌐ ßΓѻѡ¿ «úαá¡¿τÑ¡¡δ¼) ó ¡áπτ¡δσ
- ¬απúáσ, «ñ¡á¬« Γá¬ªÑ ¿ »«Γ«¼π, τΓ« φΓá ¬«¡µÑ»µ¿∩ ñÑ⌐ßΓó¿Γѽ∞¡«
- ∩ó½∩ÑΓß∩ αáñ¿¬á½∞¡« «Γ½¿τ¡«⌐ «Γ ñαπú¿σ.
-
- Åα¿¼Ñτá¡¿Ñ: ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δÑ ∩ºδ¬¿ «ñ¡áªñδ ¼Ñ-
- ΓáΣ«α¿τ¡« ¡áºó὿ "∩ºδ¬á¼¿ á¬ΓÑα«ó".
-
- Äñ¡¿¼, τáßΓ« ºáíáó¡δ¼, ß½ÑñßΓó¿Ñ¼ φΓ«ú« ∩󿽫ß∞ Γ«, τΓ« «íΩ-
- Ñ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ Σá¡áΓ¿τ¡« "«ñπΦÑó½∩ÑΓ"
- ßó«¿ «íΩѬΓδ. ÄΓ¡δ¡Ñ ñá¡¡δÑ ñ½∩ óáß ¡Ñ Ѽ¬«ßΓ¿, ¬«Γ«αδÑ óδ ¼«ªÑΓÑ
- ¡á»«½¡∩Γ∞ º¡áτÑ¡¿∩¼¿. æ Γ«τ¬¿ ºαÑ¡¿∩ ¡«ó«ú« óºú½∩ñá ¡á óÑΘ¿, «íΩ-
- ѬΓδ óδú½∩ñ∩Γ ¬á¬ á¬ΓÑαδ ¡á »«ñ¼«ßΓ¬áσ ß« ¼¡«ªÑßΓó«¼ ºáπτÑ¡¡δσ
- α«½Ñ⌐ (¼ÑΓ«ñ«ó). àß½¿ óδ (ñ¿αÑ¬Γ«α) ñáÑΓÑ ¿¼ ß½«ó«, Γ« á¬ΓÑαδ ¡á-
- τ¿¡áεΓ ñѬ½á¼¿α«óáΓ∞ ó ß««ΓóÑΓßΓó¿¿ ß« ߵѡáα¿Ñ¼.
-
- ü佫 íδ »«½Ñº¡« »αÑñßΓáó¿Γ∞ Σπ¡¬µ¿ε AnHourly.GetPayAmount
- ¬á¬, ¡á»α¿¼Ñα, ñáεΘπε αáß»«α∩ªÑ¡¿Ñ «íΩѬΓπ AnHourly "éδτ¿ß½¿Γ∞
- αẼÑα óáΦÑ⌐ ѪÑñ¡Ñó¡«⌐ »½áΓδ". ûÑ¡Γαá½∞¡«⌐ ¬«¡µÑ»µ¿Ñ⌐ ºñÑß∞ ∩ó-
- ½∩ÑΓß∩ «íΩѬΓ. ¥Γ«Γ «íΩÑ¬Γ «íß½πª¿óáεΓ ¬á¬ ß»¿ß«¬ ¼ÑΓ«ñ«ó, Γᬠ¿
- ß»¿ß«¬ »«½Ñ⌐ ñá¡¡δσ, ß«ñÑαªáΘ¿σß∩ ó «íΩѬΓÑ. ê ¡¿ ¬«ñ, ¡¿ ñá¡¡δÑ
- ¡Ñ ∩ó½∩εΓß∩ ºñÑß∞ "ñ¿αÑ¬Γ«α«¼".
-
- ùΓ«íδ íδΓ∞ ß«óßѼ »α¿ó½Ñ¬áΓѽ∞¡δ¼, «íΩÑ¬Γ ¡Ñ ¼«ªÑΓ íδΓ∞ «»¿-
- ßá¡ ¬á¬ á¬ΓÑα ¡á ߵѡÑ. Äíαẵπ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«ú-
- αá¼¼¿α«óá¡¿∩ ß í«½∞Φ¿¼ Γαπñ«¼ πñáÑΓß∩ ¼«ñѽ¿α«óáΓ∞ ß«ßΓáó½∩εΘ¿Ñ
- »α«í½Ñ¼δ ¬á¬ ¬«¼»«¡Ñ¡Γδ, á ¡Ñ ¬á¬ ½«ú¿τÑ߬¿Ñ áíßΓαᬵ¿¿. æ½πτá⌐-
- ¡«ßΓ¿ ¿ ºá¬«¡«¼Ñα¡«ßΓ¿, ¡á»«½¡∩εΘ¿Ñ ¡áΦπ ª¿º¡∞ («Γ Γ«ßΓÑα«ó ñ«
- ΓѽÑΣ«¡¡δσ ºó«¡¬«ó »« »«ó«ñπ ¼áσα«óδσ »«½«Γѡѵ) óßÑ ¿¼ÑεΓ σáαá¬-
- ΓÑα¿ßΓ¿¬¿ (ñá¡¡δÑ) ¿ ½¿¡¿¿ »«óÑñÑ¡¿∩ (¼ÑΓ«ñδ). òáαá¬ΓÑα¿ßΓ¿¬¿
- Γ«ßΓÑαá ¼«úπΓ ó¬½ετáΓ∞ ΓαÑíπѼ«Ñ ¡á»α∩ªÑ¡¿Ñ, τ¿ß½« úαÑ¡«¬, ¬«Γ«-
- αδÑ «¡ ¼«ªÑΓ »«ñªáα¿Γ∞ «ñ¡«óαѼѡ¡«, πßΓá¡«ó¬π ß½áí«ú« ¿½¿ ß¿½∞-
-
- B.Pascal 7 & Objects /UG - 210 -
-
- ¡«ú« πα«ó¡Ñ⌐ »«ñªáα¿óá¡¿∩, µóÑΓ Γ«ßΓÑαá, Ñú« Σáíα¿τ¡πε ¼áα¬π ¿ Γ.
- ñ. àú« »«óÑñÑ¡¿Ñ ¼«ªÑΓ ó¬½ετáΓ∞ ºáúαπº¬π ¬π߬«ó σ½Ñíá, »«ñªáα¿óá-
- ¡¿Ñ φΓ¿σ ¬π߬«ó ¿ áóΓ«¼áΓ¿τÑ߬«Ñ óδΓὬ¿óá¡¿Ñ ú«Γ«óδσ úαÑ¡«¬ ¡á-
- απªπ.
-
- àß½¿ ¼δ σ«Γ¿¼ ¡á»¿ßáΓ∞ »α«úαá¼¼π ¿¼¿Γᵿ¿ ¬πσ¡¿, Γ« ¬á¬«⌐ ªÑ
- ¿¼ÑÑΓß∩ ¡á¿½πτΦ¿⌐ ß»«ß«í ß¼«ñѽ¿α«óáΓ∞ αẽ¿τ¡δÑ »α¿ß»«ß«í½Ñ¡¿∩,
- ¬α«¼Ñ «íΩÑ¬Γ«ó, ß ¿σ σáαá¬ΓÑα¿ßΓ¿¬á¼¿ ¿ ½¿¡¿∩¼¿ »«óÑñÑ¡¿∩, ºá¬«-
- ñ¿α«óá¡¡δ¼¿ ó »«½∩ ñá¡¡δσ ¿ ó ¼ÑΓ«ñáσ? öá¬Γ¿τÑ߬¿, φΓ« πªÑ ßñѽá-
- ¡«: «ñ¿¡ ¿º »Ñαóδσ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δσ ∩ºδ¬«ó (濼π½á-67)
- íδ½ ß«ºñá¡ ¬á¬ ∩ºδ¬ ñ½∩ ¡á»¿ßá¡¿∩ Γá¬¿σ ¿¼¿Γᵿ⌐.
-
- àßΓ∞ Γá¬ªÑ »α¿τ¿¡á Γ«ú«, τΓ« «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«ú-
- αá¼¼¿α«óá¡¿Ñ ñ«ó«½∞¡« ¬αÑ»¬« ßó∩ºá¡« ó Γαáñ¿µ¿«¡¡«¼ ß¼δß½Ñ ß «α¿-
- Ñ¡Γ¿α«óá¡¡«⌐ ¡á »«ßΓα«Ñ¡¿Ñ úαáΣ¿¬«ó ßαÑñ«⌐. ÄíΩѬΓδ ñ«½ª¡δ íδΓ∞
- ¼«ñѽ∩¼¿, ¿ ÑßΓ∞ ½¿ ½πτΦ¿⌐ ß»«ß«í ß¼«ñѽ¿α«óáΓ∞ «íΩѬΓ, τѼ ¡áα¿-
- ß«óáΓ∞ Ñú« ¿º«íαáªÑ¡¿Ñ? ÄíΩѬΓδ ó Borland Pascal ñ«½ª¡δ ¿¼¿Γ¿α«-
- óáΓ∞ ¬«¼»«¡Ñ¡Γδ »α«í½Ñ¼π, ¬«Γ«απε óδ »δΓáÑΓÑß∞ αáºαÑΦ¿Γ∞. Åα¿¼¿ΓÑ
- φΓ« ó« 󡿼᡿Ñ, Ñß½¿ ó ñá½∞¡Ñ⌐ΦѼ óδ ¡á¼ÑαÑ¡δ φ¬ß»½πáΓ¿α«óáΓ∞
- ¡«óδÑ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δÑ αáßΦ¿αÑ¡¿∩ Borland Pascal.
-
-
-
-
- B.Pascal 7 & Objects /UG - 211 -
-
- ꡬá»ßπ½∩µ¿∩
- ─────────────────────────────────────────────────────────────────
-
- ÄíΩÑñ¿¡Ñ¡¿Ñ ó «íΩѬΓÑ ¬«ñá ¿ ñá¡¡δσ ¡áºδóáÑΓß∩ ¿¡¬á»ßπ½∩µ¿-
- Ñ⌐. 髺¼«ª¡« óδ ß¼«ªÑΓÑ »αÑñ«ßΓáó¿Γ∞ ñ«ßΓáΓ«τ¡«Ñ ¬«½¿τÑßΓó« ¼ÑΓ«-
- ñ«ó, í½áú«ñáα∩ τÑ¼π »«½∞º«óáΓѽ∞ «íΩѬΓá ¡¿¬«úñá ¡Ñ íπñÑΓ «íαá-
- ΘáΓ∞ß∩ ¬ »«½∩¼ «íΩѬΓá ¡Ñ»«ßαÑñßΓóÑ¡¡«. ìѬ«Γ«αδÑ ñαπú¿Ñ «íΩÑ¬Γ¡«
- -«α¿Ñ¡Γ¿α«óá¡¡δÑ ∩ºδ¬¿, ¡á»α¿¼Ñα Smalltalk, ΓαÑíπεΓ «í∩ºáΓѽ∞¡«⌐
- ¿¡¬á»ßπ½∩µ¿¿, «ñ¡á¬« ó Borland Pascal π óáß ÑßΓ∞ óδí«α, á σ«α«Φá∩
- »αá¬Γ¿¬á «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¿α«óá¡¿∩ ó« ¼¡«ú«¼ ºá-
- ó¿ß¿Γ «Γ óáΦÑ⌐ ñ«íα«ß«óÑßΓ¡«ßΓ¿.
-
- ÄíΩѬΓδ TEmployee ¿ THourly ¡á»¿ßá¡δ Γᬿ¼ «íαẫ¼, τΓ« ß«-
- óÑαΦÑ¡¡« ¿ß¬½ετÑ¡á ¡Ñ«íσ«ñ¿¼«ßΓ∞ »α∩¼«ú« «íαáΘÑ¡¿∩ ¬ ¿σ ó¡πΓαÑ¡-
- ¡¿¼ »«½∩¼ ñá¡¡δσ:
-
- type
- TEmployee = object
- Name, Title: string[25];
- Rate: Real;
- procedure Init (AName, ATitle: string; ARate: Real);
- function GetName : String;
- function GetTitle : String;
- function GetRate : Real;
- function GetPayAmount : Real;
- end;
-
- THourly = object(TEmployee)
- Time: Integer;
- procedure Init(AName, ATitle: string; ARate:
- Real, Atime: Integer);
- function GetPayAmount : Real;
- end;
-
- çñÑß∞ »α¿ßπΓßΓóπεΓ Γ«½∞¬« τÑΓδpÑ »«½∩ ñá¡¡δσ: Name, Title,
- Rate ¿ Time. îÑΓ«ñδ ShowName ¿ ShowTitle óδó«ñ∩Γ ΣἿ½¿ε páí«Γáε-
- ΘÑú« ¿ Ñú« ñ«½ª¡«ßΓ∞, ß««ΓóÑΓßΓóÑ¡¡«. îÑΓ«ñ GetPayAmount ¿ß»«½∞-
- ºπÑΓ Rate, á ó ß½πτáÑ páí«ΓáεΘÑú« THourly ¿ Time ñ½∩ óδτ¿ß½Ñ¡¿∩
- ßπ¼¼δ óδ»½áΓ páí«ΓáεΘѼπ. çñÑß∞ πªÑ ¡ÑΓ ¡Ñ«íσ«ñ¿¼«ßΓ¿ «ípáΘáΓ∞ß∩
- ¡Ñ»«ßpÑñßΓóÑ¡¡« ¬ φΓ¿¼ »«½∩¼ ñá¡¡δσ.
-
- ÅαÑñ»«½«ª¿ó ßπΘÑßΓó«óá¡¿Ñ φ¬ºÑ¼»½∩αá AnHourly Γ¿»á THourly,
- óδ ¼«ú½¿ íδ ¿ß»«½∞º«óáΓ∞ ¡áí«α ¼ÑΓ«ñ«ó ñ½∩ ¼á¡¿»π½¿α«óá¡¿∩ »«½∩¼¿
- ñá¡¡δσ AnHourly, ¡á»α¿¼Ñα:
-
- with AnHourly do
- begin
- Init ('Allison Karlon, Fork lift operator' 12.95, 62);
- { éδó«ñ¿Γ ¡á φ¬pá¡ ΣἿ½¿ε, ñ«½ª¡«ßΓ∞ ¿ ßπ¼¼π óδ»½áΓ}
- Show;
- end;
-
- ÄíαáΓ¿ΓÑ ó¡¿¼á¡¿Ñ, τΓ« ñ«ßΓπ» ¬ »«½∩¼ «íΩѬΓá «ßπΘÑßΓó½∩ÑΓß∩
-
- B.Pascal 7 & Objects /UG - 212 -
-
- ¡Ñ ¿¡áτÑ, ¬á¬ Γ«½∞¬« ß »«¼«Θ∞ε ¼ÑΓ«ñ«ó φΓ«ú« «íΩѬΓá.
-
-
- îÑΓ«ñδ: ¡¿¬á¬«ú« πσπñΦÑ¡¿∩
- ─────────────────────────────────────────────────────────────────
-
- ä«íáó½Ñ¡¿Ñ φΓ¿σ ¼ÑΓ«ñ«ó ¡Ñº¡áτ¿Γѽ∞¡« πóѽ¿τ¿óáÑΓ «íΩѼ ¿ß-
- σ«ñ¡«ú« ¬«ñá, «ñ¡á¬« αáºó¿Γδ⌐ ¬«¼»«¡«óΘ¿¬ Borland Pascal óδíαáßδ-
- óáÑΓ ¬«ñ ½εí«ú« ¼ÑΓ«ñá, ¬«Γ«αδ⌐ ¡¿ αáºπ ¡Ñ óδºδóáÑΓß∩ ó »α«úαá¼-
- ¼Ñ. Å«φΓ«¼π óá¼ ¡Ñ ß½ÑñπÑΓ «ΓßΓπ»áΓ∞ »α¿ »αÑñ«ßΓáó½Ñ¡¿¿ «íΩѬΓπ
- Γ«ú« ¿½¿ ¿¡«ú« ¼ÑΓ«ñá, ¬«Γ«αδ⌐ ¿¼ÑÑΓ «ñ¿¡á¬«óδÑ Φá¡ßδ íδΓ∞ ¬á¬
- ¿ß»«½∞º«óá¡¡δ¼, Γᬠ¿ ¡Ñ¿ß»«½∞º«óá¡¡δ¼ ó ¬áªñ«⌐ »α«úαá¼¼Ñ, ó ¬«-
- Γ«α«⌐ ºáñÑ⌐ßΓó«óá¡ ñá¡¡δ⌐ Γ¿» «íΩѬΓá. ìѿ߻«½∞ºπѼδÑ ¼ÑΓ«ñδ ¡¿-
- τÑú« ¡Ñ íπñπΓ ßΓ«¿Γ∞ óá¼ ¬á¬ ó τáßΓ¿ ¬áτÑßΓóá óδ»«½¡Ñ¡¿∩ »α«úαá¼-
- ¼δ, Γᬠ¿ ó τáßΓ¿ ÑÑ αẼÑαá, - Ñß½¿ «¡¿ ¡Ñ ¿ß»«½∞ºπεΓß∩ ó »α«ú-
- αá¼¼Ñ, Γ« «¡¿ »«»α«ßΓπ «ΓßπΓßΓóπεΓ ó ¡Ñ⌐.
-
- çá¼Ñτá¡¿Ñ »« »«ó«ñπ áíßΓαá¬Γ¡«ßΓ¿ ñá¡¡δσ: ê¼ÑÑΓß∩ úα«¼áñ¡«Ñ
- »αÑ¿¼πΘÑßΓó« ó 󫺼«ª¡«ßΓ¿ »«½¡«ßΓ∞ε «Γß«Ññ¿¡¿Γ∞ THourly «Γ ú½«-
- íá½∞¡δσ ßß佫¬. àß½¿ ¡¿τΓ« ó¡Ñ «íΩѬΓá ¡Ñ "º¡áÑΓ" « »αÑñßΓáó½Ñ¡¿¿
- Ñú« ó¡πΓαÑ¡¡¿σ ñá¡¡δσ, Γ« »α«úαá¼¼¿ßΓ, ¬«¡Γα«½¿απεΘ¿⌐ «íΩѬΓ, ¼«-
- ªÑΓ ¿º¼Ñ¡∩Γ∞ ñÑΓ὿ ó¡πΓαÑ¡¡Ñú« »αÑñßΓáó½Ñ¡¿∩ ñá¡¡δσ ñ« ΓÑσ »«α,
- »«¬á ¡Ñ ¿º¼Ñ¡¿Γß∩ ºáú«½«ó«¬ ¼ÑΓ«ñá.
-
- é¡πΓα¿ ßἫú« «íΩѬΓá ñá¡¡δÑ ¼«úπΓ íδΓ∞ »αÑñßΓáó½Ñ¡δ ó ó¿ñÑ
- ¼áßß¿óá, «ñ¡á¬« »«ºñ¡ÑÑ (󫺼«ª¡«, τΓ« ßΣÑαá ñÑ⌐ßΓó¿∩ »α¿¬½áñ¡«⌐
- »α«úαá¼¼δ αáßΦ¿α∩ÑΓß∩ ¿ «íΩѼ ÑÑ ñá¡¡δσ αáßΓÑΓ) ó ¬áτÑßΓóÑ í«½ÑÑ
- φΣΣÑ¬Γ¿ó¡«ú« »αÑñßΓáó½Ñ¡¿∩ ñá¡¡δσ ¼«ªÑΓ íδΓ∞ »α¿º¡á¡« ñó«¿τ¡«Ñ
- ñÑαÑó«. àß½¿ «íΩÑ¬Γ »«½¡«ßΓ∞ε ¿¡¬á»ßπ½¿α«óá¡, ¿º¼Ñ¡Ñ¡¿Ñ »αÑñßΓáó-
- ½Ñ¡¿∩ ñá¡¡δσ ß ¼áßß¿óá ¡á ñó«¿τ¡«Ñ ñÑαÑó« ó««íΘÑ ¡Ñ ¿º¼Ñ¡¿Γ ¿ß-
- »«½∞º«óá¡¿Ñ «íΩѬΓá. ê¡ΓÑαΣÑ⌐ß ß «íΩÑ¬Γ«¼ «ßΓá¡ÑΓß∩ »«½¡«ßΓ∞ε ΓѼ
- ªÑ, »«ºó«½∩∩ »α«úαá¼¼¿ßΓπ ¿º∩Θ¡« »α¿ß»«ßáí½¿óáΓ∞ φ¬ß»½πáΓᵿ«¡¡δÑ
- ¬áτÑßΓóá «íΩѬΓá íѺ ¿º¼Ñ¡Ñ¡¿∩ ¬«ñá, ¿ß»«½∞ºπεΘÑú« «íΩѬΓ.
-
-
- ÉáßΦ¿α∩εΘ¿Ñß∩ «íΩѬΓδ
- ─────────────────────────────────────────────────────────────────
-
- ïεñ¿, ¬«Γ«αδÑ ó»ÑαóδÑ ßΓὬ¿óáεΓß∩ ß Åá߬á½Ñ¼, ºáτáßΓπε ßτ¿-
- ΓáεΓ ßἫ ß«í«⌐ αáºπ¼ÑεΘÑ⌐ß∩ ú¿í¬«ßΓ∞ ßΓá¡ñáαΓ¡«⌐ »α«µÑñπαδ
- Writeln, ¬«Γ«αá∩ »«ºó«½∩ÑΓ Ññ¿¡ßΓóÑ¡¡«⌐ »α«µÑñπαÑ «íαáíáΓδóáΓ∞
- »áαá¼ÑΓαδ ¼¡«ú¿σ αẽ¿τ¡δσ Γ¿»«ó:
-
- Writeln(CharVar); { éδóÑßΓ¿ º¡áτÑ¡¿Ñ ß¿¼ó«½∞¡«ú« Γ¿»á }
- Writeln(IntegerVar); { éδóÑßΓ¿ µÑ½«Ñ º¡áτÑ¡¿Ñ }
- Writeln(RealVar); { éδóÑßΓ¿ º¡áτÑ¡¿Ñ ß »½áóáεΘÑ⌐
- Γ«τ¬«⌐ }
-
- è ß«ªá½Ñ¡¿ε, ßΓá¡ñáαΓ¡δ⌐ Åá߬á½∞ ¡Ñ »αÑñ«ßΓáó½∩ÑΓ ½¿τ¡« óá¼
- ¡¿¬á¬¿σ 󫺼«ª¡«ßΓÑ⌐ ñ½∩ ß«ºñá¡¿∩ ßΓ«½∞ ªÑ ú¿í¬¿σ »α«µÑñπα.
-
- ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ αÑΦáÑΓ φΓπ »α«í½Ñ-
- ¼π ß »«¼«Θ∞ε ¡áß½Ññ«óá¡¿∩: Ñß½¿ «»αÑñѽѡ »«α«ªñÑ¡¡δ⌐ Γ¿», Γ« ¼Ñ-
-
- B.Pascal 7 & Objects /UG - 213 -
-
- Γ«ñδ »«α«ªñáεΘÑú« Γ¿»á ¡áß½ÑñπεΓß∩, «ñ¡á¬« »α¿ ªÑ½á¡¿¿ «¡¿ ¼«úπΓ
- »ÑαÑ«»αÑñѽ∩Γ∞ß∩. ä½∩ »ÑαÑ«»αÑñѽѡ¿∩ ¡áß½ÑñπѼ«ú« ¼ÑΓ«ñá »«»α«ß-
- Γπ «»¿Φ¿ΓÑ ¡«óδ⌐ ¼ÑΓ«ñ ß ΓѼ ªÑ ¿¼Ñ¡Ñ¼, τΓ« ¿ ¡áß½ÑñπѼδ⌐ ¼ÑΓ«ñ,
- ¡« ß ñαπú¿¼ Γѽ«¼ ¿ (»α¿ ¡Ñ«íσ«ñ¿¼«ßΓ¿) ß ñαπú¿¼ ¼¡«ªÑßΓó«¼ »áαá-
- ¼ÑΓα«ó.
-
- Åα«ßΓ«⌐ »α¿¼Ñα »α«∩ß¡¿Γ ¬á¬ »α«µÑßß Γᬠ¿ Ñú« ß¼δß½. äáóá⌐ΓÑ
- «»αÑñѽ¿¼ ñ«τÑα¡¿⌐ »« «Γ¡«ΦÑ¡¿ε ¬ TEmployee Γ¿», »pÑñßΓáó½∩εΘ¿⌐
- páí«Γ¡¿¬á, ¬«Γ«p«¼π »½áΓ¿Γß∩ τáß«óá∩ ßΓáó¬á:
-
- const
- PayPeriods = 26; { »Ñα¿«ñδ óδ»½áΓ }
- OvertimeThreshold = 80; { ¡á »Ñα¿«ñ óδ»½áΓδ }
- OvertimeFactor = 1.5; { »«τáß«ó«⌐ ¬«φΣΣ¿µ¿Ñ¡Γ }
-
- type
- THourly = object(TEmployee)
- Time: Integer;
- procedure Init(AName, ATitle: string; ARate:
- Real, Atime: Integer);
- function GetPayAmount : Real;
- end;
-
- procedure THourly.Init(AName, ATitle: string;
- ARate: Real, Atime: Integer);
- begin
- TEmployee.Init(AName, ATitle, ARate);
- Time := ATime;
- end;
-
- function THourly.GetPayAmount: Real;
- var
- Overtime: Integer;
- begin
- Overtime := Time - OvertimeThreshold;
- if Overtime > 0 then
- GetPayAmount := RoundPay(OvertimeThreshold * Rate +
- Rate OverTime * OvertimeFactor * Rate)
- else
- GetPayAmount := RoundPay(Time * Rate)
- end;
-
- ùѽ«óѬ, ¬«Γ«p«¼π »½áΓ¿Γß∩ τáß«óá∩ ßΓáó¬á, ∩ó½∩ÑΓß∩ páí«Γáε-
- Θ¿¼: «¡ «í½áñáÑΓ óßѼ ΓѼ, τΓ« ¼δ ¿ß»«½∞ºπѼ ñ½∩ «»pÑñѽѡ¿∩ «íΩ-
- ѬΓá TEmployee (ΣἿ½¿Ñ⌐, ñ«½ª¡«ßΓ∞ε, ßΓáó¬«⌐), ¿ ½¿Φ∞ ¬«½¿τÑßΓó«
- »«½πτáѼδσ »«τá߫󿬫¼ ñÑ¡Ñú ºáó¿ß¿Γ «Γ Γ«ú«, ߬«½∞¬« τáß«ó «¡
- «Γpáí«Γá½ ºá »Ñp¿«ñ, »«ñ½ÑªáΘ¿⌐ «»½áΓÑ. Æá¬¿¼ «ípẫ¼, ñ½∩
- THourly ΓpÑíπÑΓß∩ ÑΘÑ ¿ »«½Ñ ópѼѡ¿, Time.
-
- Æá¬ ¬á¬ THourly «»pÑñѽ∩ÑΓ ¡«ó«Ñ »«½Ñ, Time, Ñú« ¿¡¿µ¿á½¿ºá-
- µ¿∩ ΓpÑíπÑΓ ¡«ó«ú« ¼ÑΓ«ñá Init, ¬«Γ«pδ⌐ ¿¡¿µ¿á½¿º¿pπÑΓ ¿ ópѼ∩, ¿
- ¡áß½Ññ«óá¡¡δÑ »«½∩. é¼ÑßΓ« Γ«ú«, τΓ«íδ ¡Ñ»«ßpÑñßΓóÑ¡¡« »p¿ßó«¿Γ∞
- º¡áτÑ¡¿∩ ¡áß½Ññ«óá¡¡δ¼ »«½∩¼, Γᬿ¼ ¬á¬ Name, Title ¿ Rate, »«τÑ-
-
- B.Pascal 7 & Objects /UG - 214 -
-
- ¼π íδ ¡Ñ ¿ß»«½∞º«óáΓ∞ ó¡«ó∞ ¼ÑΓ«ñ ¿¡¿µ¿á½¿ºáµ¿¿ «íΩѬΓá TEmployee
- (¿½½εßΓp¿pπѼδ⌐ »Ñpóδ¼ «»ÑpáΓ«p«¼ THourly.Init), úñÑ Ancestor
- ÑßΓ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«p Γ¿»á p«ñ«ó«ú« Γ¿»á «íΩѬΓá, á Method ÑßΓ∞
- ¿ñÑ¡Γ¿Σ¿¬áΓ«p ¼ÑΓ«ñá ñá¡¡«ú« Γ¿»á.
-
- çá¼ÑΓ∞ΓÑ, τΓ« ó맮ó ¼ÑΓ«ñá, ¬«Γ«αδ⌐ óδ »ÑαÑ«»αÑñѽ∩ÑΓÑ, ¡Ñ
- ∩ó½∩ÑΓß∩ Ññ¿¡ßΓóÑ¡¡« σ«α«Φ¿¼ ßΓ¿½Ñ¼. é «íΘѼ ß½πτáÑ ó«º¼«ª¡«, τΓ«
- TEmployee.Init óδ»«½¡∩ÑΓ ó᪡πε, «ñ¡á¬« ߬αδΓπε ¿¡¿µ¿á½¿ºáµ¿ε.
- éδºδóá∩ »ÑαÑ«»αÑñѽ∩Ѽδ⌐ ¼ÑΓ«ñ, óδ ñ«½ª¡δ íδΓ∞ πóÑαÑ¡δ ó Γ«¼, τΓ«
- »«α«ªñÑ¡¡δ⌐ Γ¿» «íΩѬΓá ó¬½ετáÑΓ Σπ¡¬µ¿«¡á½∞¡«ßΓ∞ α«ñ¿Γѽ∩. èα«¼Ñ
- Γ«ú«, ½εí«Ñ ¿º¼Ñ¡Ñ¡¿Ñ ó α«ñ¿Γѽ∞߬«¼ ¼ÑΓ«ñÑ áóΓ«¼áΓ¿τÑ߬¿ «¬áºδ-
- óáÑΓ ó½¿∩¡¿Ñ ¡á óßÑ »«α«ªñÑ¡¡δÑ.
-
- Å«ß½Ñ ó맮óá TEmployee.Init, THourly.Init ¼«ªÑΓ ºáΓѼ óδ»«½-
- ¡¿Γ∞ ßó«ε ß«íßΓóÑ¡¡πε ¿¡¿µ¿á½¿ºáµ¿ε, ¬«Γ«αá∩ ó φΓ«¼ ß½πτáÑ ß«ßΓ«-
- ¿Γ Γ«½∞¬« ó »α¿ßó«Ñ¡¿¿ º¡áτÑ¡¿∩, »ÑαÑñá¡¡«ú« ó ATime.
-
- äpπú¿¼ »p¿¼Ñp«¼ »ÑpÑ«»pÑñѽ∩Ѽ«ú« ¼ÑΓ«ñá ∩ó½∩ÑΓß∩ Σπ¡¬µ¿∩
- THourly.GetPayAmount, óδτ¿ß½∩εΘá∩ ßπ¼¼π óδ»½áΓ páí«ΓáεΘѼπ ¡á »«-
- τáß«ó«⌐ ßΓáó¬Ñ. é ñÑ⌐ßΓó¿Γѽ∞¡«ßΓ¿, ¬áªñδ⌐ Γ¿» «íΩѬΓá TEmployee
- ¿¼ÑÑΓ ßó«⌐ ¼ÑΓ«ñ GetPayAmount, Γᬠ¬á¬ Γ¿» páí«ΓáεΘÑú« ºáó¿ß¿Γ «Γ
- Γ«ú«, ¬á¬ »p«¿ºó«ñ¿Γß∩ páßτÑΓ. îÑΓ«ñ THourly.GetPayAmount ñ«½ªÑ¡
- πτ¿ΓδóáΓ∞, ߬«½∞¬« τáß«ó páí«Γá½ ß«Γαπñ¡¿¬, í뫨 ½¿ ßóÑpσπp«τ¡δÑ
- páí«Γδ, ¬á¬«ó ¬«φΣΣ¿µ¿Ñ¡Γ πóѽ¿τÑ¡¿∩ ºá ßóÑpσπp«τ¡δÑ páí«Γδ ¿ Γá¬
- ñá½ÑÑ. îÑΓ«ñ TSalaried.GetPayAmount ñ«½ªÑ¡ ½¿Φ∞ ñѽ¿Γ∞ ßΓáó¬π
- páí«ΓáεΘÑú« ¡á τ¿ß½« óδ»½áΓ ó ¬áªñ«¼ ú«ñπ (ó ¡áΦѼ »p¿¼ÑpÑ 26).
-
- unit Workers;
-
- interface
-
- const
- PayPeriods = 26; {ó ú«ñ}
- OvertimeThreshold = 80; {ºá ¬áªñδ⌐ »Ñα¿«ñ «»½áΓδ}
- OvertimeFactor =1.5; {πóѽ¿τÑ¡¿Ñ »α«Γ¿ó «íδτ¡«⌐ «»½áΓδ}
-
- type
- TEmployee = object
- Name, Title: string[25];
- Rate: Real;
- procedure Init (AName, ATitle: string; ARate: Real);
- function GetName : String;
- function GetTitle : String;
- function GetRate : Real;
- function GetPayAmount : Real;
- end;
-
- THourly = object(TEmployee)
- Time: Integer;
- procedure Init(AName, ATitle: string; ARate:
- Real, Atime: Integer);
- function GetPayAmount : Real;
- function GetTime : Real;
-
- B.Pascal 7 & Objects /UG - 215 -
-
- end;
-
- TSalaried = object(TEmployee)
- function GetPayAmount : Real;
- end;
- TCommissioned = object(TSalaried)
- Commission : Real;
- SalesAmount : Real;
- constructor Init (AName, ATitle: String;
- ARate, ACommission, ASalesAmount: Real);
- function GetPayAmount : Real;
- end;
-
- implementation
-
- function RoundPay(Wages: Real) : Real;
- { «¬pπú½∩Ѽ ßπ¼¼π óδ»½áΓ, τΓ«íδ ¿ú¡«p¿p«óáΓ∞
- ßπ¼¼δ ¼Ñ¡∞ΦÑ »Ñ¡¡¿ }
- begin
- RoundPay := Trunc(Wages * 100) / 100;
- .
- .
- .
-
- TEmployee ∩ó½∩ÑΓß∩ óÑpΦ¿¡«⌐ ¡áΦÑ⌐ ¿Ñpápσ¿¿ «íΩÑ¬Γ«ó ¿ ß«-
- ñÑpª¿Γ »Ñpóδ⌐ ¼ÑΓ«ñ GetPayAmount.
-
- function TEmployee.GetPayAmount : Real;
- begin
- RunError(211); { ñáΓ∞ «Φ¿í¬π φΓá»á óδ»«½¡Ñ¡¿∩ }
- end;
-
- ÑΓ óδºóáΓ∞ πñ¿ó½Ñ¡¿Ñ ëà Σá¬Γ, τΓ« ¼ÑΓ«ñ ñáÑΓ «Φ¿í¬π
- ópѼѡ¿ óδ»«½¡Ñ¡¿∩. àß½¿ óδºδóáÑΓß∩ TEmployee.GetPayAmount, Γ« ó
- »p«úpá¼¼Ñ ó«º¡¿¬áÑΓ «Φ¿í¬á. Å«τѼπ? Å«Γ«¼π τΓ« TEmployee ∩ó½∩ÑΓß∩
- óÑpΦ¿¡«⌐ ¡áΦÑ⌐ ¿Ñpápσ¿¿ «íΩÑ¬Γ«ó ¿ ¡Ñ «»pÑñѽ∩ÑΓ pÑá½∞¡«ú« páí«-
- τÑú«; ß½Ññ«óáΓѽ∞¡«, ¡¿ «ñ¿¡ ¿º ¼ÑΓ«ñ«ó TEmployee ¡Ñ óδºδóáÑΓß∩
- «»pÑñѽѡ¡δ¼ «ípẫ¼, σ«Γ∩ «¡¿ ¿ ¼«úπΓ íδΓ∞ ¡áß½Ññ«óá¡¡δ¼¿. éßÑ
- ¡áΦ¿ páí«Γ¡¿¬¿ ∩ó½∩εΓß∩ ½¿í« »«τáß«ó¿¬á¼¿, ½¿í« ¿¼ÑεΓ «¬½áñδ, ½¿-
- í« páí«ΓáεΓ ¡á ßñѽ∞Θ¿¡Ñ. ÄΦ¿í¬á ¡á φΓá»Ñ óδ»«½¡Ñ¡¿∩ »pѬpáΘáÑΓ
- óδ»«½¡Ñ¡¿Ñ »p«úpá¼¼δ ¿ óδó«ñ¿Γ 211, τΓ« ß««ΓóÑΓßΓóπÑΓ ß««íΘÑ¡¿ε
- «í «Φ¿í¬Ñ, ßó∩ºá¡¡«⌐ ß óδº«ó«¼ áíßΓpá¬Γ¡«ú« ¼ÑΓ«ñá (Ñß½¿ óáΦá
- »p«úpá¼¼á »« «Φ¿í¬Ñ óδºδóáÑΓ TEmployee.GetPayAmount).
-
- ì¿ªÑ »p¿ó«ñ¿Γß∩ ¼ÑΓ«ñ THourly.GetPayAmount, ó ¬«Γ«p«¼ πτ¿Γδ-
- óáεΓß∩ Γá¬¿Ñ óÑΘ¿ ¬á¬ ßóÑpσπp«τ¡á∩ «»½áΓá, τ¿ß½« «Γpáí«Γá¡¡δσ τá-
- ß«ó ¿ Γᬠñá½ÑÑ.
-
- function THourly.GetPayAMount : Real;
- var
- OverTime: Integer;
- begin
- Overtime := Time - OvertimeThreshold;
-
- B.Pascal 7 & Objects /UG - 216 -
-
- if Overtime > 0 then
- GetPayAmount := RoundPay(OvertimeThreshold * Rate +
- Rate OverTime * OvertimeFactor * Rate)
- else
- GetPayAmount := RoundPay(Time * Rate)
- end;
-
- îÑΓ«ñ TSalaried.GetPayAmount ¡á¼¡«ú« »p«ΘÑ; ó ¡Ñ¼ ßΓáó¬á ñÑ-
- ½¿Γß∩ ¡á τ¿ß½« óδ»½áΓ:
-
- function TSalaried.GetPayAmount : Real;
- begin
- GetPayAmount := RoundPay(Rate / PayPeriods);
- end;
-
- àß½¿ óºú½∩¡πΓ∞ ¡á ¼ÑΓ«ñ Tæommissioned.GetPayAmount, Γ« íπñÑΓ
- ó¿ñ¡«, τΓ« «¡ óδºδóáÑΓ TSalaried.GetPayAmount, óδτ¿ß½∩ÑΓ ¬«¼¿ßß¿-
- «¡¡δÑ ¿ »p¿íáó½∩ÑΓ ¿σ ¬ óѽ¿τ¿¡Ñ, ó«ºópáΘáѼ«⌐ ¼ÑΓ«ñ«¼
- TSalaried.GetPayAmount.
-
- function Tæommissioned.GetPayAmount : Real;
- begin
- GetPayAmount := RoundPay(TSalaried.GetPayAmount +
- Commission * SalesAmount);
- end;
-
- é᪡«Ñ ºá¼Ñτá¡¿Ñ: ò«Γ∩ ¼ÑΓ«ñδ ¼«úπΓ íδΓ∞ »ÑαÑ«»αÑñѽѡδ,
- »«½∩ ñá¡¡δσ »ÑαÑ«»αÑñѽ∩Γ∞ß∩ ¡Ñ ¼«úπΓ. Å«ß½Ñ Γ«ú«, ¬á¬ óδ «»αÑñÑ-
- ½¿½¿ »«½Ñ ñá¡¡δσ ó ¿Ñαáασ¿¿ «íΩѬΓá, ¡¿¬á¬«⌐ ñ«τÑα¡¿⌐ Γ¿» ¡Ñ ¼«-
- ªÑΓ «»αÑñѽ¿Γ∞ »«½Ñ ñá¡¡δσ ó Γ«τ¡«ßΓ¿ ß Γᬿ¼ ªÑ ¿¼Ñ¡Ñ¼.
-
-
- ìáß½Ññ«óá¡¿Ñ ßΓáΓ¿τÑ߬¿σ ¼ÑΓ«ñ«ó
- ─────────────────────────────────────────────────────────────────
-
- éßÑ »«¬áºá¡¡δÑ ñ« ß¿σ »«α ¼ÑΓ«ñδ, ßó∩ºá¡¡δÑ ß Γ¿»á¼¿ «íΩѬ-
- Γ«ó TEmployee, THourly, TSalaried ¿ TCommissioned, ∩ó½∩εΓß∩ ßΓá-
- Γ¿τÑ߬¿¼¿ ¼ÑΓ«ñἿ. Äñ¡á¬«, ß« ßΓáΓ¿τÑ߬¿¼¿ ¼ÑΓ«ñἿ ßó∩ºá¡á
- »p«í½Ñ¼á ¡áß½Ññ«óá¡¿∩.
-
- ä½∩ Γ«ú«, τΓ«íδ αẫíαáΓ∞ß∩ ß φΓ«⌐ »α«í½Ñ¼«⌐, «Γ½«ª¿¼ ó ßΓ«-
- α«¡π ¡áΦ »α¿¼Ñα ß »½áΓѪ¡«⌐ óÑñ«¼«ßΓ∞ε ¿ αáßß¼«Γα¿¼ ñαπú«⌐ π»α«-
- ΘÑ¡¡δ⌐ ¿ ¡ÑαÑ὿ßΓ¿τ¡δ⌐, ¡« »«¬áºáΓѽ∞¡δ⌐ »α¿¼Ñα. éÑα¡Ñ¼ß∩ ¬ ¬αδ-
- ½áΓδ¼ ¡áßѬ«¼δ¼. ÅαÑñ»«½«ª¿¼, τΓ« ¡πª¡« ß«ºñáΓ∞ »α«úαá¼¼π, ¬«Γ«-
- αá∩ íπñÑΓ α¿ß«óáΓ∞ ¡á φ¬αá¡Ñ αẽ¿τ¡δÑ Γ¿»δ ½ÑΓáεΘ¿σ ¡áßѬ«¼δσ.
- ÅαÑñ»«½«ª¿¼, óδ αÑΦ¿½¿, τΓ« ¡á óÑαΦ¿¡Ñ ¿Ñαáασ¿¿ íπñÑΓ ¡áσ«ñ¿Γ∞ß∩
- «íΩÑ¬Γ Winged. ÅπßΓ∞ óδ »½á¡¿απÑΓÑ, τΓ« ¡«óδÑ Γ¿»δ «íΩÑ¬Γ«ó ½ÑΓá-
- εΘ¿σ ¡áßѬ«¼δσ ¬á¬ íπñπΓ ßΓα«¿Γ∞ß∩ ¬á¬ »«Γ«¼¬¿ Winged. ìá»α¿¼Ñα,
- óδ ¼«ªÑΓÑ ß«ºñáΓ∞ Γ¿» «íΩѬΓá Bee, ¬«Γ«αδ⌐ «Γ½¿τáÑΓß∩ «Γ α«ñß-
- ΓóÑ¡¡δσ ¬αδ½áΓδσ ¡áßѬ«¼δσ ΓѼ, τΓ« ¿¼ÑÑΓ ªá½« ¿ »«½«ßδ. è«¡Ñτ¡«,
- π »τѽδ ÑßΓ∞ ñαπú¿Ñ «Γ½¿τáεΘ¿Ñ ÑÑ σáαá¬ΓÑα¿ßΓ¿¬¿, ¡« ó ¡áΦѼ »α¿-
- ¼ÑαÑ φΓ« ¼«ªÑΓ óδú½∩ñÑΓ∞ ß½ÑñπεΘ¿¼ «íαẫ¼:
-
-
- B.Pascal 7 & Objects /UG - 217 -
-
- type
- TWinged = object(Insect)
- procedure Init(AX, AY: Integer) { ¿¡¿µ¿á½¿º¿απÑΓ
- φ¬ºÑ¼»½∩α }
- αrocedure Show; { «Γ«íαáªáÑΓ ¬αδ½áΓ«Ñ ¡áßѬ«¼«Ñ ¡á
- φ¬αá¡Ñ }
- αrocedure Hide; { ßΓ¿αáÑΓ ¬αδ½áΓ«Ñ ¡áßѬ«¼«Ñ ß
- φ¬αá¡á }
- αrocedure MoveTo(NewX, NewY : Integer);
- { »ÑαѼÑΘáÑΓ ¬αδ½áΓ«Ñ ¡áßѬ«¼«Ñ }
- end;
-
- tyαe
- TBee = object(Winged)
- .
- .
- .
- αrocedure Init(AX, AY: Integer) { ¿¡¿µ¿á½¿º¿απÑΓ
- φ¬ºÑ¼»½∩α Bee }
- αrocedure Show; { «Γ«íαáªáÑΓ »τѽπ ¡á φ¬αá¡Ñ }
- αrocedure Hide; { ßΓ¿αáÑΓ »τѽπ ß φ¬αá¡á }
- αrocedure MoveTo(NewX, NewY : Integer);
- { »ÑαѼÑΘáÑΓ »τѽπ }
- end;
-
- ê TWinged, ¿ TBee ¿¼ÑεΓ »« τÑΓδαÑ ¼ÑΓ«ñá. TWinged.Init ¿
- TBee.Init ¿¡¿µ¿á½¿º¿απεΓ φ¬ºÑ¼»½∩α ß««ΓóÑΓßΓóπεΘ¿σ «íΩÑ¬Γ«ó. îÑ-
- Γ«ñ TWinged.Show º¡áÑΓ, ¬á¬ α¿ß«óáΓ∞ ¬αδ½áΓ«Ñ ¡áßѬ«¼«Ñ ¡á
- φ¬αá¡Ñ, á ¼ÑΓ«ñ TBee.Show - ¬á¬ α¿ß«óáΓ∞ »τѽπ (¬αδ½áΓ«Ñ ¡áßѬ«-
- ¼«Ñ ß »«½«ß¬á¼¿ ¡á ΓÑ½Ñ ¿ ß ªá½«¼). îÑΓ«ñ TWinged.Hide º¡áÑΓ, ¬á¬
- ßΓ¿αáΓ∞ ¬αδ½áΓ«Ñ ¡áßѬ«¼«Ñ ß φ¬αá¡á, á ¼ÑΓ«ñ TBee.Hide - ¬á¬
- ßΓ¿αáΓ∞ »τѽπ. äóá ¼ÑΓ«ñá Show «Γ½¿τáεΓß∩ ñαπú «Γ ñαπúá, αáó¡«
- ¬á¬ ¿ ñóá ¼ÑΓ«ñá Hide.
-
- Äñ¡á¬«, ¼ÑΓ«ñδ TWinged.MoveTo ¿ TBee.MoveTo »«½¡«ßΓ∞ε «ñ¿¡á-
- ¬«óδ. é ¡áΦѼ »α¿¼ÑαÑ X ¿ Y «»αÑñѽ∩εΓ »«½«ªÑ¡¿Ñ ¡á φ¬αá¡Ñ.
-
- αrocedure TWinged.MoveTo(NewX, NewY: Integer);
- begin
- Hide;
- X := NewX; {¡«óá∩ ¬««αñ¿¡áΓá X ¡á φ¬αá¡Ñ}
- Y := NewY; {¡«óá∩ ¬««αñ¿¡áΓá Y ¡á φ¬αá¡Ñ}
- Show;
- end;
-
- αrocedure TBee.MoveTo(NewX, NewY: Integer);
- begin
- Hide;
- X := NewX; {¡«óá∩ ¬««αñ¿¡áΓá X ¡á φ¬αá¡Ñ}
- Y := NewY; {¡«óá∩ ¬««αñ¿¡áΓá Y ¡á φ¬αá¡Ñ}
- Show;
- end;
-
-
- B.Pascal 7 & Objects /UG - 218 -
-
- ìÑ ¿º¼Ñ¡¿½«ß∞ ¡¿τÑú«, ¬α«¼Ñ ¬«»¿α«óá¡¿∩ »α«úαá¼¼δ ¿ »«ßΓá-
- ¡«ó¬¿ ¬óá½¿Σ¿¬áΓ«αá TBee »ÑαÑñ ¿ñÑ¡Γ¿Σ¿¬áΓ«α«¼ MoveTo. Æá¬ ¬á¬
- ¼ÑΓ«ñδ «ñ¿¡á¬«óδ, ºáτѼ ¡πª¡« »«¼ÑΘáΓ∞ MoveTo ó TBee? éÑñ∞ Bee
- áóΓ«¼áΓ¿τÑ߬¿ ¡áß½ÑñπÑΓ MoveTo «Γ TWinged. Å«φΓ«¼π ¡Ñ ¡πª¡«
- »ÑαÑ«»αÑñѽ∩Γ∞ ¼ÑΓ«ñ MoveTo ¿º TWinged, ¡« φΓ« ¿¼Ñ¡¡« Γ« ¼ÑßΓ«,
- úñÑ ó«º¡¿¬áÑΓ »α«í½Ñ¼á ó ß½πτáÑ ßΓáΓ¿τÑ߬¿σ ¼ÑΓ«ñ«ó.
-
- ÆÑନ¡ "ßΓáΓ¿τÑ߬¿⌐" íδ½ óδíαá¡ ñ½∩ «»¿ßá¡¿∩ ¼ÑΓ«ñ«ó, ¡Ñ ∩ó-
- ½∩εΘ¿σß∩ ó¿αΓπá½∞¡δ¼¿ - ΓÑନ¡, ¬«Γ«αδ⌐ ¼δ óóÑñѼ ñá½ÑÑ. öá¬Γ¿-
- τÑ߬¿, ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ ∩ó½∩εΓß∩ αÑΦÑ¡¿Ñ¼ φΓ«⌐ »α«í½Ñ¼δ, ¡«
- »αѪñÑ τѼ »«¡∩Γ∞ αÑΦÑ¡¿Ñ, óá¼ ß½ÑñπÑΓ αẫíαáΓ∞ß∩ ó ßἫ⌐ »α«í-
- ½Ñ¼Ñ.
-
- Åਧ¡á¬¿ »α«í½Ñ¼δ ß«ßΓ«∩Γ ó ß½ÑñπεΘѼ: »«¬á ¬«»¿∩ ¼ÑΓ«ñá
- MoveTo ¡Ñ íπñÑΓ »«¼ÑΘÑ¡á ó «í½áßΓ∞ ñÑ⌐ßΓó¿∩ TBee ñ½∩ »«ñáó½Ñ¡¿∩
- ¼ÑΓ«ñá MoveTo «íΩѬΓá TWinged, ¼ÑΓ«ñ ¡Ñ íπñÑΓ αáí«ΓáΓ∞ »αáó¿½∞¡«,
- Ñß½¿ «¡ íπñÑΓ óδºδóáΓ∞ß∩ ¿º «íΩѬΓá Γ¿»á TBee. àß½¿ TBee ºá»π߬á-
- ÑΓ ¼ÑΓ«ñ MoveTo «íΩѬΓá TWinged, Γá¬ Γ«, τΓ« ñó¿ªÑΓß∩ »« φ¬αá¡π,
- ∩ó½∩ÑΓß∩ ¬αδ½áΓδ¼ ¡áßѬ«¼δ¼, á ¡Ñ »τѽ«⌐. Æ«½∞¬« ¬«úñá TBee óδºδ-
- óáÑΓ ¬«»¿ε ¼ÑΓ«ñá MoveTo, «»αÑñѽѡ¡«ú« ó Ñú« ß«íßΓóÑ¡¡«⌐ «í½áßΓ¿
- ñÑ⌐ßΓó¿∩, ¡á φ¬αá¡Ñ ß »«¼«Θ∞ε ó맮ó«ó Show ¿ Hide íπñπΓ α¿ß«óáΓ∞-
- ß∩ ¿ ßΓ¿αáΓ∞ß∩ »τѽδ.
-
- Å«τѼπ φΓ« Γá¬? ¥Γ« «íΩ∩ß¡∩ÑΓß∩ ß»«ß«í«¼, ¬«Γ«αδ¼ ¬«¼»¿½∩Γ«α
- αáºαÑΦáÑΓ ó맮óδ ¼ÑΓ«ñ«ó. è«úñá ¬«¼»¿½¿απεΓß∩ ¼ÑΓ«ñδ Bee, Γ« ß¡á-
- τá½á óßΓαÑτáεΓß∩ TWinged.Show ¿ TWinged.Hide ¿ ¿σ ¬«ñ ¬«¼»¿½¿απ-
- ÑΓß∩ ó ßÑú¼Ñ¡Γ ¬«ñá. ìѼ¡«ú« »«ºñ¡ÑÑ ó Σá⌐½Ñ óßΓαÑτáÑΓß∩ ¼ÑΓ«ñ
- Winged.MoveTo, ¬«Γ«αδ⌐ óδºδóáÑΓ TWinged.Show ¿ TWinged.Hide. èá¬
- ¿ »α¿ ó맮óÑ ½εí«⌐ »α«µÑñπαδ, ¬«¼»¿½∩Γ«α ºá¼ÑΘáÑΓ ßß佬¿ ¡á
- TWinged.Show ¿ TWinged.Hide ó ¿ßσ«ñ¡«¼ ¬«ñÑ ¡á ¿σ áñαÑßá, ßúÑ¡Ñ-
- α¿α«óá¡¡δÑ ó ßÑú¼Ñ¡ΓÑ ¬«ñá. Æá¬¿¼ «íαẫ¼, ¬«úñá óδºδóáÑΓß∩ ¬«ñ
- TWinged.MoveTo, «¡, ó ßó«ε «τÑαÑñ∞, óδºδóáÑΓ TWinged.Show ¿
- TWinged.Hide ß« óßѼ¿ óδΓѬáεΘ¿¼¿ »«ß½ÑñßΓó¿∩¼¿.
-
- ä« ß¿σ »«α φΓ« íδ½ Γ¿»¿τ¡δ⌐ ñ½∩ Borland Pascal ߵѡáα¿⌐ ¿ «¡
- íδ½ íδ ß»αáóÑñ½¿ó (ºá ¿ß¬½ετÑ¡¿Ñ¼ ¡«¼Ñ¡¬½áΓπαδ), ¡áτ¿¡á∩ ß óÑαß¿¿
- 1.0 Turbo Pascal 1983 ú«ñá. Äñ¡á¬«, ñѽ« ¼Ñ¡∩ÑΓß∩, ¬«úñá óδ ó¬½ε-
- τáÑΓÑ ó φΓ«Γ ßµÑ¡áα¿⌐ »α¿¡µ¿» ¡áß½Ññ«óá¡¿∩. è«úñá TBee ¡áß½ÑñπÑΓ
- ¼ÑΓ«ñ «Γ TWinged, «¡ (TBee) ¿ß»«½∞ºπÑΓ ¼ÑΓ«ñ ó Γ«τ¡«ßΓ¿ Γá¬, ¬á¬
- ëà íδ½ «Γ¬«¼»¿½¿α«óá¡.
-
- æ¡«óá »«ß¼«Γα¿ΓÑ, τΓ« ñ«½ªÑ¡ ¡áß½Ññ«óáΓ∞ TBee, Ñß½¿ «¡ ¡áß-
- ½ÑñπÑΓ TWinged.MoveTo:
-
- αrocedure TWinged.MoveTo(NewX, NewY: integer);
- begin
- Hide; { é맮ó Winged.Hide }
- X := NewX;
- Y := NewY;
- Show { é맮ó Winged.Show }
- end;
-
- 諼¼Ñ¡Γáα¿¿ ºñÑß∞ »α¿óÑñÑ¡δ ñ½∩ Γ«ú«, τΓ«íδ »«ñτÑભπΓ∞ Γ«Γ
-
- B.Pascal 7 & Objects /UG - 219 -
-
- Σá¬Γ, τΓ« Ñß½¿ Bee óδºδóáÑΓ ¼ÑΓ«ñ TWinged.MoveTo, Γ« «¡ Γá¬ªÑ óδ-
- ºδóáÑΓ TWinged.Show ¿ TWinged.Hide, á ¡Ñ TBee.Show ¿ TBee.Hide.
- ū߬«½∞¬π TWinged.MoveTo óδºδóáÑΓ ¼ÑΓ«ñδ TWinged.Show ¿
- TWinged.Hide, TWinged.MoveTo ¡Ñ½∞º∩ ¡áß½Ññ«óáΓ∞. é¼ÑßΓ« φΓ«ú«, «¡
- ñ«½ªÑ¡ íδΓ∞ »ÑαÑ«»αÑñѽѡ ßó«Ñ⌐ óΓ«α«⌐ ¬«»¿Ñ⌐, ¬«Γ«αá∩ óδºδóáÑΓ
- ¬«»¿¿ Show ¿ Hide, «»αÑñѽѡ¡δÑ ó¡πΓα¿ «í½áßΓ¿ ñÑ⌐ßΓó¿∩ óΓ«α«⌐
- ¬«»¿¿, Γ« ÑßΓ∞, TBee.Show ¿ TBee.Hide.
-
- Åα¿ αáºαÑΦÑ¡¿¿ ó맮ó«ó ¼ÑΓ«ñ«ó, ½«ú¿¬á ¬«¼»¿½∩Γ«αá αáí«ΓáÑΓ
- Γá¬: »α¿ ó맮óÑ ¼ÑΓ«ñá ¬«¼»¿½∩Γ«α ß¡áτá½á ¿ΘÑΓ ¼ÑΓ«ñ, ¿¼∩ ¬«Γ«α«-
- ú« «»αÑñѽѡ« ó¡πΓα¿ Γ¿»á «íΩѬΓá. Æ¿» TBee «»αÑñѽ∩ÑΓ ¼ÑΓ«ñδ ß
- ¿¼Ñ¡á¼¿ Init, Hide, Show ¿ MoveTo. àß½¿ ¼ÑΓ«ñ TBee ñ«½ªÑ¡ íδ½
- óδºóáΓ∞ «ñ¿¡ ¿º φΓ¿σ τÑΓδαÑσ ¼ÑΓ«ñ«ó, Γ« ¬«¼»¿½∩Γ«α ºá¼Ñ¡¿½ íδ
- ó맮ó ¡á áñαÑß «ñ¡«ú« ¿º ß«íßΓóÑ¡¡δσ ¼ÑΓ«ñ«ó Bee.
-
- àß½¿ ó Γ¿»Ñ «íΩѬΓá ¡Ñ «»αÑñѽѡ ¼ÑΓ«ñ ß Γᬿ¼ ¿¼Ñ¡Ñ¼, Γ«
- ¬«¼»¿½∩Γ«α »«ñ¡¿¼áÑΓß∩ óδΦÑ ¬ ¡Ñ»«ßαÑñßΓóÑ¡¡«¼π α«ñ¿Γѽ∞߬«¼π Γ¿-
- »π ó »«¿ß¬áσ ¼ÑΓ«ñá ß π¬áºá¡¡δ¼ ¿¼Ñ¡Ñ¼. àß½¿ ¼ÑΓ«ñ ß Γᬿ¼ ¿¼Ñ¡Ñ¼
- ¡á⌐ñÑ¡, Γ« áñαÑß α«ñ¿Γѽ∞߬«ú« ¼ÑΓ«ñá ºá¼ÑΘáÑΓ ¿¼∩ ó ¿ßσ«ñ¡«¼ ¬«-
- ñÑ ñ«τÑα¡Ñú« ¼ÑΓ«ñá. àß½¿ ¼ÑΓ«ñ ß Γᬿ¼ ¿¼Ñ¡Ñ¼ ¡Ñ ¡á⌐ñÑ¡, Γ« ¬«¼-
- »¿½∩Γ«α »α«ñ«½ªáÑΓ »α«ñó¿úáΓ∞ß∩ óóÑασ »« α«ñ¿Γѽ∞߬¿¼ «íΩѬΓá¼ ó
- »«¿ß¬áσ ¼ÑΓ«ñá. àß½¿ ¬«¼»¿½∩Γ«α ¡áΓὬ¿óáÑΓß∩ ¡á ßá¼δ⌐ »Ñαóδ⌐
- (óδßΦ¿⌐) Γ¿» «íΩѬΓá, Γ« «¡ óδñáÑΓ ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ, π¬áºδóáε-
- ΘÑÑ, τΓ« ¡¿ «ñ¡«ú« Γᬫú« ¼ÑΓ«ñá ¡Ñ «»αÑñѽѡ«.
-
- Äñ¡á¬«, Ñß½¿ ßΓáΓ¿τÑ߬¿⌐ ¡áß½ÑñπѼδ⌐ ¼ÑΓ«ñ ¡á⌐ñÑ¡ ¿ ¿ß»«½∞-
- ºπÑΓß∩, Γ« óδ ñ«½ª¡δ »«¼¡¿Γ∞, τΓ« óδºδóáѼδ⌐ ¼ÑΓ«ñ ∩ó½∩ÑΓß∩ ó
- Γ«τ¡«ßΓ¿ Γᬿ¼, ¬á¬ «¡ «»αÑñѽѡ ¿ ¬«¼»¿½¿α«óá¡ ñ½∩ α«ñ¿Γѽ∞߬«ú«
- Γ¿»á. àß½¿ α«ñ¿Γѽ∞߬¿⌐ ¼ÑΓ«ñ óδºδóáÑΓ ñαπú¿Ñ ¼ÑΓ«ñδ, Γ« óδºδóáÑ-
- ¼δÑ ¼ÑΓ«ñδ íπñπΓ Γá¬ªÑ α«ñ¿Γѽ∞߬¿¼¿ ¼ÑΓ«ñἿ, ñáªÑ Ñß½¿ ñ«τÑα¡¿⌐
- «íΩÑ¬Γ ß«ñÑαª¿Γ ¼ÑΓ«ñδ, ¬«Γ«αδÑ »ÑαÑ«»αÑñѽ∩εΓ α«ñ¿Γѽ∞߬¿Ñ.
-
-
-
-
- B.Pascal 7 & Objects /UG - 220 -
-
- é¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ ¿ »«½¿¼«αΣ¿º¼
- ─────────────────────────────────────────────────────────────────
-
- ÄíßπªñáѼδÑ ñ« ß¿σ »«α ¼ÑΓ«ñδ ∩ó½∩εΓß∩ ßΓáΓ¿τÑ߬¿¼¿. Ä¡¿ ∩ó-
- ½∩εΓß∩ ßΓáΓ¿τÑ߬¿¼¿ ó Γ«¼ ªÑ ß¼δß½Ñ, ó ¬á¬«¼ ßΓáΓ¿τÑ߬«⌐ ∩ó½∩ÑΓß∩
- ßΓáΓ¿τÑ߬á∩ »ÑαѼѡ¡á∩: ¬«¼»¿½∩Γ«α αẼÑΘáÑΓ ÑÑ ¿ αáºαÑΦáÑΓ óßÑ
- ßß佬¿ ¡á ¡ÑÑ ó« óαѼ∩ ¬«¼»¿½∩µ¿¿. èᬠóδ ó¿ñѽ¿, «íΩѬΓδ ¿ ßΓá-
- Γ¿τÑ߬¿Ñ ¼ÑΓ«ñδ ¼«úπΓ íδΓ∞ ¼«Θ¡δ¼ ¿¡ßΓαπ¼Ñ¡Γ«¼ ñ½∩ ß«ßΓáó½Ñ¡¿∩
- ß½«ª¡δσ »α«úαá¼¼.
-
- Äñ¡á¬« ¿¡«úñá φΓ« ¡Ñ ½πτΦ¿⌐ ß»«ß«í ñ½∩ π»αáó½Ñ¡¿∩ ¼ÑΓ«ñἿ.
-
- Åα«í½Ñ¼δ, á¡á½«ú¿τ¡δÑ «»¿ßá¡¡«⌐ ó »αÑñδñπΘѼ αáºñѽÑ, 󫺡¿-
- ¬áεΓ ¿º-ºá αáºαÑΦÑ¡¿∩ ßß佫¬ ¡á ¼ÑΓ«ñ ó« óαѼ∩ ¬«¼»¿½∩µ¿¿. éδσ«ñ
- ºá¬½ετáÑΓß∩ ó Γ«¼, τΓ« ¼ÑΓ«ñ ñ«½ªÑ¡ íδΓ∞ ñ¿¡á¼¿τÑ߬¿¼, á ßß佬¿
- ¡á ¡Ñú« ñ«½ª¡δ αáºαÑΦáΓ∞ß∩ ó« óαѼ∩ óδ»«½¡Ñ¡¿∩. ùΓ«íδ φΓ« ßΓὫ
- 󫺼«ª¡δ¼, ¡πª¡« ¿¼ÑΓ∞ ¡Ñ¬«Γ«αδÑ ß»Ñµ¿á½∞¡δÑ ¼Ñσá¡¿º¼δ, «ñ¡á¬«
- Borland Pascal »αÑñ«ßΓáó½∩ÑΓ φΓ¿ ¼Ñσá¡¿º¼δ ºá ßτÑΓ »«ññÑ᪬¿ ¿¼
- ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó.
-
- é᪡«Ñ ºá¼Ñτá¡¿Ñ: é¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ »αÑñ«ßΓáó½∩εΓ ¼á¬ß¿-
- ¼á½∞¡« ¼«Θ¡δ⌐ ¿¡ßΓαπ¼Ñ¡Γ ñ½∩ «í«íΘÑ¡¿∩, ¿¼Ñ¡πѼ«ú« »«½¿¼«αΣ¿º¼«¼.
- Å«½¿¼«αΣ¿º¼ ó »ÑαÑó«ñÑ ß úαÑτÑ߬«ú« «º¡áτáÑΓ "¼¡«ú««íαếÑ" ¿ ∩ó-
- ½∩ÑΓß∩ ß»«ß«í«¼ »α¿ßó«Ñ¡¿∩ ñÑ⌐ßΓó¿ε ¿¼Ñ¡¿, ¬«Γ«α«Ñ αáºñѽ∩ÑΓß∩
- óóÑασ ¿ ó¡¿º «íΩѬΓἿ ¿Ñαáασ¿¿, »α¿τѼ ¬áªñδ⌐ «íΩÑ¬Γ ¿Ñαáασ¿¿,
- ¿ß»«½∞ºπÑΓ φΓ« ñÑ⌐ßΓó¿Ñ ß««ΓóÑΓßΓóπεΘ¿¼ Ѽπ «íαẫ¼.
-
- ôªÑ «»¿ßá¡¡á∩ »α«ßΓá∩ ¿Ñαáασ¿∩ ¬αδ½áΓδσ ¡áßѬ«¼δσ ∩ó½∩ÑΓ ß«-
- í«⌐ σ«α«Φ¿⌐ »α¿¼Ñα »«½¿¼«αΣ¿º¼á ó ñÑ⌐ßΓó¿¿, »αÑñ«ßΓáó½∩Ѽ«ú« »«ß-
- αÑñßΓó«¼ ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó.
-
- èáªñδ⌐ Γ¿» «íΩѬΓá ó ¡áΦÑ⌐ ¿Ñαáασ¿¿ »αÑñßΓáó½∩ÑΓ «Γñѽ∞¡δ⌐
- Γ¿» Σ¿úπαδ ¡á φ¬αá¡Ñ: ¬αδ½áΓ«Ñ ¡áßѬ«¼«Ñ ¿½¿ »τѽπ. Ä»αÑñѽѡ¡«,
- ¿¼ÑÑΓ ß¼δß½ ߬áºáΓ∞, τΓ« óδ ¼«ªÑΓÑ »«¬áºáΓ∞ ¡á φ¬αá¡Ñ Γ«τ¬π ¿½¿
- «¬απª¡«ßΓ∞. Å«ºñ¡ÑÑ, Ñß½¿ óá¼ »«¡áñ«í¿Γß∩ «»αÑñѽ¿Γ∞ «íΩѬΓδ ñ½∩
- »αÑñßΓáó½Ñ¡¿∩ ¡á φ¬αá¡Ñ ñαπú¿σ Γ¿»«ó ¬αδ½áΓδσ ¡áßѬ«¼δσ, Γᬿσ
- ¬á¬ ¼«Γδ½∞¬¿, ßΓαѬ«ºδ, íáí«τ¬¿ ¿ Γ.ñ., óδ ¼«ú½¿ íδ ¡á»¿ßáΓ∞ ¼Ñ-
- Γ«ñ ñ½∩ ¬áªñ«ú« ¿º ¡¿σ, ¬«Γ«αδ⌐ íπñÑΓ óδó«ñ¿Γ∞ «íΩÑ¬Γ ¡á φ¬αá¡. é
- ¡«óδσ ΓÑନ¡áσ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¿α«óá¡¿∩ óδ ¼«ú-
- ½¿ íδ ߬áºáΓ∞, τΓ« óßÑ φΓ¿ Γ¿»δ ¬αδ½áΓδσ ¡áßѬ«¼δσ ¿¼ÑεΓ ß»«ß«í-
- ¡«ßΓ∞ »«¬áºáΓ∞ ßἿσ ßÑí∩ ¡á φ¬αá¡Ñ. ¥Γ« í«½∞Φá∩ τáßΓ∞ ¿º Γ«ú«,
- τΓ« ∩ó½∩ÑΓß∩ ñ½∩ ¡¿σ «íΘ¿¼.
-
- ùΓ« ∩ó½∩ÑΓß∩ «ß«íδ¼ ñ½∩ ¬áªñ«ú« Γ¿»á «íΩѬΓá, ΓᬠφΓ« ß»«-
- ß«í, ¬«Γ«αδ¼ «¡ ñ«½ªÑ¡ »«¬áºáΓ∞ ßἫú« ßÑí∩ ¡á φ¬αá¡Ñ. ìá»α¿¼Ñα,
- π »τÑ½δ ¡á φ¬αá¡Ñ ñ«½ª¡δ α¿ß«óáΓ∞ß∩ τÑα¡δÑ »«½«ß¬¿ ¡á Γπ½«ó¿ΘÑ.
- ¡« »«¬áºáΓ∞ ¡á φ¬αá¡Ñ ½εí«⌐ Γ¿» ¬αδ½áΓδσ ¡áßѬ«¼δσ, ¡« ¼Ñσá-
- ¡¿º¼ α¿ß«óá¡¿∩ ¬áªñ«ú« ∩ó½∩ÑΓß∩ ßπúπí« ß»Ñµ¿Σ¿τÑ߬¿¼. Äñ¡« ß½«ó«
- "¡áα¿ß«óáΓ∞" ¿ß»«½∞ºπÑΓß∩ ñ½∩ α¿ß«óá¡¿∩ (íπ¬óá½∞¡«) ¼¡«ú¿σ ¬αδ½á-
- Γδσ ¡áßѬ«¼δσ. ǡὫú¿τ¡«, Ñß½¿ óÑα¡πΓ∞ß∩ ¬ ¡áΦѼπ »α¿¼Ñαπ »½á-
- ΓѪ¡«⌐ óÑñ«¼«ßΓ¿, Γ« ß½«ó« "GetPayAmount" óδτ¿ß½∩ÑΓ αẼÑα óδ»½áΓ
- ñ½∩ ¡Ñ߬«½∞¬¿σ ¬áΓÑú«α¿⌐ αáí«ΓáεΘ¿σ.
-
-
- B.Pascal 7 & Objects /UG - 221 -
-
- ¥Γ« í뫨 »α¿¼Ñαδ »«½¿¼«αΣ¿º¼á, á ó¿αΓπá½∞¡δ¼¿ ¼ÑΓ«ñἿ ∩ó½∩-
- ÑΓß∩ Γ«, τΓ« αÑ὿ºπÑΓ Ñú« ó Borland Pascal.
-
-
- Éá¡¡ÑÑ ßó∩ºδóá¡¿Ñ »α«Γ¿ó »«ºñ¡Ñú« ßó∩ºδóá¡¿∩
- ─────────────────────────────────────────────────────────────────
-
- Éẽ¿τ¿Ñ ¼Ñªñπ óδº«ó«¼ ßΓáΓ¿τÑ߬«ú« ¼ÑΓ«ñá ¿ ñ¿¡á¼¿τÑ߬«ú«
- ¼ÑΓ«ñá ∩ó½∩ÑΓß∩ αẽ¿τ¿Ñ¼ ¼Ñªñπ αÑΦÑ¡¿Ñ¼ ßñѽáΓ∞ ¡Ñ¼Ññ½Ñ¡¡« ¿ αÑ-
- ΦÑ¡¿Ñ¼ «Γ½«ª¿Γ∞. è«úñá óδ ¬«ñ¿απÑΓÑ ó맮ó ßΓáΓ¿τÑ߬«ú« ¼ÑΓ«ñá, óδ
- »« ßπΘÑßΓóπ ú«ó«α¿ΓÑ ¬«¼»¿½∩Γ«απ; "Æδ º¡áÑΦ∞, τÑú« ∩ σ«τπ. Å«⌐ñ¿
- ¿ ó맮ó¿ φΓ«." æ ñαπú«⌐ ßΓ«α«¡δ, »α¿¼Ñ¡Ñ¡¿Ñ ó맮óá ó¿αΓπá½∞¡«ú«
- ¼ÑΓ«ñá, »«ñ«í¡« αáºú«ó«απ ß ¬«¼»¿½∩Γ«α«¼; "Æδ ¡Ñ º¡áÑΦ∞ »«¬á, τÑ-
- ú« ∩ σ«τπ. è«úñá »α¿ñÑΓ óαѼ∩, ºáñá⌐ ó«»α«ß « ¬«¡¬αÑΓ¡«¼ φ¬ºÑ¼»-
- ½∩αÑ."
-
- Å«ñπ¼á⌐ΓÑ «í φΓ«⌐ ¼ÑΓáΣ«αÑ ó ΓÑନ¡áσ »α«í½Ñ¼δ MoveTo, π»«-
- ¼∩¡πΓ«⌐ ó »αÑñδñπΘѼ αáºñѽÑ. é맮ó TBee.MoveTo ¼«ªÑΓ »α¿óÑßΓ¿
- Γ«½∞¬« ¬ «ñ¡«¼π - óδ»«½¡Ñ¡¿ε MoveTo, í½¿ªá⌐ΦÑ⌐ ó «íΩÑ¬Γ¡«⌐ ¿Ñαáα-
- σ¿¿. é φΓ«¼ ß½πτáÑ TBee.MoveTo »«-»αѪ¡Ñ¼π íπñÑΓ óδºδóáΓ∞ «»αÑñÑ-
- ½Ñ¡¿Ñ MoveTo ñ½∩ TWinged, Γᬠ¬á¬ TWinged ∩ó½∩ÑΓß∩ í½¿ªá⌐Φ¿¼ ¬
- TBee Γ¿»«¼ óóÑασ »« ¿Ñαáασ¿¿. àß½¿ »αÑñ»«½«ª¿Γ∞, τΓ« ¡Ñ «»αÑñѽѡ
- ¡¿¬á¬«⌐ ñ«τÑα¡¿⌐ Γ¿», ¬«Γ«αδ⌐ «»αÑñѽ∩ÑΓ ß«íßΓóÑ¡¡δ⌐ ¼ÑΓ«ñ
- MoveTo, »ÑαÑ«»αÑñѽ∩εΘ¿⌐ MoveTo Γ¿»á TWinged, Γ« ½εí«⌐ »«α«ªñÑ¡-
- ¡δ⌐ »« «Γ¡«ΦÑ¡¿ε ¬ TWinged Γ¿» íπñÑΓ »«-»αѪ¡Ñ¼π óδºδóáΓ∞ ëà ªÑ
- ßá¼δ⌐ φ¬ºÑ¼»½∩α ¼ÑΓ«ñá MoveTo. ÉÑΦÑ¡¿Ñ ¼«ªÑΓ íδΓ∞ »α¿¡∩Γ« ó« óαÑ-
- ¼∩ ¬«¼»¿½∩µ¿¿ ¿ φΓ« óßÑ, τΓ« ñ«½ª¡« íδΓ∞ ßñѽᡫ.
-
- Äñ¡á¬« ß«óßѼ ñαπú«Ñ ñѽ«, ¬«úñá ¼ÑΓ«ñ MoveTo óδºδóáÑΓ Show.
- èáªñδ⌐ Γ¿» Σ¿úπαδ ¿¼ÑÑΓ ßó«⌐ ß«íßΓóÑ¡¡δ⌐ φ¬ºÑ¼»½∩α Show, »«φΓ«¼π
- Γ«, ¬á¬«⌐ φ¬ºÑ¼»½∩α Show óδºδóáÑΓß∩ ¼ÑΓ«ñ«¼ MoveTo, »«½¡«ßΓ∞ε ºá-
- ó¿ß¿Γ «Γ Γ«ú«, ¬á¬á∩ αÑ὿ºáµ¿∩ «íΩѬΓá óδºδóáÑΓ MoveTo. ê¼Ñ¡¡«
- »«φΓ«¼π αÑΦÑ¡¿Ñ « ó맮óÑ ¼ÑΓ«ñá Show ó¡πΓα¿ φ¬ºÑ¼»½∩αá MoveTo
- ñ«½ª¡« íδΓ∞ «Γ½«ªÑ¡«: »α¿ ¬«¼»¿½∩µ¿¿ ¬«ñá MoveTo ¡Ñ ¼«ªÑΓ »α¿¡∩Γ«
- ¡¿¬á¬«ú« αÑΦÑ¡¿∩ «Γ¡«ß¿Γѽ∞¡« Γ«ú«, ¬á¬«⌐ ¼ÑΓ«ñ Show ñ«½ªÑ¡ íδΓ∞
- óδºóá¡. ¥Γá ¿¡Σ«α¼áµ¿∩ ¡Ññ«ßΓπ»¡á ó« óαѼ∩ ¬«¼»¿½∩µ¿¿, »«φΓ«¼π
- αÑΦÑ¡¿Ñ ñ«½ª¡« íδΓ∞ «Γ½«ªÑ¡« ñ« ΓÑσ »«α, »«¬á »α«úαá¼¼á ¡Ñ ¡áτ¡ÑΓ
- óδ»«½¡∩Γ∞ß∩, ¿ »«¬á ¡Ñ½∞º∩ íπñÑΓ ºá»α«ß¿Γ∞ φ¬ºÑ¼»½∩α «íΩѬΓá, óδ-
- ºδóáεΘ¿⌐ MoveTo.
-
- Åα«µÑßß, ß »«¼«Θ∞ε ¬«Γ«α«ú« ó맮óδ ßΓáΓ¿τÑ߬¿σ ¼ÑΓ«ñ«ó «ñ-
- ¡«º¡áτ¡« αáºαÑΦáεΓß∩ ¬«¼»¿½∩Γ«α«¼ ó« óαѼ∩ ¬«¼»¿½∩µ¿¿ ó «ñ¿¡ ¼Ñ-
- Γ«ñ, ¡áºδóáÑΓß∩ αá¡¡¿¼ ßó∩ºδó᡿Ѽ. Åα¿ αᡡѼ ßó∩ºδóá¡¿¿ óδºδóá-
- εΘ¿⌐ ¿ óδºδóáѼδ⌐ ¼ÑΓ«ñδ ßó∩ºδóáεΓß∩ »α¿ »Ñαó«⌐ ªÑ 󫺼«ª¡«ßΓ¿,
- Γ.Ñ. ó« óαѼ∩ ¬«¼»¿½∩µ¿¿. Åα¿ »«ºñ¡Ñ¼ ßó∩ºδóá¡¿¿ óδºδóáεΘ¿⌐ ¿ óδ-
- ºδóáѼδ⌐ ¼ÑΓ«ñδ ¡Ñ ¼«úπΓ íδΓ∞ ßó∩ºá¡δ ó« óαѼ∩ ¬«¼»¿½∩µ¿¿, »«φΓ«-
- ¼π ó¬½ετáÑΓß∩ ¼Ñσá¡¿º¼, »«ºó«½∩εΘ¿⌐ «ßπΘÑßΓó¿Γ∞ ßó∩ºδóá¡¿Ñ ¡Ñß-
- ¬«½∞¬« »«ºñ¡ÑÑ, ¬«úñá ó맮ó ñÑ⌐ßΓó¿Γѽ∞¡« »α«¿º«⌐ñÑΓ.
-
- æπΘ¡«ßΓ∞ ¼Ñσá¡¿º¼á ¿¡ΓÑαÑß¡á ¿ Γ«¡¬á, ¿ ¡Ñ¼¡«ú« »«ºñ¡ÑÑ óδ
- πó¿ñ¿ΓÑ, ¬á¬ «¡ αáí«ΓáÑΓ.
-
-
- B.Pascal 7 & Objects /UG - 222 -
-
- æ«ó¼ÑßΓ¿¼«ßΓ∞ Γ¿»«ó «íΩÑ¬Γ«ó
- ─────────────────────────────────────────────────────────────────
-
- ìáß½Ññ«óá¡¿Ñ ñ« ¡Ñ¬«Γ«α«⌐ ßΓѻѡ¿ ¿º¼Ñ¡∩ÑΓ »αáó¿½á ß«ó¼ÑßΓ¿-
- ¼«ßΓ¿ Γ¿»«ó ó Borland Pascal. Å«¼¿¼« óßÑú« »α«τÑú«, »«α«ªñÑ¡¡δ⌐
- Γ¿» ¡áß½ÑñπÑΓ ß«ó¼ÑßΓ¿¼«ßΓ∞ Γ¿»«ó óßÑσ ßó«¿σ »«α«ªñáεΘ¿σ Γ¿»«ó.
- ¥Γá αáßΦ¿αÑ¡¡á∩ ß«ó¼ÑßΓ¿¼«ßΓ∞ Γ¿»«ó »α¿¡¿¼áÑΓ Γα¿ Σ«α¼δ:
-
- - ¼Ñªñπ αÑ὿ºáµ¿∩¼¿ «íΩÑ¬Γ«ó;
- - ¼Ñªñπ π¬áºáΓѽ∩¼¿ ¡á αÑ὿ºáµ¿¿ «íΩÑ¬Γ«ó;
- - ¼Ñªñπ Σ«α¼á½∞¡δ¼¿ ¿ Σá¬Γ¿τÑ߬¿¼¿ »áαá¼ÑΓαἿ.
-
- Äñ¡á¬« «τÑ¡∞ ó᪡« »«¼¡¿Γ∞, τΓ« ó« óßÑσ ΓαÑσ Σ«α¼áσ ß«ó¼Ñß-
- Γ¿¼«ßΓ∞ Γ¿»«ó αáßΦ¿α∩ÑΓß∩ Γ«½∞¬« «Γ »«Γ«¼¬á ¬ α«ñ¿Γѽε. äαπú¿¼¿
- ß½«óἿ, ñ«τÑα¡¿Ñ Γ¿»δ ¼«úπΓ ßó«í«ñ¡« ¿ß»«½∞º«óáΓ∞ß∩ ó¼ÑßΓ« α«ñ¿-
- Γѽ∞߬¿σ, ¡« ¡Ñ ¡á«í«α«Γ.
-
- é ¼«ñπ½Ñ WORKERS.TPU TSalaried ∩ó½∩ÑΓß∩ »«Γ«¼¬«¼ TEmployee,
- á TCommissioned - »«Γ«¼¬«¼ TSalaried. Å«¼¡∩ «í φΓ«¼, αáßß¼«Γα¿¼
- ß½ÑñπεΘ¿Ñ «»¿ßá¡¿∩:
-
- tyαe
- PEmαloyee = ^TEmployee;
- PSalaried = ^TSalfried;
- PCommissioned = ^TCommissioned;
- var
- AnEmαloyee: TEmployee;
- ASalaried: TSalaried;
- PCommissioned: TCommissioned;
- TEmployeePtr: PEmαloyee;
- TSalariedPtr: PSalaried;
- TCommissionedPtr: PCommissioned;
-
- Åα¿ ñá¡¡δσ «»¿ßá¡¿∩σ ß»αáóÑñ½¿óδ ß½ÑñπεΘ¿Ñ «»ÑαáΓ«αδ »α¿ßóá-
- ¿óá¡¿∩:
-
- AnEmαloyee :=ASalaried;
- ASalaried := ACommissioned;
- TCommissionedPtr := ACommissioned;
-
- Åα¿¼Ñτá¡¿Ñ: Å«α«ªñáεΘѼπ «íΩѬΓπ ¼«ª¡« »α¿ßó«¿Γ∞ φ¬-
- ºÑ¼»½∩α ½εí«ú« ¿º Ñú« »«α«ªñÑ¡¡δσ Γ¿»«ó.
-
- B.Pascal 7 & Objects /UG - 223 -
-
-
-
- ÄíαáΓ¡δÑ »α¿ßóá¿óá¡¿∩ ¡Ññ«»πßΓ¿¼δ.
-
- ¥Γá ¬«¡µÑ»µ¿∩ ∩ó½∩ÑΓß∩ ¡«ó«⌐ ñ½∩ Åá߬á½∩, ¿ ó ¡áτá½Ñ, ó«º-
- ¼«ª¡«, óá¼ íπñÑΓ Γαπñ¡«óáΓ« ºá»«¼¡¿Γ∞, ó ¬á¬«¼ »«α∩ñ¬Ñ ß½ÑñπÑΓ
- ß«ó¼ÑßΓ¿¼«ßΓ∞ Γ¿»«ó. äπ¼á⌐ΓÑ ß½ÑñπεΘ¿¼ «íαẫ¼: ¿ßΓ«τ¡¿¬ ñ«½ªÑ¡
- íδΓ∞ ó ß«ßΓ«∩¡¿¿ »«½¡«ßΓ∞ε ºá»«½¡¿Γ∞ »α¿Ñ¼¡¿¬. Å«α«ªñÑ¡¡δÑ Γ¿»δ
- ß«ñÑαªáΓ óßÑ, τΓ« ß«ñÑαªáΓ ¿σ »«α«ªñáεΘ¿Ñ Γ¿»δ í½áú«ñáα∩ ßó«⌐ßΓóπ
- ¡áß½Ññ«óá¡¿∩. Å«φΓ«¼π »«α«ªñÑ¡¡δ⌐ Γ¿» ¿¼ÑÑΓ ½¿í« ó Γ«τ¡«ßΓ¿ Γᬫ⌐
- ªÑ αẼÑα, ½¿í« (τΓ« τáΘÑ óßÑú« ¿ íδóáÑΓ) «¡ í«½∞ΦÑ ßó«Ñú« α«ñ¿-
- Γѽ∩, ¡« ¡¿¬«úñá ¡Ñ íδóáÑΓ ¼Ñ¡∞ΦÑ. Åα¿ßó«Ñ¡¿Ñ »«α«ªñáεΘÑú« (α«ñ¿-
- Γѽ∞߬«ú«) «íΩѬΓá »«α«ªñÑ¡¡«¼π (ñ«τÑα¡Ñ¼π) ¼«ú½« íδ «ßΓáó¿Γ∞ ¡Ñ-
- ¬«Γ«αδÑ »«½∩ »«α«ªñÑ¡¡«ú« «íΩѬΓá ¡Ñ«»αÑñѽѡ¡δ¼¿, τΓ« «»áß¡« ¿
- »«φΓ«¼π ¡Ññ«»πßΓ¿¼«.
-
- é «»ÑαáΓ«αáσ »α¿ßóá¿óá¡¿∩ ¿º ¿ßΓ«τ¡¿¬á ó »α¿Ñ¼¡¿¬ íπñπΓ ¬«-
- »¿α«óáΓ∞ß∩ Γ«½∞¬« »«½∩, ∩ó½∩εΘ¿Ñß∩ «íΘ¿¼¿ ñ½∩ «í«¿σ Γ¿»«ó. é «»Ñ-
- αáΓ«αÑ »α¿ßóá¿óá¡¿∩:
-
- AnEmαloyee := ACommissioned;
-
- Æ«½∞¬« »«½∩ Name, Title ¿ Rate ¿º ACommissioned íπñπΓ ß¬«»¿-
- α«óá¡δ ó AnEmαloyee, Γ.¬. Γ«½∞¬« φΓ¿ »«½∩ ∩ó½∩εΓß∩ «íΘ¿¼¿ ñ½∩
- TCommissioned ¿ TEmployee. æ«ó¼ÑßΓ¿¼«ßΓ∞ Γ¿»«ó αáí«ΓáÑΓ ΓᬪÑ
- ¼Ñªñπ π¬áºáΓѽ∩¼¿ ¡á Γ¿»δ «íΩÑ¬Γ«ó ¿ »«ñτ¿¡∩ÑΓß∩ ΓѼ ªÑ «íΘ¿¼
- »αáó¿½á¼, τΓ« ¿ ñ½∩ αÑ὿ºáµ¿⌐ «íΩÑ¬Γ«ó. ô¬áºáΓѽ∞ ¡á »«Γ«¼¬á ¼«-
- ªÑΓ íδΓ∞ »α¿ßó«Ñ¡ π¬áºáΓÑ½ε ¡á α«ñ¿Γѽ∩. àß½¿ ñáΓ∞ »αÑñδñπΘ¿Ñ «»-
- αÑñѽѡ¿∩, Γ« ß½ÑñπεΘ¿Ñ »α¿ßóá¿óá¡¿∩ π¬áºáΓѽÑ⌐ íπñπΓ ñ«»πßΓ¿¼δ-
- ¼¿:
-
- TSalariedPtr := TCommissionedPtr;
- TEmployeePtr := TSalariedPtr;
- TEmployeePtr := PCommissionedPtr;
-
- Å«¼¡¿ΓÑ, τΓ« «íαáΓ¡δÑ »α¿ßóá¿óá¡¿∩ ¡Ññ«»πßΓ¿¼δ.
-
- ö«α¼á½∞¡δ⌐ »áαá¼ÑΓα (½¿í« º¡áτÑ¡¿Ñ, ½¿í« »áαá¼ÑΓα-»ÑαѼѡ-
- ¡á∩) ñá¡¡«ú« «íΩÑ¬Γ¡«ú« Γ¿»á ¼«ªÑΓ »α¿¡¿¼áΓ∞ ó ¬áτÑßΓóÑ Σá¬Γ¿τÑß-
- ¬«ú« »áαá¼ÑΓαá «íΩÑ¬Γ ßó«Ñú« ªÑ Γ¿»á ¿½¿ «íΩѬΓδ óßÑσ ñ«τÑα¡¿σ
- Γ¿»«ó. àß½¿ «»αÑñѽ¿Γ∞ ºáú«½«ó«¬ »α«µÑñπαδ ß½ÑñπεΘ¿¼ «íαẫ¼:
-
- αrocedure CalcFedTax(Victim: TSalaried);
-
- Γ« ñ«»πßΓ¿¼δ¼¿ Γ¿»á¼¿ Σá¬Γ¿τÑ߬¿σ »áαá¼ÑΓα«ó ¼«úπΓ íδΓ∞ TSalaried
- ¿½¿ TCommissioned, ¡« ¡Ñ Γ¿» TEmployee. Victim Γá¬ªÑ ¼«ªÑΓ íδΓ∞
- »áαá¼ÑΓα«¼-»ÑαѼѡ¡«⌐. Åα¿ φΓ«¼ óδ»«½¡∩εΓß∩ ΓÑ ªÑ »αáó¿½á ß«ó¼Ñß-
- Γ¿¼«ßΓ¿.
-
- B.Pascal 7 & Objects /UG - 224 -
-
-
- çá¼Ñτá¡¿Ñ: ê¼Ñ⌐ΓÑ ó ó¿ñπ, τΓ« ¼Ñªñπ »áαá¼ÑΓαἿ-º¡áτÑ¡¿∩¼¿ ¿
- »áαá¼ÑΓαἿ-»ÑαѼѡ¡δ¼¿ ÑßΓ∞ ¬«αÑ¡¡«Ñ «Γ½¿τ¿Ñ. Åáαá¼ÑΓα-º¡áτÑ¡¿Ñ
- ∩ó½∩ÑΓß∩ π¬áºáΓѽѼ ¡á ñÑ⌐ßΓó¿Γѽ∞¡δ⌐, »«ßδ½áѼδ⌐ ó ¬áτÑßΓóÑ »á-
- αá¼ÑΓαá «íΩѬΓ, Γ«úñá ¬á¬ »áαá¼ÑΓα-»ÑαѼѡ¡á∩ ∩ó½∩ÑΓß∩ Γ«½∞¬« ¬«-
- »¿Ñ⌐ Σá¬Γ¿τÑ߬«ú« »áαá¼ÑΓαá. ü«½ÑÑ Γ«ú«, φΓá ¬«»¿∩ ó¬½ετáÑΓ Γ«½∞-
- ¬« ΓÑ »«½∩, ¬«Γ«αδÑ óσ«ñ∩Γ ó Γ¿» Σ«α¼á½∞¡«ú« »áαá¼ÑΓαá-º¡áτÑ¡¿∩.
- ¥Γ« «º¡áτáÑΓ, τΓ« Σá¬Γ¿τÑ߬¿⌐ »áαá¼ÑΓα íπ¬óá½∞¡« »αÑ«íαáºπÑΓß∩ ¬
- Γ¿»π Σ«α¼á½∞¡«ú« »áαá¼ÑΓαá. Åáαá¼ÑΓα-»ÑαѼѡ¡á∩ í«½∞ΦÑ ¡á»«¼¿¡áÑΓ
- »α¿óÑñÑ¡¿Ñ ¬ «íαẵπ, ó Γ«¼ ß¼δß½Ñ, τΓ« Σá¬Γ¿τÑ߬¿⌐ »áαá¼ÑΓα «ß-
- ΓáÑΓß∩ ¡Ñ¿º¼Ñ¡¡δ¼.
-
- ǡὫú¿τ¡«, Ñß½¿ Σ«α¼á½∞¡δ⌐ »áαá¼ÑΓα ∩ó½∩ÑΓß∩ π¬áºáΓѽѼ ¡á
- Γ¿» «íΩѬΓá, Σá¬Γ¿τÑ߬¿⌐ »áαá¼ÑΓα ¼«ªÑΓ íδΓ∞ π¬áºáΓѽѼ ¡á φΓ«Γ
- Γ¿» «íΩѬΓá ¿½¿ ¡á ½εí«⌐ ñ«τÑα¡¿⌐ Γ¿». ÅπßΓ∞ ñá¡ ºáú«½«ó«¬ »α«µÑ-
- ñπαδ:
-
- αrocedure Worker.Add (AWorker: PSalaried);
-
- Γ«úñá ñ«»πßΓ¿¼δ¼¿ Γ¿»á¼¿ Σá¬Γ¿τÑ߬¿σ »áαá¼ÑΓα«ó ¼«úπΓ íδΓ∞
- PSalaried ¿½¿ PCommissioned, ¡« ¡Ñ Γ¿» PEmαloyee.
-
-
-
-
- B.Pascal 7 & Objects /UG - 225 -
-
- Å«½¿¼«αΣ¿τÑ߬¿Ñ «íΩѬΓδ
- ─────────────────────────────────────────────────────────────────
-
- Åα¿ τΓÑ¡¿¿ »αÑñδñπΘÑú« αáºñѽá óδ, 󫺼«ª¡«, ºáñ὿ ßÑíÑ
- ó«»α«ß: "àß½¿ ½εí«⌐ »«α«ªñÑ¡¡δ⌐ «Γ Γ¿»á »áαá¼ÑΓαá Γ¿» ¼«ªÑΓ »ÑαÑ-
- ñáóáΓ∞ß∩ ó ¬áτÑßΓóÑ »áαá¼ÑΓαá, Γ« ¬á¬ ªÑ »«½∞º«óáΓѽ∞ »áαá¼ÑΓαá
- πº¡áÑΓ, ¬á¬«⌐ Γ¿» «íΩѬΓá «¡ »«½πτ¿½?" öá¬Γ¿τÑ߬¿, »«½∞º«óáΓѽ∞
- ∩ó¡« φΓ«ú« ¿ ¡Ñ º¡áÑΓ. Æ«τ¡δ⌐ Γ¿» Σá¬Γ¿τÑ߬«ú« »áαá¼ÑΓαá ¡Ñ ¿º-
- óÑßΓÑ¡ ó« óαѼ∩ ¬«¼»¿½∩µ¿¿. öá¬Γ¿τÑ߬¿⌐ »áαá¼ÑΓα ¼«ªÑΓ íδΓ∞ «íΩ-
- Ñ¬Γ«¼ ½εí«ú« ñ«τÑα¡Ñú« «Γ »áαá¼ÑΓαá-»ÑαѼѡ¡«⌐ Γ¿»á, ¿ ¿¼Ñ¡¡« »«-
- φΓ«¼π «¡ ¡áºδóáÑΓß∩ »«½¿¼«αΣ¿τÑ߬¿¼ «íΩÑ¬Γ«¼.
-
- ÆÑ»Ñα∞, τѼ ªÑ ¿¼Ñ¡¡« σ«α«Φ »«½¿¼«αΣ¿τÑ߬¿⌐ «íΩѬΓ? ÅαѪñÑ
- óßÑú« »«½¿¼«αΣ¿τÑ߬¿Ñ «íΩѬΓδ »«ºó«½∩εΓ «íαáíáΓδóáΓ∞ «íΩѬΓδ, τÑ⌐
- Γ¿» ¡Ñ¿ºóÑßΓÑ¡ ¡á ¼«¼Ñ¡Γ ¬«¼»¿½∩µ¿¿. ¥Γ« «íΘÑÑ ºá¼Ñτá¡¿Ñ ¡áßΓ«½∞-
- ¬« ¡«ó« ñ½∩ «íαáºá ¼δΦ½Ñ¡¿∩ Åá߬á½∩, τΓ« »α¿¼Ñα ñ½∩ óáß ¡Ñ »«∩-
- ó¿Γß∩ ¡Ñºá¼Ññ½¿Γѽ∞¡«. (æ« óαѼѡѼ óδ íπñÑΓÑ πñ¿ó½Ñ¡δ, ¡á߬«½∞¬«
- ÑßΓÑßΓóÑ¡¡« φΓ« óδú½∩ñ¿Γ. Æ« ÑßΓ∞, ¬«úñá óδ ñÑ⌐ßΓó¿Γѽ∞¡« ßΓá¡ÑΓÑ
- «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δ¼ »α«úαá¼¼¿ßΓ«¼.)
-
- ÅαÑñ»«½«ª¿¼, τΓ« óδ ¡á»¿ß὿ ¿¡ßΓαπ¼Ñ¡Γá½∞¡«Ñ ßαÑñßΓó« ñ½∩
- óδτÑατ¿óá¡¿∩ úαáΣ¿¬«ó, »«ññÑনóáεΘÑÑ ¼¡«ú«τ¿ß½Ñ¡¡δÑ Γ¿»δ Σ¿úπα:
- Γ«τ¬¿, «¬απª¡«ßΓ¿, ¬óáñαáΓδ, »α∩¼«πú«½∞¡¿¬¿, ¬α¿óδÑ ¿ Γ.ñ. é ¬á-
- τÑßΓóÑ τáßΓ¿ φΓ«ú« ¿¡ßΓαπ¼Ñ¡Γá½∞¡«ú« ßαÑñßΓóá óδ σ«Γ¿ΓÑ ¡á»¿ßáΓ∞
- »α«úαá¼¼π, ¬«Γ«αá∩ íπñÑΓ »ÑαѼÑΘáΓ∞ úαáΣ¿τÑ߬πε Σ¿úπαπ »« φ¬αá¡π
- ß »«¼«Θ∞ε πßΓα«⌐ßΓóá Γ¿»á "¼δΦ∞".
-
- Åα¿ ßΓáα«¼ ß»«ß«íÑ ¡Ñ«íσ«ñ¿¼« í佫 ¡á»¿ßáΓ∞ «Γñѽ∞¡πε »α«µÑ-
- ñπαπ »ÑαѼÑΘÑ¡¿∩ ñ½∩ ¬áªñ«ú« Γ¿»á úαáΣ¿τÑ߬«⌐ Σ¿úπαδ, »«ññÑনóá-
- Ѽ«⌐ ¿¡ßΓαπ¼Ñ¡Γá½∞¡δ¼ ßαÑñßΓó«¼. éδ ñ«½ª¡δ í뫨 íδ ¡á»¿ßáΓ∞
- DragButterfly, DragBee, DragMoth ¿ Γ.ñ. ìÑß¼«Γα∩ ¡á Γ«, τΓ« ßΓα«-
- úá∩ Γ¿»¿ºáµ¿∩ (»α«óÑα¬á Γ¿»«ó) Åá߬á½∩ »«ºó«½∩½á φΓ« (¿ ¡Ñ ºáíδ-
- óá⌐ΓÑ, τΓ« óßÑúñá ßπΘÑßΓóπεΓ ß»«ß«íδ «í«⌐Γ¿ ßΓα«úπε Γ¿»¿ºáµ¿ε),
- αẽ¿τ¿∩ ¼Ñªñπ Γ¿»á¼¿ úαáΣ¿τÑ߬¿σ Σ¿úπα Ññóá ½¿ »«ºó«½¿½¿ íδ ¡á-
- »¿ßáΓ∞ ñÑ⌐ßΓó¿Γѽ∞¡« «íΘπε »α«úαá¼¼π »ÑαѼÑΘÑ¡¿∩.
-
- é ¬«¡µÑ ¬«¡µ«ó, »τÑ½á ¿¼ÑÑΓ »«½«ß¬¿ ¿ ªá½«, íáí«τ¬á ¿¼ÑÑΓ
- í«½∞Φ¿Ñ µóÑΓ¡δÑ ¬αδ½∞∩, á ßΓαѬ«ºá ¿¼ÑÑΓ »Ñαѽ¿óτáΓδÑ µóÑΓá,
- σó«ßΓ, ñá τΓ« ú«ó«α¿Γ∞...
-
- æ φΓ«⌐ Γ«τ¬¿ ºαÑ¡¿∩, "ß««íαếΓѽ∞¡δÑ" »α«úαá¼¼¿ßΓδ, αáí«Γá-
- εΘ¿Ñ ¡á Æπαí« Åá߬á½Ñ, ßñѽáεΓ Φáú ó»ÑαÑñ ¿ ߬áªπΓ: "Å«ßΓπ»á⌐ΓÑ
- Γá¬: »ÑαÑñá⌐ΓÑ ºá»¿ß∞ « ¬αδ½áΓ«¼ ¡áßѬ«¼«¼ »α«µÑñπαÑ DragIt ó ¬á-
- τÑßΓóÑ ßß佬¿ π¬áºáΓѽ∩ «íΘÑú« ó¿ñá. é »α«µÑñπαÑ DragIt »α«óÑα∩⌐-
- ΓÑ ßó«í«ñ¡«Ñ »«½Ñ »« Σ¿¬ß¿α«óá¡¡«¼π ß¼ÑΘÑ¡¿ε ó¡πΓα¿ ºá»¿ß¿ «
- ¬αδ½áΓ«¼ ¡áßѬ«¼«¼ ñ½∩ «»αÑñѽѡ¿∩, ¬á¬«ú« ó¿ñá φΓ« ¡áßѬ«¼«Ñ, á
- ºáΓѼ ßñѽá⌐ΓÑ »ÑαÑσ«ñ ß »«¼«Θ∞ε «»ÑαáΓ«αá case:
-
- case FigureIDTag of
- Bee : DragBee;
- Butterfly : DragButterfly;
- Dragonfly : DragDragonfly;
- Mocquito : DragMocquito;
-
- B.Pascal 7 & Objects /UG - 226 -
-
- .
- .
- .
-
- ìπ, αẼÑΘÑ¡¿Ñ ßѼ¡áñµáΓ¿ ¼á½Ñ¡∞¬¿σ τѼ«ñá¡τ¿¬«ó ó¡πΓα¿ «ñ-
- ¡«ú« í«½∞Φ«ú« ∩ó½∩ÑΓß∩ ¡Ñº¡áτ¿Γѽ∞¡δ¼ Φáú«¼ ó»ÑαÑñ, ¡« ó τѼ ªÑ
- ºá¬½ετáÑΓß∩ »α«í½Ñ¼á, «ª¿ñáεΘá∩ ¡áß ¡á φΓ«¼ »πΓ¿?
-
- ùΓ« ß½πτ¿Γß∩, Ñß½¿ »«½∞º«óáΓѽ∞ ¿¡ßΓαπ¼Ñ¡Γá½∞¡«ú« ßαÑñßΓóá
- «»αÑñѽ¿Γ ¡Ñ߬«½∞¬« ¡«óδσ Γ¿»«ó ¬αδ½áΓδσ ¡áßѬ«¼δσ?
-
- é ßἫ¼ ñѽÑ, τΓ«? ùΓ« Ñß½¿ »«½∞º«óáΓѽ∞ ºáσ«τÑΓ αáí«ΓáΓ∞ ß«
- ßαÑñ¡ÑếáΓ߬¿¼¿ Σαπ¬Γ«ó묨 ¼πσἿ? é óáΦÑ⌐ »α«úαá¼¼Ñ ¡ÑΓ Γ¿»á
- Fruitfly, »«φΓ«¼π DragIt ¡Ñ ß«ñÑαª¿Γ ¼ÑΓ¬¿ Fruitfly ó «»ÑαáΓ«αÑ
- case ¿, ß½Ññ«óáΓѽ∞¡«, «ΓóÑαú¡ÑΓ »ÑαѼÑΘÑ¡¿Ñ ¡«ó«ú« α¿ßπ¡¬á
- Fruitfly. üπñπτ¿ »αÑñßΓáó½Ñ¡¡δ¼ »α«µÑñπαÑ DragIt, Fruitfly íπñÑΓ
- óδ»áñáΓ∞ ¿º «»ÑαáΓ«αá case ó óÑΓó∞ else φΓ«ú« «»ÑαáΓ«αá ¬á¬ "¡Ñ-
- αáß»«º¡á¡¡«Ñ ¡áßѬ«¼«Ñ".
-
- ÄΓ¬α«óÑ¡¡« ú«ó«α∩, ß«ºñá¡¿Ñ ñ½∩ »α«ñᪿ ¿¡ßΓαπ¼Ñ¡Γá½∞¡«ú«
- ßαÑñßΓóá íѺ ¿ßσ«ñ¡«ú« ¬«ñá ßΓαáñáÑΓ φΓ«⌐ »α«í½Ñ¼«⌐. ê¡ßΓαπ¼Ñ¡-
- Γá½∞¡«Ñ ßαÑñßΓó« ¼«ªÑΓ αáí«ΓáΓ∞ Γ«½∞¬« ß Γ¿»á¼¿ ñá¡¡δσ, ¬«Γ«αδÑ
- "¿ºóÑßΓ¡δ" Ѽπ, Γ.Ñ. ¬«Γ«αδÑ «»αÑñѽѡδ αáºαáí«Γτ¿¬«¼ ¿¡ßΓαπ¼Ñ¡-
- Γá½∞¡«ú« ßαÑñßΓóá. Å«½∞º«óáΓѽ∞ ¿¡ßΓαπ¼Ñ¡Γá½∞¡«ú« ßαÑñßΓóá «¬áºδ-
- óáÑΓß∩ íÑßß¿½∞¡δ¼ »ÑαÑñ αáßΦ¿αÑ¡¿Ñ¼ Ñú« Σπ¡¬µ¿⌐ ó ¡á»αáó½Ñ¡¿¿, ¡Ñ
- »αÑñó¿ñÑ¡¡«¼ αáºαáí«Γτ¿¬«¼. Æ«, τΓ« »«½∞º«óáΓѽ∞ ¬π»¿½, Γ« «¡ ¿
- »«½πτ¿½. ê Γ«τ¬á.
-
- éδσ«ñ«¼ ¿º »α«í½Ñ¼δ ∩ó½∩ÑΓß∩ ¿ß»«½∞º«óá¡¿Ñ »αáó¿½ αáßΦ¿αÑ¡-
- ¡«⌐ ß«ó¼ÑßΓ¿¼«ßΓ¿ Γ¿»«ó Borland Pascal ñ½∩ «íΩÑ¬Γ«ó ¿ αáºαáí«Γ¬á
- »α¿¬½áñ¡δσ »α«úαá¼¼ ß ¿ß»«½∞º«ó᡿Ѽ »«½¿¼«αΣ¿τÑ߬¿σ ¼ÑΓ«ñ«ó. àß-
- ½¿ »α«µÑñπαá DragIt ¿¡ßΓαπ¼Ñ¡Γá½∞¡«ú« ßαÑñßΓóá πßΓá¡«ó½Ñ¡á Γá¬,
- τΓ« ¼«ªÑΓ αáí«ΓáΓ∞ ß »«½¿¼«αΣ¿τÑ߬¿¼¿ «íΩѬΓἿ, Γ« «¡á íπñÑΓ αá-
- í«ΓáΓ∞ ß ½εí묨 «íΩѬΓἿ, «»αÑñѽѡ¡δ¼¿ ó ¿¡ßΓαπ¼Ñ¡Γá½∞¡«¼
- ßαÑñßΓóÑ, ¿ ß ½εí묨 ñ«τÑα¡¿¼¿ «íΩѬΓἿ, ¬«Γ«αδÑ óδ «»αÑñѽ¿ΓÑ
- ßἿ. àß½¿ Γ¿»δ «íΩÑ¬Γ«ó ¿¡ßΓαπ¼Ñ¡Γá½∞¡«ú« ßαÑñßΓóá ¿ß»«½∞ºπεΓ
- ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ, Γ« «íΩѬΓδ ¿ »α«úαá¼¼δ ¿¡ßΓαπ¼Ñ¡Γá½∞¡«ú«
- ßαÑñßΓóá ¼«úπΓ αáí«ΓáΓ∞ ß« ßñÑ½á¡¡δ¼¿ óἿ úαáΣ¿τÑ߬¿¼¿ Σ¿úπαἿ
- ó ß«íßΓóÑ¡¡δσ ΓÑନ¡áσ ßἿσ Σ¿úπα. Ä»αÑñѽѡ¡δ⌐ óἿ ßÑú«ñ¡∩
- ó¿αΓπá½∞¡δ⌐ ¼ÑΓ«ñ ¼«ªÑΓ óδºδóáΓ∞ß∩ Σá⌐½«¼ ¼«ñπ½∩ (.TPU, .TPW ¿½¿
- . TPP) ¿¡ßΓαπ¼Ñ¡Γá½∞¡«ú« ßαÑñßΓóá, ¬«Γ«αδ⌐ íδ½ ¡á»¿ßá¡ ¿ «ΓΓαá¡ß-
- ½¿α«óá¡ ú«ñ ¡áºáñ. ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ ñáÑΓ
- Γá¬πε 󫺼«ª¡«ßΓ∞, á ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ ∩ó½∩εΓß∩ ¬½ετ«¼ ¬ ¡Ñ⌐.
-
- Å«¡¿¼á¡¿Ñ Γ«ú«, ¬á¬ ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ ñѽáεΓ ó«º¼«ª¡δ¼¿ Γá-
- ¬¿Ñ ó맮óδ »«½¿¼«αΣ¿τÑ߬¿σ ¼ÑΓ«ñ«ó ΓαÑíπÑΓ »«∩ߡѡ¿∩ «»¿ßá¡¿∩ ¿
- ¿ß»«½∞º«óá¡¿∩ ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó.
-
-
- é¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ
- ─────────────────────────────────────────────────────────────────
-
- îÑΓ«ñ ßΓá¡«ó¿Γß∩ ó¿αΓπá½∞¡δ¼, Ñß½¿ ºá Ñú« «íΩ∩ó½Ñ¡¿Ñ¼ ó Γ¿»Ñ
-
- B.Pascal 7 & Objects /UG - 227 -
-
- «íΩѬΓá ßΓ«¿Γ ¡«ó«Ñ ºáαѺÑαó¿α«óá¡¡«Ñ ß½«ó« virtual. Å«¼¡¿ΓÑ, τΓ«
- Ñß½¿ óδ «íΩ∩ó½∩ÑΓÑ ¼ÑΓ«ñ ó α«ñ¿Γѽ∞߬«¼ Γ¿»Ñ ¬á¬ virtual, Γ« óßÑ
- ¼ÑΓ«ñδ ß á¡á½«ú¿τ¡δ¼¿ ¿¼Ñ¡á¼¿ ó ñ«τÑα¡¿σ Γ¿»áσ Γá¬ªÑ ñ«½ª¡δ «íΩ-
- ∩ó½∩Γ∞ß∩ ó¿αΓπá½∞¡δ¼¿ ó« ¿ºíÑªá¡¿Ñ «Φ¿í¬¿ ¬«¼»¿½∩Γ«αá.
-
- ì¿ªÑ »α¿óÑñÑ¡δ º¡á¬«¼δÑ óá¼ «íΩѬΓδ ¿º »α¿¼Ñαá »½áΓѪ¡«⌐ óÑ-
- ñ«¼«ßΓ¿, ñ«½ª¡δ¼ «íαẫ¼ ó¿αΓπ὿º¿α«óá¡¡δÑ:
-
- tyαe
- PEmαloyee = ^TEmployee;
- TEmployee = object
- Name, Title: string[25];
- Rate: Real;
- constructor Init (AName, ATitle: String; ARate: Real);
- function GetPayAmount : Real; virtual;
- function GetName : String;
- function GetTitle : String;
- function GetRate : Real;
- αrocedure Show; virtual;
- end;
-
- PHourly = ^THourly;
- THourly = object(TEmployee);
- Time: Integer;
- constructor Init (AName, ATitle: String; ARate: Real;
- Time: Integer);
- function GetPayAmount : Real; virtual;
- function GetTime : Integer;
- end;
-
- PSalaried = ^TSalaried;
- TSalaried = object(TEmployee);
- function GetPayAmount : Real; virtual;
- end;
-
- PCommissioned = ^TCommissioned;
- TCommissioned = object(Salaried);
- Commission : Real;
- SalesAmount : Real;
- constructor Init (AName, ATitle: String;
- ARate, ACommission, ASalesAmount: Real);
- function GetPayAmount : Real; virtual;
- end;
-
- Ç ¡¿ªÑ »α¿ó«ñ¿Γß∩ »α¿¼Ñα ñ½∩ ¡áßѬ«¼δσ, ñ«»«½¡Ñ¡¡δ⌐ ó¿αΓπ-
- á½∞¡δ¼¿ ¼ÑΓ«ñἿ.
-
- tyαe
- TWinged = object(Insect)
- constructor Init (AX, AY : Integer)
- αrocedure Show; virtual;
- αrocedure Hide; virtual;
- end;
-
- B.Pascal 7 & Objects /UG - 228 -
-
-
- tyαe
- TBee = object(TWinged)
- constructor Init (AX, AY : Integer)
- αrocedure Show; virtual;
- αrocedure Hide; virtual;
- end;
-
- ÅαѪñÑ óßÑú« «íαáΓ¿ΓÑ ó¡¿¼á¡¿Ñ, τΓ« ¼ÑΓ«ñ MoveTo, »«¬áºá¡¡δ⌐
- ñ½∩ Γ¿»á TBee, ΓÑ»Ñα∞ πñá½Ñ¡ ¿º Ñú« «»αÑñѽѡ¿∩. ÆÑ»Ñα∞ Γ¿»π TBee
- í«½∞ΦÑ ¡ÑΓ ¡πªñδ »ÑαÑ«»αÑñѽ∩Γ∞ ¼ÑΓ«ñ MoveTo Γ¿»á TWinged ß »«-
- ¼«Θ∞ε ¡Ñ¼«ñ¿Σ¿µ¿απѼ«⌐ ¬«»¿¿, ¬«¼»¿½¿απѼ«⌐ ó Ñú« ß«íßΓóÑ¡¡«⌐ «í-
- ½áßΓ¿ ñÑ⌐ßΓó¿∩. é¼ÑßΓ« φΓ«ú«, MoveTo ΓÑ»Ñα∞ ¼«ªÑΓ ¡áß½Ññ«óáΓ∞ß∩
- «Γ TWinged ß« óßѼ¿ 󽫪ѡ¡δ¼¿ ó MoveTo ó맮óἿ, ¬«Γ«αδÑ, «ñ¡á-
- ¬«, íπñπΓ óδºδóáΓ∞ ¼ÑΓ«ñδ ¿º TBee, á ¡Ñ ¿º TWinged, ¬á¬ φΓ« »α«-
- ¿ßσ«ñ¿½« ó »«½¡«ßΓ∞ε ßΓáΓ¿τÑ߬«⌐ ¿Ñαáασ¿¿ «íΩÑ¬Γ«ó.
-
- ÄΓ¼ÑΓ∞ΓÑ Γá¬ªÑ ¡«ó«Ñ ºáαѺÑαó¿α«óá¡¡«Ñ ß½«ó« constructor
- (¬«¡ßΓαπ¬Γ«α), ºá¼Ñ¡¿óΦÑÑ ºáαѺÑαó¿α«óá¡¡«Ñ ß½«ó« αrocedure ñ½∩
- TWinged.Init ¿ TBee.Init. è«¡ßΓαπ¬Γ«α ∩ó½∩ÑΓß∩ ߻ѵ¿á½∞¡δ¼ Γ¿»«¼
- »α«µÑñπαδ, ¬«Γ«αá∩ óδ»«½¡∩ÑΓ ¡Ñ¬«Γ«απε πßΓá¡«ó«τ¡πε αáí«Γπ ñ½∩
- ¼Ñσá¡¿º¼á ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó. ü«½ÑÑ Γ«ú«, ¬«¡ßΓαπ¬Γ«α ñ«½ªÑ¡ óδ-
- ºδóáΓ∞ß∩ »ÑαÑñ óδº«ó«¼ ½εí«ú« ó¿αΓπá½∞¡«ú« ¼ÑΓ«ñá. é맮ó ó¿αΓπ-
- á½∞¡«ú« ¼ÑΓ«ñá íѺ »αÑñóáα¿Γѽ∞¡«ú« ó맮óá ¬«¡ßΓαπ¬Γ«αá ¼«ªÑΓ
- »α¿óÑßΓ¿ ¬ í½«¬¿α«óá¡¿ε ß¿ßΓѼδ, á 𠬫¼»¿½∩Γ«αá ¡ÑΓ ß»«ß«íá »α«-
- óÑα¿Γ∞ »«α∩ñ«¬ ó맮óá ¼ÑΓ«ñ«ó.
-
- èáªñδ⌐ Γ¿» «íΩѬΓá, ¿¼ÑεΘ¿⌐ ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ, «í∩ºá¡ ¿¼ÑΓ∞
- ¬«¡ßΓαπ¬Γ«α.
-
- ÅαÑñπ»αѪñÑ¡¿Ñ: è«¡ßΓαπ¬Γ«α ñ«½ªÑ¡ óδºδóáΓ∞ß∩ »ÑαÑñ ó맮ó«¼
- ½εí«ú« ñαπú«ú« ó¿αΓπá½∞¡«ú« ¼ÑΓ«ñá. é맮ó ó¿αΓπá½∞¡«ú« ¼ÑΓ«ñá íѺ
- »αÑñδñπΘÑú« «íαáΘÑ¡¿∩ ¬ ¬«¡ßΓαπ¬Γ«απ ¼«ªÑΓ óδºóáΓ∞ í½«¬¿α«ó¬π
- ß¿ßΓѼδ, ¿ ¬«¼»¿½∩Γ«α ¡Ñ ß¼«ªÑΓ »α«óÑα¿Γ∞ »«α∩ñ«¬, ó ¬«Γ«α«¼ óδ-
- ºδóáεΓß∩ ¼ÑΓ«ñδ.
-
- Åα¿¼Ñτá¡¿Ñ: ä½∩ ¬«¡ßΓαπ¬Γ«α«ó «íΩѬΓá ¼δ »αÑñ½áúáÑΓ
- ¿ß»«½∞º«óáΓ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«α Init.
-
- èáªñδ⌐ «Γñѽ∞¡δ⌐ φ¬ºÑ¼»½∩α «íΩѬΓá ñ«½ªÑ¡ ¿¡¿µ¿á½¿º¿α«óáΓ∞ß∩
- «Γñѽ∞¡δ¼ óδº«ó«¼ ¬«¡ßΓαπ¬Γ«αá. ìÑñ«ßΓáΓ«τ¡« ¿¡¿µ¿á½¿º¿α«óáΓ∞
- «ñ¿¡ φ¬ºÑ¼»½∩α «íΩѬΓá ¿ ºáΓѼ »α¿ßóá¿óáΓ∞ φëà φ¬ºÑ¼»½∩α ñαπú¿¼.
- äαπú¿Ñ φ¬ºÑ¼»½∩αδ, ñáªÑ Ñß½¿ «¡¿ ¼«úπΓ ß«ñÑαªáΓ∞ »αáó¿½∞¡δÑ ñá¡-
- ¡δÑ, ¡Ñ íπñπΓ ¿¡¿µ¿á½¿º¿α«óá¡δ «»ÑαáΓ«α«¼ »α¿ßóá¿óá¡¿∩ ¿ ºáí½«¬¿-
- απεΓ ß¿ßΓѼπ »α¿ ½εíδσ ó맮óáσ ¿σ ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó. ìá»α¿¼Ñα:
-
- var
- FBee, GBee: Bee; { ß«ºñáΓ∞ ñóá φ¬ºÑ¼»½∩αá Bee }
- begin
- FBee.Init(5, 9) { óδº«ó ¬«¡ßΓαπ¬Γ«αá ñ½∩ FBee }
- GBee := FBee; { Gbee ¡Ññ«»πßΓ¿¼! }
- end;
-
-
- B.Pascal 7 & Objects /UG - 229 -
-
- ùΓ« ªÑ ¿¼Ñ¡¡« ß«ºñáÑΓ ¬«¡ßΓαπ¬Γ«α? èáªñδ⌐ Γ¿» «íΩѬΓá ß«ñÑα-
- ª¿Γ ¡ÑτΓ«, ¡áºδóáѼ«Ñ Γáí½¿µÑ⌐ ó¿αΓπá½∞¡«ú« ¼ÑΓ«ñá (Æéî) ó ßÑú-
- ¼Ñ¡ΓÑ ñá¡¡δσ. Æéî ß«ñÑαª¿Γ αẼÑα Γ¿»á «íΩѬΓá ¿ ñ½∩ ¬áªñ«ú« ó¿α-
- Γπá½∞¡«ú« ¼ÑΓ«ñá π¬áºáΓѽ∞ ¡á ¬«ñ, óδ»«½¡∩εΘ¿⌐ ñá¡¡δ⌐ ¼ÑΓ«ñ.
- è«¡ßΓαπ¬Γ«α πßΓá¡áó½¿óáÑΓ ßó∩º∞ ¼Ñªñπ óδºδóáεΘÑ⌐ Ñú« αÑ὿ºáµ¿Ñ⌐
- «íΩѬΓá ¿ Æéî Γ¿»á «íΩѬΓá.
-
- é᪡« »«¼¡¿Γ∞, τΓ« ¿¼ÑÑΓß∩ Γ«½∞¬« «ñ¡á Æéî ñ½∩ ¬áªñ«ú« Γ¿»á
- «íΩѬΓá. ÄΓñѽ∞¡δÑ φ¬ºÑ¼»½∩αδ Γ¿»á «íΩѬΓá (Γ.Ñ. »ÑαѼѡ¡δÑ φΓ«ú«
- Γ¿»á) ß«ñÑαªáΓ Γ«½∞¬« ß«Ññ¿¡Ñ¡¿Ñ ß Æéî, ¡« ¡Ñ ßá¼π Æéî. è«¡ßΓαπ¬-
- Γ«α πßΓá¡áó½¿óáÑΓ º¡áτÑ¡¿Ñ φΓ«ú« ß«Ññ¿¡Ñ¡¿∩ ó Æéî. ê¼Ñ¡¡« í½áú«-
- ñáα∩ φΓ«¼π óδ ¡¿úñÑ ¡Ñ ¼«ªÑΓÑ ºá»πßΓ¿Γ∞ óδ»«½¡Ñ¡¿Ñ »ÑαÑñ ó맮ó«¼
- ¬«¡ßΓαπ¬Γ«αá.
-
-
- Åα«óÑα¬á ñ¿á»áº«¡«ó »α¿ ó맮óÑ ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó
- ─────────────────────────────────────────────────────────────────
-
- é »α«µÑßßÑ αáºαáí«Γ¬¿ »α«úαá¼¼δ óá¼, 󫺼«ª¡«, ºáσ«τÑΓß∩ »«-
- óδß¿Γ∞ ¼Ñαδ íѺ«»áß¡«ßΓ¿, ¬«Γ«αá∩ ß¡¿ªáÑΓß∩ ¿º-ºá ó맮ó«ó ó¿αΓπ-
- á½∞¡δσ ¼ÑΓ«ñ«ó Borland Pascal. àß½¿ ñ¿αÑ¬Γ¿óá $R ¡áσ«ñ¿Γß∩ ó«
- ó¬½ετÑ¡¡«¼ ß«ßΓ«∩¡¿¿, {$R+}, Γ« óßÑ ó맮óδ ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó
- íπñπΓ »α«óÑα∩Γ∞ß∩ ¡á ß«ßΓ«∩¡¿Ñ ¿¡¿µ¿á½¿ºáµ¿¿ ñ½∩ óδ»«½¡∩εΘ¿σ óδ-
- º«óδ αÑ὿ºáµ¿⌐. àß½¿ óδ»«½¡∩εΘá∩ ó맮ó αÑ὿ºáµ¿∩ ÑΘÑ ¡Ñ íδ½á
- ¿¡¿µ¿á½¿º¿α«óá¡á ¬«¡ßΓαπ¬Γ«α«¼, Γ« »α«¿º«⌐ñÑΓ «Φ¿í¬á »α«óÑન ñ¿-
- á»áº«¡á ¿ß»«½¡∩εΘÑ⌐ ß¿ßΓѼδ.
-
- Åα¿¼Ñτá¡¿Ñ: æ«ßΓ«∩¡¿Ñ¼ »« π¼«½τá¡¿ε ∩ó½∩ÑΓß∩ {$R-}.
-
- Å«ß½Ñ Γ«ú«, ¬á¬ óδ σ«α«ΦÑ¡∞¬« »ÑαÑΓα∩ß½¿ »α«úαá¼¼π ¿ πñ«ßΓ«-
- óÑα¿½¿ß∞, τΓ« «ΓßπΓßΓóπεΓ ó맮óδ ¼ÑΓ«ñ«ó ¿º ¡Ñ¿¡¿µ¿á½¿º¿α«óá¡¡δσ
- αÑ὿ºáµ¿⌐, óδ ¼«ªÑΓÑ ñ« ¡Ñ¬«Γ«α«⌐ ßΓѻѡ¿ π߬«α¿Γ∞ óδ»«½¡Ñ¡¿Ñ
- »α«úαá¼¼δ »πΓѼ »ÑαѬ½ετÑ¡¿∩ ñ¿αÑ¬Γ¿óδ $R ó »áßß¿ó¡«Ñ ß«ßΓ«∩¡¿Ñ.
- Å«ß½Ñ φΓ«ú« »α«óÑα¬á ó맮ó«ó ¼ÑΓ«ñ«ó ¿º ¡Ñ¿¡¿µ¿á½¿º¿α«óá¡¡δσ αÑá-
- ½¿ºáµ¿⌐ «ßπΘÑßΓó½∩Γ∞ß∩ ¡Ñ íπñÑΓ, τΓ« «ßΓáó½∩ÑΓ óÑα«∩Γ¡«ßΓ∞ í½«¬¿-
- α«ó¬¿ ß¿ßΓѼδ, Ñß½¿ íπñÑΓ óδ∩ó½Ñ¡á Γá¬á∩ «Φ¿í¬á.
-
- é¿αΓπá½∞¡δ⌐ «ñ¡áªñδ - ó¿αΓπá½∞¡δ⌐ óßÑúñá
-
- éδ πªÑ óÑα«∩Γ¡« «íαáΓ¿½¿ 󡿼᡿Ñ, τΓ« ¬á¬ TWinged, Γᬠ¿
- TBee ß«ñÑαªáΓ ¼ÑΓ«ñδ, ¡áºδóáѼδÑ Show ¿ Hide. éßÑ ºáú«½«ó¬¿ ¼ÑΓ«-
- ñ«ó ñ½∩ Show ¿ Hide «íΩ∩ó½Ñ¡δ ó¿αΓπá½∞¡δ¼¿ ¿ ß¡áíªÑ¡δ ºáαѺÑαó¿-
- α«óá¡¡δ¼ ß½«ó«¼ virtual. èá¬ Γ«½∞¬« α«ñ¿Γѽ∞߬¿⌐ Γ¿» «íΩѬΓá «íΩ-
- ∩ó½∩ÑΓ ¼ÑΓ«ñ ó¿αΓπá½∞¡δ¼, óßÑ Ñú« »«Γ«¼¬¿ Γá¬ªÑ ñ«½ª¡δ «íΩ∩ó¿Γ∞
- φëà ¼ÑΓ«ñ ó¿αΓπá½∞¡δ¼. äαπú¿¼¿ ß½«óἿ, ßΓáΓ¿τÑ߬¿⌐ ¼ÑΓ«ñ ¡¿¬«ú-
- ñá ¡Ñ ß¼«ªÑΓ »ÑαÑ«»αÑñѽ¿Γ∞ ó¿αΓπá½∞¡δ⌐ ¼ÑΓ«ñ. àß½¿ óδ »«»δΓáÑ-
- ΓÑß∞ ßñѽáΓ∞ φΓ«, Γ« ¬«¼»¿½∩Γ«α óδñáßΓ ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ.
-
- Æá¬ªÑ ß½ÑñπÑΓ »«¼¡¿Γ∞, τΓ« »«ß½Ñ Γ«ú«, ¬á¬ ¼ÑΓ«ñ ßΓá½ ó¿αΓπ-
- á½∞¡δ¼, Ñú« ºáú«½«ó«¬ ¡Ñ ¼«ªÑΓ ¿º¼Ñ¡∩Γ∞ß∩ ó «íΩѬΓáσ í«½ÑÑ ¡¿º¬«-
- ú« πα«ó¡∩ ¿Ñαáασ¿¿. éδ ¼«ªÑΓÑ »αÑñßΓáó½∩Γ∞ ßÑíÑ ¬áªñ«Ñ «»αÑñѽÑ-
- ¡¿Ñ ó¿αΓπá½∞¡«ú« ¼ÑΓ«ñá ¬á¬ ó«α«Γá ñ½∩ óßÑσ ¿σ. êßσ«ñ∩ ¿º φΓ¿σ
- ß««íαáªÑ¡¿⌐, ºáú«½«ó¬¿ óßÑσ αÑ὿ºáµ¿⌐ «ñ¡«ú« ¿ Γ«ú« ªÑ ó¿αΓπá½∞-
-
- B.Pascal 7 & Objects /UG - 230 -
-
- ¡«ú« ¼ÑΓ«ñá ñ«½ª¡δ íδΓ∞ ¿ñÑ¡Γ¿τ¡δ¼¿, ó¬½ετá∩ τ¿ß½« »áαá¼ÑΓα«ó ¿
- ¿σ Γ¿»δ. ¥Γ« ¡Ñ «Γ¡«ß¿Γß∩ ¬ ßΓáΓ¿τÑ߬¿¼ ¼ÑΓ«ñá¼: ßΓáΓ¿τÑ߬¿⌐ ¼Ñ-
- Γ«ñ, »ÑαÑ«»αÑñѽ∩εΘ¿⌐ ñαπú«⌐, ¼«ªÑΓ ¿¼ÑΓ∞ «Γ½¿τ¡«Ñ τ¿ß½« »áαá¼ÑΓ-
- α«ó ¿ Γ¿»δ φΓ¿σ »áαá¼ÑΓα«ó, ó ºáó¿ß¿¼«ßΓ¿ «Γ ¡Ñ«íσ«ñ¿¼«ßΓ¿.
-
- ¥Γ« µÑ½δ⌐ ¡«óδ⌐ ¼¿α.
-
-
- ÉáßΦ¿α∩Ѽ«ßΓ∞ «íΩѬΓá
- ─────────────────────────────────────────────────────────────────
-
- éáª¡δ¼ ºá¼Ñτ᡿Ѽ, ¬áßáεΘ¿¼ß∩ ¼«ñπ½Ñ⌐ Γ¿»á WORKERS.PAS, ∩ó-
- ½∩ÑΓß∩ Γ«, τΓ« Γ¿»δ «íΩÑ¬Γ«ó ¿ ¼ÑΓ«ñδ, «»αÑñѽѡ¡δÑ ó ¼«ñπ½Ñ, ¼«-
- úπΓ »«ßΓáó½∩Γ∞ß∩ »«½∞º«óáΓѽε ó Σ«α¼Ñ .TPU, .TPW ¿½¿ .TPP Γ.Ñ. ó
- Σ«α¼Ñ, ß»«ß«í¡«⌐ ¬ ¡Ñ»«ßαÑñßΓóÑ¡¡«⌐ ¬«¼»«¡«ó¬Ñ, íѺ ¿ßσ«ñ¡«ú« ¬«-
- ñá. (ìπª¡« »α«ß¼«ΓαÑΓ∞ Γ«½∞¬« ½¿ßΓ¿¡ú ¿¡ΓÑαΣÑ⌐ß¡«⌐ τáßΓ¿ ¼«ñπ½∩.)
- êß»«½∞ºπ∩ »«½¿¼«αΣ¿τÑ߬¿Ñ «íΩѬΓδ ¿ ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ, »«½∞º«óá-
- Γѽ∞ Σá⌐½á .TPU, .TPW ¿½¿ .TPP ß¼«ªÑΓ ñ«íáó½∩Γ∞ σáαá¬ΓÑα¿ßΓ¿¬¿
- ñ½∩ »α¿ß»«ß«í½Ñ¡¿∩ ¼«ñπ½∩ ¬ ßó«¿¼ ¡πªñá¼.
-
- ì«ó«Ñ »«¡∩Γ¿Ñ « ñ«íáó½Ñ¡¿¿ Σπ¡¬µ¿«¡á½∞¡δσ σáαá¬ΓÑα¿ßΓ¿¬ ó
- »α«úαá¼¼π íѺ »αÑñ«ßΓáó½Ñ¡¿∩ ÑÑ ¿ßσ«ñ¡«ú« ¬«ñá ¡áºδóáÑΓß∩ ß»«ß«í-
- ¡«ßΓ∞ε ¬ αáßΦ¿αÑ¡¿ε. æ»«ß«í¡«ßΓ∞ ¬ αáßΦ¿αÑ¡¿ε ∩ó½∩ÑΓß∩ ÑßΓÑßΓóÑ¡-
- ¡δ¼ ß½ÑñßΓó¿Ñ¼ ¡áß½Ññ«óá¡¿∩: óδ ¡áß½ÑñπÑΓÑ óßÑ, τѼ «í½áñáεΓ »«-
- ᫪ñáεΘ¿Ñ Γ¿»δ, á ºáΓѼ ñ«íáó½∩ÑΓÑ ¡«óδÑ ¡πª¡δÑ óἠ󫺼«ª¡«ßΓ¿.
- Å«ºñ¡ÑÑ ßó∩ºδóá¡¿Ñ »«ºó«½∩ÑΓ, τΓ«íδ ¡«ó«Ñ ßó∩ºδóὫß∞ ß« ßΓáαδ¼
- ó« óαѼ∩ óδ»«½¡Ñ¡¿∩ »α«úαá¼¼δ, í½áú«ñáα∩ τѼπ αáßΦ¿αÑ¡¿Ñ ßπΘÑßΓ-
- óπεΘÑú« ¬«ñá óδú½∩ñ¿Γ "íÑßΦ«ó¡δ¼" ¿ ßΓ«¿Γ óá¼ ó τáßΓ¿ óδ»«½¡Ñ¡¿∩
- ¡Ñ í«½ÑÑ, τѼ íδßΓα«Ñ »πΓÑΦÑßΓó¿Ñ »« Γáí½¿µÑ ó¿αΓπá½∞¡«ú« ¼ÑΓ«ñá.
-
-
- æΓáΓ¿τÑ߬¿Ñ ¼ÑΓ«ñδ ¿½¿ ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ?
- ─────────────────────────────────────────────────────────────────
-
- é «íΘѼ ß½πτáÑ, óá¼ ß½ÑñπÑΓ ñѽáΓ∞ ¼ÑΓ«ñδ ó¿αΓπá½∞¡δ¼. êß-
- »«½∞ºπ⌐ΓÑ ßΓáΓ¿τÑ߬¿Ñ ¼ÑΓ«ñδ Γ«½∞¬« ó Γ«¼ ß½πτáÑ, Ñß½¿ óδ σ«Γ¿ΓÑ
- »«½πτ¿Γ∞ «»Γ¿¼á½∞¡πε φΣΣÑ¬Γ¿ó¡«ßΓ∞ ߬«α«ßΓ¿ óδ»«½¡Ñ¡¿∩ ¿ ¿ß»«½∞-
- º«óá¡¿∩ »á¼∩Γ¿. Äñ¡á¬« ó φΓ«¼ ß½πτáÑ, ¬á¬ óδ ó¿ñѽ¿, óδ ΓÑα∩ÑΓÑ
- 󫺼«ª¡«ßΓ¿ αáßΦ¿αÑ¡¿∩.
-
- ÅαÑñ»«½«ª¿¼, τΓ« óδ «»¿ßδóáÑΓÑ «íΩÑ¬Γ ß ¿¼Ñ¡Ñ¼ Ancestor ¿
- ó¡πΓα¿ φΓ«ú« «íΩѬΓá óδ «»¿ßδóáÑΓÑ ¼ÑΓ«ñ ß ¿¼Ñ¡Ñ¼ Action. èᬠóδ
- «»αÑñѽ∩ÑΓÑ, ¬á¬¿¼ ñ«½ªÑ¡ íδΓ∞ ¼ÑΓ«ñ, ó¿αΓπá½∞¡δ¼ ¿½¿ ßΓáΓ¿τÑß-
- ¬¿¼? çñÑß∞ »α¿ó«ñ¿Γß∩ »αá󿽫 í«½∞Φ«ú« »á½∞µá: ßñѽá⌐ΓÑ ¼ÑΓ«ñ
- Action ó¿αΓπá½∞¡δ¼, Ñß½¿ ¿¼ÑÑΓß∩ óÑα«∩Γ¡«ßΓ∞, τΓ« íπñπΘ¿Ñ ¡áß½Ññ-
- ¡¿¬¿ «íΩѬΓá Ancestor íπñπΓ »ÑαÑ«»αÑñѽ∩Γ∞ Action, á óδ σ«Γ¿ΓÑ,
- τΓ«íδ íπñπΘ¿⌐ ¬«ñ íδ½ ñ«ßΓπ»Ñ¡ Ancestor.
-
- æ ñαπú«⌐ ßΓ«α«¡δ, »«¼¡¿ΓÑ, τΓ« Ñß½¿ π «íΩѬΓá ¿¼ÑεΓß∩ ½εíδÑ
- ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ, Γ« ñ½∩ φΓ«ú« «íΩѬΓá ó ßÑú¼Ñ¡ΓÑ ñá¡¡δσ íπñÑΓ
- ß«ºñá¡á Γáí½¿µá ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó (Æéî) ¿ ¬áªñδ⌐ φ¬ºÑ¼»½∩α φΓ«-
- ú« «íΩѬΓá íπñÑΓ ¿¼ÑΓ∞ ßó∩º∞ ß Æéî. èáªñδ⌐ ó맮ó ó¿αΓπá½∞¡«ú« ¼Ñ-
- Γ«ñá ñ«½ªÑ¡ »α«σ«ñ¿Γ∞ τÑαѺ Æéî, Γ«úñá ¬á¬ ßΓáΓ¿τÑ߬¿Ñ ¼ÑΓ«ñδ óδ-
-
- B.Pascal 7 & Objects /UG - 231 -
-
- ºδóáεΓß∩ ¡Ñ»«ßαÑñßΓóÑ¡¡«. ò«Γ∩ »α«ß¼«Γα Æéî ∩ó½∩ÑΓß∩ óÑß∞¼á φΣ-
- ΣÑ¬Γ¿ó¡δ¼, ó맮ó ßΓáΓ¿τÑ߬«ú« ¼ÑΓ«ñá óßÑ αáó¡« «ßΓáÑΓß∩ ¡Ñ¼¡«ú«
- í«½ÑÑ íδßΓαδ¼, τѼ ó맮ó ó¿αΓπá½∞¡«ú«. ê Ñß½¿ ó óáΦѼ «íΩѬΓÑ ¡ÑΓ
- ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó, Γ« ¿ Æéî «ΓßπΓßΓóπÑΓ ó ßÑú¼Ñ¡ΓÑ ñá¡¡δσ ¿
- (τΓ« í«½ÑÑ ó᪡«) ó ¬áªñ«¼ φ¬ºÑ¼»½∩αÑ «íΩѬΓá «ΓßπΓßΓóπεΓ ßó∩º¿ ß
- Æéî.
-
- ä«»«½¡¿Γѽ∞¡á∩ ߬«α«ßΓ∞ ¿ φΣΣÑ¬Γ¿ó¡«Ñ ¿ß»«½∞º«óá¡¿Ñ »á¼∩Γ¿
- ñ½∩ ßΓáΓ¿τÑ߬¿σ ¼ÑΓ«ñ«ó ñ«½ª¡« παáó¡«óÑΦ¿óáΓ∞ß∩ ú¿í¬«ßΓ∞ε, ¬«Γ«-
- απε ñ«»π߬áεΓ ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ: óδ ¼«ªÑΓÑ αáßΦ¿α¿Γ∞ ¿¼ÑεΘ¿⌐ß∩
- ¬«ñ ß»πßΓ∩ ¼¡«ú« óαѼѡ¿ »«ß½Ñ Ñú« ¬«¼»¿½∩µ¿¿. Å«¼¡¿ΓÑ, τΓ« »«½∞-
- º«óáΓѽ∞ óáΦÑú« Γ¿»á «íΩѬΓá ¼«ªÑΓ αáßß¼áΓα¿óáΓ∞ »πΓ¿ Ñú« ¿ß»«½∞-
- º«óá¡¿∩, ¬«Γ«αδÑ óá¼ ¿ ¡Ñ ß¡¿½¿ß∞, τΓ«, ó ¬«¡Ñτ¡«¼ ßτÑΓÑ, ¿¼ÑÑΓ
- «ß¡«ó¡«Ñ º¡áτÑ¡¿Ñ.
-
-
- 信ἿτÑ߬¿Ñ «íΩѬΓδ
- ─────────────────────────────────────────────────────────────────
-
- éßÑ »α¿óÑñÑ¡¡δÑ ñ« ß¿σ »«α «íΩѬΓδ ¿¼Ñ½¿ ßΓáΓ¿τÑ߬¿Ñ αÑ὿-
- ºáµ¿¿ Γ¿»«ó «íΩÑ¬Γ«ó, ¬«Γ«αδ¼ ó «íΩ∩ó½Ñ¡¿¿ var »α¿ßóá¿ó὿ß∞ ¿¼Ñ-
- ¡á ¿ ¬«Γ«αδÑ αẼÑΘ὿ß∞ ó ßÑú¼Ñ¡ΓÑ ñá¡¡δσ ¿½¿ ó ßΓѬÑ.
-
- var
- ASalaried: TSalaried;
-
- Åα¿¼Ñτá¡¿Ñ: êß»«½∞º«óá¡¿Ñ ºñÑß∞ ß½«óá "ßΓáΓ¿τÑ߬¿⌐" ¡Ñ
- ¿¼ÑÑΓ «Γ¡«ΦÑ¡¿∩ ¬ ßΓáΓ¿τÑ߬¿¼ ¼ÑΓ«ñá¼.
-
- ÄíΩѬΓδ ¼«úπΓ αẼÑΘáΓ∞ß∩ ó ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿ ¿ ¿¼¿ ¼«ª¡«
- ¼á¡¿»π½¿α«óáΓ∞ ß »«¼«Θ∞ε π¬áºáΓѽÑ⌐, ¬á¬ ¿ ß ΓÑß¡« ßó∩ºá¡¡δ¼¿ ß
- ¡¿¼¿ Γ¿»á¼¿ ºá»¿ßÑ⌐, τΓ« óßÑúñá ¿¼Ñ½« ¼ÑßΓ« ó Åá߬á½Ñ. Æπαí« Åáß-
- ¬á½∞ ó¬½ετáÑΓ ¡Ñ߬«½∞¬« ¼«Θ¡δσ αáßΦ¿αÑ¡¿⌐ ñ½∩ óδ»«½¡Ñ¡¿∩ ñ¿¡á¼¿-
- τÑ߬«ú« αẼÑΘÑ¡¿∩ ¿ πñá½Ñ¡¿∩ «íΩÑ¬Γ«ó í«½ÑÑ ½Ñú¬¿¼¿ ¿ í«½ÑÑ φΣ-
- ΣÑ¬Γ¿ó¡δ¼¿ ß»«ß«íἿ.
-
- ÄíΩѬΓδ ¼«úπΓ αẼÑΘáΓ∞ß∩, ¬á¬ «í½áßΓ¿ »á¼∩Γ¿, ¡á ¬«Γ«αδÑ
- ßßδ½áÑΓß∩ π¬áºáΓѽ∞, ß »«¼«Θ∞ε »α«µÑñπαδ New:
-
- var
- CurrentPay: Real;
- P: ^TSalaried;
-
- New(P);
-
- èᬠ¿ ñ½∩ Γ¿»«ó ºá»¿ßÑ⌐, »α«µÑñπαá New óδñѽ∩ÑΓ ó ñ¿¡á¼¿τÑß-
- ¬«⌐ »á¼∩Γ¿ »α«ßΓαá¡ßΓó«, ñ«ßΓáΓ«τ¡«Ñ ñ½∩ αẼÑΘÑ¡¿∩ αÑ὿ºáµ¿¿
- π¬áºáΓѽ∩ íẫó«ú« Γ¿»á ¿ ó«ºóαáΘáÑΓ áñαÑß φΓ«ú« »α«ßΓαá¡ßΓóá ó
- π¬áºáΓѽÑ.
-
- àß½¿ ñ¿¡á¼¿τÑ߬¿⌐ «íΩÑ¬Γ ß«ñÑαª¿Γ ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ, Γ« «¡
- ñ«½ªÑ¡ ¿¡¿µ¿á½¿º¿α«óáΓ∞ß∩ ß »«¼«Θ∞ε ó맮óá ¬«¡ßΓαπ¬Γ«αá »ÑαÑñ
- ΓѼ, ¬á¬ íπñÑΓ óδºóá¡ ½εí«⌐ ¿º Ñú« ¼ÑΓ«ñ«ó:
-
- B.Pascal 7 & Objects /UG - 232 -
-
-
- P^.Init('Sara Adams', 'Account manager', 2400);
-
- çáΓѼ ó맮óδ ¼ÑΓ«ñ«ó ¼«úπΓ »α«¿ßσ«ñ¿Γ∞ ó «íδτ¡«¼ »«α∩ñ¬Ñ, ß
- ¿ß»«½∞º«ó᡿Ѽ ¿¼Ñ¡¿ π¬áºáΓѽ∩ ¿ ßß佫τ¡«ú« ß¿¼ó«½á ó¼ÑßΓ« ¿¼Ñ¡¿
- αÑ὿ºáµ¿¿, ¬«Γ«α«Ñ ¿ß»«½∞º«óὫß∞ íδ »α¿ «íαáΘÑ¡¿¿ ¬ ßΓáΓ¿τÑ߬¿
- αẼÑΘÑ¡¡«¼π «íΩѬΓπ:
-
- CurrentPay := P^.GetPayAmount;
-
-
- ÉẼÑΘÑ¡¿Ñ ¿ ¿¡¿µ¿á½¿ºáµ¿∩ ß »«¼«Θ∞ε »α«µÑñπαδ New
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal αáßΦ¿α∩ÑΓ ß¿¡Γá¬ß¿ß »α«µÑñπαδ New, τΓ« ∩ó½∩-
- ÑΓß∩ í«½ÑÑ ¬«¼»á¬Γ¡δ¼ ¿ í«½ÑÑ πñ«í¡δ¼ ßαÑñßΓó«¼ óδñѽѡ¿∩ »α«ßΓ-
- αá¡ßΓóá ñ½∩ «íΩѬΓá ó ñ¿¡á¼¿τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿ »á¼∩Γ¿ ¿
- ¿¡¿µ¿á½¿ºáµ¿¿ «íΩѬΓá ß »«¼«Θ∞ε Γ«½∞¬« «ñ¡«⌐ «»Ñαᵿ¿. ÆÑ»Ñα∞
- »α«µÑñπαá New ¼«ªÑΓ óδºδóáΓ∞ß∩ ß ñóπ¼∩ »áαá¼ÑΓαἿ: ¿¼∩ π¬áºáΓѽ∩
- ¿ß»«½∞ºπÑΓß∩ ó ¬áτÑßΓóÑ »Ñαó«ú« »áαá¼ÑΓαá, á óδº«ó ¬«¡ßΓαπ¬Γ«αá -
- ó ¬áτÑßΓóÑ óΓ«α«ú« »áαá¼ÑΓαá:
-
- New(P, Init('Sara Adams', 'Account manager', 2400));
-
- àß½¿ ñ½∩ »α«µÑñπαδ New ¿ß»«½∞ºπÑΓß∩ αáßΦ¿αÑ¡¡δ⌐ ß¿¡Γá¬ß¿ß,
- Γ« ¬«¡ßΓαπ¬Γ«α Init ñÑ⌐ßΓó¿Γѽ∞¡« óδ»«½¡∩ÑΓ ñ¿¡á¼¿τÑ߬«Ñ αẼÑΘÑ-
- ¡¿Ñ, ¿ß»«½∞ºπ∩ ߻ѵ¿á½∞¡δ⌐ ¬«ñ óσ«ñá, ßúÑ¡Ñα¿α«óá¡¡«ú« ¬á¬ τáßΓ∞
- ¬«¼»¿½∩µ¿¿ ¬«¡ßΓαπ¬Γ«αá. ê¼∩ αÑ὿ºáµ¿¿ ¡Ñ ¼«ªÑΓ »αÑñΦÑßΓó«óáΓ∞
- Init, Γ.¬. ó Γ« óαѼ∩, ¬«úñá »α«µÑñπαá New óδºóá¡á, αÑ὿ºáµ¿∩,
- ¿¡¿µ¿á½¿º¿απѼá∩ ß »«¼«Θ∞ε Init, ÑΘÑ ¡Ñ ßπΘÑßΓóπÑΓ. 諼»¿½∩Γ«α
- ¿ñÑ¡Γ¿Σ¿µ¿απÑΓ »αáó¿½∞¡δ⌐ óδºδóáѼδ⌐ ¼ÑΓ«ñ Init »«ßαÑñßΓó«¼ Γ¿»á
- π¬áºáΓѽ∩, »ÑαÑßδ½áѼ«ú« ó ¬áτÑßΓóÑ »Ñαó«ú« »áαá¼ÑΓαá.
-
- Åα«µÑñπαá New Γá¬ªÑ íδ½á αáßΦ¿αÑ¡á ñ½∩ 󫺼«ª¡«ßΓ¿ ¿ß»«½∞º«-
- óá¡¿∩ ÑÑ ¬á¬ Σπ¡¬µ¿¿, ¬«Γ«αá∩ ó«ºóαáΘáÑΓ º¡áτÑ¡¿Ñ π¬áºáΓѽ∩. Å«-
- ßδ½áѼδ⌐ New »áαá¼ÑΓα ∩ó½∩ÑΓß∩ Γ¿»«¼ π¬áºáΓѽ∩ ¡á «íΩѬΓ, á ¡Ñ
- ßἫ⌐ »ÑαѼѡ¡«⌐-π¬áºáΓѽѼ:
-
- tyαe
- PSalaried = ^TSalaried;
-
- var
- P: PSalaried;
- P := New(PSalaried);
-
- ÄíαáΓ¿ΓÑ ó¡¿¼á¡¿Ñ, τΓ« ó ñá¡¡«⌐ óÑαß¿¿ Σπ¡¬µ¿«¡á½∞¡á∩ Σ«α¼á
- αáßΦ¿αÑ¡¿∩ »α«µÑñπαδ New »α¿¼Ñ¡¿¼á ¬« óßѼ Γ¿»á¼ ñá¡¡δσ, á ¡Ñ
- Γ«½∞¬« ¬ Γ¿»á¼ «íΩÑ¬Γ«ó.
-
- öπ¡¬µ¿«¡á½∞¡á∩ Σ«α¼á New, ¬á¬ ¿ »α«µÑñπα¡á∩ Σ«α¼á, Γá¬ªÑ ¼«-
- ªÑΓ ó«ß»α¿¡¿¼áΓ∞ ¬«¡ßΓαπ¬Γ«α «íΩÑ¬Γ¡«ú« Γ¿»á ó ¬áτÑßΓóÑ óΓ«α«ú«
- »áαá¼ÑΓαá:
-
-
- B.Pascal 7 & Objects /UG - 233 -
-
- P := New(PSalaried, Init('Sara Adams',
- 'Account manager', 2400));
-
- é Borland Pascal «ßπΘÑßΓó½Ñ¡« Γá¬ªÑ »áαώѽ∞¡«Ñ αáßΦ¿αÑ¡¿Ñ
- »α«µÑñπαδ Disαose, φΓ« »«ñα«í¡« «íßπªñáÑΓß∩ ó ß½ÑñπεΘѼ αáºñѽÑ.
-
- Åα¿¼Ñτá¡¿Ñ: ì«óá∩ ßΓá¡ñáαΓ¡á∩ »α«µÑñπαá Fail »«¼«ªÑΓ
- óá¼ ó ¬«¡ßΓαπ¬Γ«αáσ óδ»«½¡¿Γ∞ ó«ßßΓá¡«ó½Ñ¡¿Ñ »α¿ «Φ¿í¬Ñ
- (ß¼. â½áóπ 9 ó "Éπ¬«ó«ñßΓóÑ »« ∩ºδ¬π").
-
-
- ôñá½Ñ¡¿Ñ ñ¿¡á¼¿τÑ߬¿σ «íΩÑ¬Γ«ó
- ─────────────────────────────────────────────────────────────────
-
- Æá¬ªÑ, ¬á¬ ¿ «íδτ¡δÑ ºá»¿ß¿ Åá߬á½∩, αẼÑΘáѼδÑ ó ñ¿¡á¼¿-
- τÑ߬¿ αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿ »á¼∩Γ¿, «íΩѬΓδ ¼«úπΓ πñá½∩Γ∞ß∩ »α«-
- µÑñπα«⌐ Disαose, Ñß½¿ «¡¿ í«½∞ΦÑ ¡Ñ ¡πª¡δ:
-
- Disαose (P);
-
- Äñ¡á¬«, »α¿ ¿ºíáó½Ñ¡¿¿ «Γ ¡Ñ¡πª¡«ú« «íΩѬΓá ¼«ªÑΓ »«¡áñ«-
- í¿Γ∞ß∩ ¡ÑτΓ« í«½∞ΦÑÑ, τѼ »α«ßΓ«Ñ «ßó«í«ªñÑ¡¿Ñ ºá¡¿¼áѼ«⌐ ¿¼ ñ¿-
- ¡á¼¿τÑ߬«⌐ »á¼∩Γ¿. ÄíΩÑ¬Γ ¼«ªÑΓ ß«ñÑαªáΓ∞ π¬áºáΓѽ¿ ¡á ñ¿¡á¼¿τÑß-
- ¬¿Ñ ßΓαπ¬Γπαδ ¿½¿ «íΩѬΓδ, ¬«Γ«αδÑ ¡πª¡« «ßó«í«ñ¿Γ∞ ¿½¿ «τ¿ßΓ¿Γ∞
- ó «»αÑñѽѡ¡«¼ »«α∩ñ¬Ñ, «ß«íÑ¡¡« Ñß½¿ óδ «»Ñα¿απÑΓÑ ß½«ª¡«⌐ ñ¿¡á-
- ¼¿τÑ߬«⌐ ßΓαπ¬Γπα«⌐ ñá¡¡δσ. ùΓ« íδ ¡¿ ¡πª¡« í佫 ßñѽáΓ∞ ñ½∩
- «τ¿ßΓ¬¿ ñ¿¡á¼¿τÑ߬«ú« «íΩѬΓá ó ¬á¬«¼-½¿í« »«α∩ñ¬Ñ, φΓ« óßÑ ñ«½ª-
- ¡« íδΓ∞ «íΩÑñ¿¡Ñ¡« ó «ñ¿¡ ¼ÑΓ«ñ Γᬿ¼ «íαẫ¼, τΓ«íδ «íΩÑ¬Γ ¼«ú
- íδΓ∞ π¡¿τΓ«ªÑ¡ ß »«¼«Θ∞ε «ñ¡«ú« ó맮óá ¼ÑΓ«ñá:
-
- MyComαlexObject.Done;
-
- îÑΓ«ñ Done ñ«½ªÑ¡ ¿¡¬á»ßπ½¿α«óáΓ∞ óßÑ ñÑΓ὿ «τ¿ßΓ¬¿ ßó«Ñú«
- «íΩѬΓá, á Γá¬ªÑ óßÑσ ßΓαπ¬Γπα ñá¡¡δσ ¿ ó½«ªÑ¡¡δσ «íΩÑ¬Γ«ó.
-
- Åα¿¼Ñτá¡¿Ñ: îδ ß«óÑΓπѼ ¿ß»«½∞º«óáΓ∞ ñ½∩ πñá½Ñ¡¿∩ ¼Ñ-
- Γ«ñ«ó, αáí«ΓáεΘ¿σ ß «íΩѬΓἿ, ¬«Γ«αδÑ í«½ÑÑ ¡Ñ ¡πª¡δ, ¿ß-
- »«½∞º«óáΓ∞ ¿ñÑ¡Γ¿Σ¿¬áΓ«α Done.
-
- ä«»πßΓ¿¼« ¿ τáßΓ« íδóáÑΓ »«½Ñº¡« «»αÑñѽ∩Γ∞ ¡Ñ߬«½∞¬« ¼ÑΓ«-
- ñ«ó «τ¿ßΓ¬¿ ñ½∩ ñá¡¡«ú« Γ¿»á «íΩѬΓá. é ºáó¿ß¿¼«ßΓ¿ «Γ Γ«ú«, ¬á¬
- «¡¿ αẼÑΘÑ¡δ ¿½¿ ¿ß»«½∞ºπεΓß∩, ¿½¿ ó ºáó¿ß¿¼«ßΓ¿ «Γ ß«ßΓ«∩¡¿∩ ¿
- αѪ¿¼á «íΩѬΓá ¡á ¼«¼Ñ¡Γ «τ¿ßΓ¬¿, ß½«ª¡δÑ «íΩѬΓδ ¼«úπΓ »«ΓαÑí«-
- óáΓ∞ «τ¿ßΓ¬¿ ¡Ñ߬«½∞¬¿¼¿ αẽ¿τ¡δ¼¿ »πΓ∩¼¿
-
-
-
- B.Pascal 7 & Objects /UG - 234 -
-
- äÑßΓαπ¬Γ«αδ
- ─────────────────────────────────────────────────────────────────
-
- Borland Pascal »αÑñ«ßΓáó½∩ÑΓ ß»Ñµ¿á½∞¡δ⌐ Γ¿» ¼ÑΓ«ñá, ¡áºδóá-
- Ѽδ⌐ "ßí«αΘ¿¬«¼ ¼πß«αá" ¿½¿ ñÑßΓαπ¬Γ«α«¼, ñ½∩ «τ¿ßΓ¬¿ ¿ πñá½Ñ¡¿∩
- ñ¿¡á¼¿τÑ߬¿ αẼÑΘÑ¡¡«ú« «íΩѬΓá. äÑßΓαπ¬Γ«α «íΩÑñ¿¡∩ÑΓ Φáú πñá-
- ½Ñ¡¿∩ «íΩѬΓá ß ¬á¬¿¼¿-½¿í« ñαπú¿¼¿ ñÑ⌐ßΓó¿∩¼¿ ¿½¿ ºáñáτἿ, ¡Ñ-
- «íσ«ñ¿¼δ¼¿ ñ½∩ ñá¡¡«ú« Γ¿»á «íΩѬΓá. ä½∩ Ññ¿¡ßΓóÑ¡¡«ú« Γ¿»á «íΩ-
- ѬΓá ¼«ª¡« «»αÑñѽ¿Γ∞ ¡Ñ߬«½∞¬« ñÑßΓαπ¬Γ«α«ó.
-
- äÑßΓαπ¬Γ«α «»αÑñѽ∩ÑΓß∩ ß«ó¼ÑßΓ¡« ß« óßѼ¿ ñαπú¿¼¿ ¼ÑΓ«ñἿ
- «íΩѬΓá ó «»αÑñѽѡ¿¿ Γ¿»á «íΩѬΓá:
-
- tyαe
- TEmployee = object
- Name: string[25];
- Title: string[25];
- Rate: Real;
- constructor Init(AName, ATitle: String; ARate: Real);
- destructor Done; virtual;
- function GetName: String;
- function GetTitle: String;
- function GetRate: Rate; virtual;
- function GetPayAmount: Real; virtual;
- end;
-
- äÑßΓαπ¬Γ«αδ ¼«ª¡« ¡áß½Ññ«óáΓ∞, ¿ «¡¿ ¼«úπΓ íδΓ∞ ½¿í« ßΓáΓ¿-
- τÑ߬¿¼¿, ½¿í« ó¿αΓπá½∞¡δ¼¿. ū߬«½∞¬π αẽ¿τ¡δÑ »α«úαá¼¼δ ºáóÑα-
- ΦÑ¡¿∩ «íδτ¡« ΓαÑíπεΓ αẽ¿τ¡δÑ Γ¿»δ «íΩÑ¬Γ«ó, ¼δ αѬ«¼Ñ¡ñπѼ,
- τΓ«íδ ñÑßΓαπ¬Γ«αδ óßÑúñá í뫨 ó¿αΓπá½∞¡δ¼¿, í½áú«ñáα∩ τѼπ ñ½∩
- ¬áªñ«ú« Γ¿»á «íΩѬΓá íπñÑΓ óδ»«½¡Ñ¡ »αáó¿½∞¡δ⌐ ñÑßΓαπ¬Γ«α.
-
- çừ¼¡¿ΓÑ, τΓ« ºáαѺÑαó¿α«óá¡¡«Ñ ß½«ó« destructor ¡Ñ ΓαÑíπ-
- ÑΓß∩ π¬áºδóáΓ∞ ñ½∩ ¬áªñ«ú« ¼ÑΓ«ñá «τ¿ßΓ¬¿, ñáªÑ Ñß½¿ «»αÑñѽѡ¿Ñ
- Γ¿»á «íΩѬΓá ß«ñÑαª¿Γ ó¿αΓπá½∞¡δÑ ¼ÑΓ«ñδ. äÑßΓαπ¬Γ«αδ ó ñÑ⌐ßΓó¿-
- Γѽ∞¡«ßΓ¿ αáí«ΓáεΓ Γ«½∞¬« ß ñ¿¡á¼¿τÑ߬¿ αẼÑΘÑ¡¡δ¼¿ «íΩѬΓἿ.
- Åα¿ «τ¿ß⪥ ñ¿¡á¼¿τÑ߬¿ αẼÑΘÑ¡¡«ú« «íΩѬΓá, ñÑßΓαπ¬Γ«α «ßπΘÑßΓ-
- ó½∩ÑΓ ß»Ñµ¿á½∞¡δÑ Σπ¡¬µ¿¿: «¡ úáαá¡Γ¿απÑΓ, τΓ« ó ñ¿¡á¼¿τÑ߬¿
- αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿ »á¼∩Γ¿ óßÑúñá íπñÑΓ «ßó«í«ªñáΓ∞ß∩ »αáó¿½∞-
- ¡«Ñ τ¿ß½« íá⌐Γ«ó. ìÑ ¼«ªÑΓ íδΓ∞ ¡¿¬á¬¿σ «»áßÑ¡¿⌐ »« »«ó«ñπ ¿ß-
- »«½∞º«óá¡¿∩ ñÑßΓαπ¬Γ«αá »α¿¼Ñ¡¿Γѽ∞¡« ¬ ßΓáΓ¿τÑ߬¿ αẼÑΘÑ¡¡δ¼
- «íΩѬΓá¼; Σá¬Γ¿τÑ߬¿, ¡Ñ »ÑαÑñáóá∩ Γ¿»á «íΩѬΓá ñÑßΓαπ¬Γ«απ, óδ
- ½¿ΦáÑΓÑ «íΩÑ¬Γ ñá¡¡«ú« Γ¿»á »«½¡δσ »αÑ¿¼πΘÑßΓó π»αáó½Ñ¡¿∩ ñ¿¡á¼¿-
- τÑ߬«⌐ »á¼∩Γ∞ε ó Borland Pascal.
-
- äÑßΓαπ¬Γ«αδ ó ñÑ⌐ßΓó¿Γѽ∞¡«ßΓ¿ ßΓá¡«ó∩Γß∩ ßἿ¼¿ ß«í«ε Γ«ú-
- ñá, ¬«úñá ñ«½ª¡δ «τ¿ΘáΓ∞ß∩ »«½¿¼«αΣ¿τÑ߬¿Ñ «íΩѬΓδ ¿ ¬«úñá ñ«½ª¡á
- «ßó«í«ªñáΓ∞ß∩ ºá¡¿¼áѼá∩ ¿¼¿ »á¼∩Γ∞. Å«½¿¼«αΣ¿τÑ߬¿Ñ «íΩѬΓδ -
- φΓ« ΓÑ «íΩѬΓδ, ¬«Γ«αδÑ í뫨 »α¿ßó«Ñ¡δ α«ñ¿Γѽ∞߬«¼π Γ¿»π í½áú«-
- ñáα∩ »αáó¿½á¼ ß«ó¼ÑßΓ¿¼«ßΓ¿ αáßΦ¿αÑ¡¡δσ Γ¿»«ó Borland Pascal. ¥¬-
- ºÑ¼»½∩α «íΩѬΓá Γ¿»á THourly, »α¿ßó«Ñ¡¡δ⌐ »ÑαѼѡ¡«⌐ Γ¿»á
- TEmployee, ∩ó½∩ÑΓß∩ »α¿¼Ñα«¼ »«½¿¼«αΣ¿τÑ߬«ú« «íΩѬΓá. ¥Γ¿ »αáó¿-
- ½á Γá¬ªÑ ¼«úπΓ íδΓ∞ »α¿¼Ñ¡Ñ¡δ ¬ «íΩѬΓá¼; π¬áºáΓѽ∞ ¡á THourly
-
- B.Pascal 7 & Objects /UG - 235 -
-
- ¼«ªÑΓ ßó«í«ñ¡« íδΓ∞ »α¿ßó«Ñ¡ π¬áºáΓÑ½ε ¡á TEmployee, á π¬áºπѼδ⌐
- φΓ¿¼ π¬áºáΓѽѼ «íΩÑ¬Γ «»∩Γ∞ ªÑ íπñÑΓ »«½¿¼«αΣ¿τÑ߬¿¼ «íΩÑ¬Γ«¼.
-
- ÆÑନ¡ "»«½¿¼«αΣ¿τÑ߬¿⌐" ∩ó½∩ÑΓß∩ »«ñσ«ñ∩Θ¿¼, Γᬠ¬á¬ ¬«ñ,
- «íαáíáΓδóáεΘ¿⌐ «íΩѬΓ, ¡Ñ º¡áÑΓ Γ«τ¡« ó« óαѼ∩ ¬«¼»¿½∩µ¿¿, ¬á¬«⌐
- Γ¿» «íΩѬΓá Ѽπ »α¿ñÑΓß∩ ó ¬«¡µÑ ¬«¡µ«ó «íαáí«ΓáΓ∞. àñ¿¡ßΓóÑ¡¡«Ñ,
- τΓ« «¡ º¡áÑΓ, φΓ« Γ«, τΓ« φëà «íΩÑ¬Γ »α¿¡áñ½Ñª¿Γ ¿Ñαáασ¿¿ «íΩѬ-
- Γ«ó, ∩ó½∩εΘ¿σß∩ »«Γ«¼¬á¼¿ π¬áºá¡¡«ú« Γ¿»á «íΩѬΓá.
-
- ÄτÑó¿ñ¡«, τΓ« αẼÑαδ Γ¿»«ó «íΩÑ¬Γ«ó «Γ½¿τáεΓß∩. Å«φΓ«¼π,
- ¬«úñá ¡áßΓπ»áÑΓ óαѼ∩ «τ¿ßΓ¬¿ αẼÑΘÑ¡¡«ú« ó ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿
- »«½¿¼«αΣ¿τÑ߬«ú« «íΩѬΓá, Γ« ¬á¬ ªÑ Disαose πº¡áÑΓ, ߬«½∞¬« íá⌐Γ
- ñ¿¡á¼¿τÑ߬«ú« »α«ßΓαá¡ßΓóá ¡πª¡« «ßó«í«ªñáΓ∞? é« óαѼ∩ ¬«¼»¿½∩µ¿¿
- ¿º »«½¿¼«αΣ¿τÑ߬«ú« «íΩѬΓá ¡Ñ½∞º∩ ¿ºó½Ñτ∞ ¡¿¬á¬«⌐ ¿¡Σ«α¼áµ¿¿ «Γ-
- ¡«ß¿Γѽ∞¡« αẼÑαá «íΩѬΓá.
-
- äÑßΓαπ¬Γ«α αáºαÑΦáÑΓ φΓπ ú«½«ó«½«¼¬π »πΓѼ «íαáΘÑ¡¿∩ ¬ Γ«¼π
- ¼ÑßΓπ, úñÑ φΓá ¿¡Σ«α¼áµ¿∩ ºá»¿ßá¡á: ó Æéî »ÑαѼѡ¡δσ αÑ὿ºáµ¿⌐.
- é ¬áªñ«⌐ Æéî Γ¿»á «íΩѬΓá ß«ñÑনΓß∩ αẼÑα ó íá⌐Γáσ ñá¡¡«ú« Γ¿»á
- «íΩѬΓá. Æáí½¿µá ó¿αΓπá½∞¡δσ ¼ÑΓ«ñ«ó ½εí«ú« «íΩѬΓá ñ«ßΓπ»¡á »«ß-
- αÑñßΓó«¼ ß¬αδΓ«ú« »áαá¼ÑΓαá Self, »«ßδ½áѼ«ú« ¼ÑΓ«ñπ »α¿ ó맮óÑ
- ¼ÑΓ«ñá. äÑßΓαπ¬Γ«α ∩ó½∩ÑΓß∩ óßÑú« ½¿Φ∞ αạ«ó¿ñ¡«ßΓ∞ε ¼ÑΓ«ñá ¿
- »«φΓ«¼π, ¬«úñá «íΩÑ¬Γ óδºδóáÑΓ Ñú«, ñÑßΓαπ¬Γ«α »«½πτáÑΓ ¬«»¿ε
- Self τÑαѺ ßΓѬ. Æá¬¿¼ «íαẫ¼, Ñß½¿ «íΩÑ¬Γ ∩ó½∩ÑΓß∩ »«½¿¼«αΣ¿-
- τÑ߬¿¼ ó« óαѼ∩ ¬«¼»¿½∩µ¿¿, «¡ ¡¿¬«úñá ¡Ñ íπñÑΓ »«½¿¼«αΣ¿τÑ߬¿¼
- ó« óαѼ∩ óδ»«½¡Ñ¡¿∩ í½áú«ñáα∩ »«ºñ¡Ñ¼π ßó∩ºδóá¡¿ε.
-
- ä½∩ óδ»«½¡Ñ¡¿∩ φΓ«ú« «ßó«í«ªñÑ¡¿∩ »á¼∩Γ¿ »α¿ »«ºñ¡Ñ¼ ßó∩ºδ-
- óá¡¿¿ ñÑßΓαπ¬Γ«α ¡πª¡« óδºδóáΓ∞, ¬á¬ τáßΓ∞ αáßΦ¿αÑ¡¡«ú« ß¿¡Γá¬ß¿-
- ßá »α«µÑñπαδ Disαose:
-
- Disαose(P, Done);
-
- (é맮ó ñÑßΓαπ¬Γ«αá ó¡Ñ »α«µÑñπαδ Disαose ó««íΘÑ ¡Ñ óδ»«½¡∩ÑΓ
- ¡¿¬á¬«ú« «ßó«í«ªñÑ¡¿∩ »á¼∩Γ¿.) çñÑß∞ »α«¿ßσ«ñ¿Γ ¡á ßἫ¼ ñÑ½Ñ Γ«,
- τΓ« ßí«αΘ¿¬ ¼πß«αá «íΩѬΓá, ¡á ¬«Γ«αδ⌐ π¬áºδóáÑΓ P, óδ»«½¡∩ÑΓß∩
- ¬á¬ «íδτ¡δ⌐ ¼ÑΓ«ñ. Äñ¡á¬«, ¬á¬ Γ«½∞¬« »«ß½Ññ¡ÑÑ ñÑ⌐ßΓó¿Ñ óδ»«½¡Ñ-
- ¡«, ñÑßΓαπ¬Γ«α ¿ΘÑΓ αẼÑα αÑ὿ºáµ¿¿ ßó«Ñú« Γ¿»á ó Æéî ¿ »ÑαÑßδ-
- ½áÑΓ αẼÑα »α«µÑñπαÑ Disαose. Åα«µÑñπαá Disαose ºáóÑαΦáÑΓ »α«-
- µÑßß »πΓѼ πñá½Ñ¡¿∩ »αáó¿½∞¡«ú« τ¿ß½á íá⌐Γ »α«ßΓαá¡ßΓóá ñ¿¡á¼¿-
- τÑ߬«⌐ »á¼∩Γ¿, ¬«Γ«α«Ñ (»α«ßΓαá¡ßΓó«) ñ« φΓ«ú« «Γ¡«ß¿½«ß∞ ¬ P^.
- ù¿ß½« «ßó«í«ªñáѼδσ íá⌐Γ íπñÑΓ »αáó¿½∞¡δ¼ ¡Ñºáó¿ß¿¼« «Γ Γ«ú«,
- π¬áºδóá½ ½¿ P ¡á φ¬ºÑ¼»½∩α Γ¿»á TSalaried, ¿½¿ «¡ π¬áºδóá½ ¡á
- «ñ¿¡ ¿º ñ«τÑα¡¿σ Γ¿»«ó Γ¿»á TSalaried, ¡á»α¿¼Ñα, ¡á
- TCommissioned.
-
- çá¼ÑΓ∞ΓÑ, τΓ« ßá¼ »« ßÑíÑ ¼ÑΓ«ñ ñÑßΓαπ¬Γ«αá ¼«ªÑΓ íδΓ∞ »πßΓ
- ¿ óδ»«½¡∩Γ∞ Γ«½∞¬« φΓπ Σπ¡¬µ¿ε:
-
- destructor AnObject.Done;
- begin
- end;
-
-
- B.Pascal 7 & Objects /UG - 236 -
-
- Æ«, τΓ« ñѽáÑΓß∩ »«½Ñº¡«ú« ó φΓ«¼ ñÑßΓαπ¬Γ«αÑ, ¡Ñ ∩ó½∩ÑΓß∩
- ñ«ßΓ«∩¡¿Ñ¼ Ñú« Γѽá, «ñ¡á¬« »α¿ φΓ«¼ ¬«¼»¿½∩Γ«α«¼ úÑ¡Ñα¿απÑΓß∩
- ¬«ñ φ»¿½«úá ó «ΓóÑΓ ¡á ºáαѺÑαó¿α«óá¡¡«Ñ ß½«ó« destructor. ¥Γ«
- ¡á»«¼¿¡áÑΓ ¼«ñπ½∞, ¬«Γ«αδ⌐ ¡¿τÑú« ¡Ñ φ¬ß»«αΓ¿απÑΓ, ¡« ¬«Γ«αδ⌐
- «ßπΘÑßΓó½∩ÑΓ ¡Ñ¬«Γ«αδÑ ¡Ñó¿ñ¿¼δÑ ñÑ⌐ßΓó¿∩ ºá ßτÑΓ óδ»«½¡Ñ¡¿∩ ßó«-
- Ñ⌐ ßѬµ¿¿ ¿¡¿µ¿á½¿ºáµ¿¿ »ÑαÑñ ßΓáαΓ«¼ »α«úαá¼¼δ. éßÑ ñÑ⌐ßΓó¿∩
- »α«¿ßσ«ñ∩Γ "ºá ¬π½¿ßἿ".
-
-
- Åα¿¼Ñα αẼÑΘÑ¡¿∩ ñ¿¡á¼¿τÑ߬«ú« «íΩѬΓá
- ─────────────────────────────────────────────────────────────────
-
- ū߽Ññ¡¿⌐ »α¿¼Ñα »α«úαá¼¼δ ñáßΓ óἠ󫺼«ª¡«ßΓ∞ »α¿«íαÑßΓ¿
- ¡Ñ¬«Γ«αδÑ ¡áó모 ó ¿ß»«½∞º«óá¡¿¿ αẼÑΘÑ¡¡δσ ó ñ¿¡á¼¿τÑ߬«⌐ »á¼∩-
- Γ¿ «íΩÑ¬Γ«ó, ó¬½ετá∩ ¿ß»«½∞º«óá¡¿Ñ ñ½∩ πñá½Ñ¡¿∩ «íΩѬΓá ñÑßΓαπ¬-
- Γ«αá. Åα«úαá¼¼á »«¬áºδóáÑΓ, ¬á¬ ó ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿ ¼«ªÑΓ íδΓ∞
- ß«ºñá¡ ßó∩ºá¡¡δ⌐ ß»¿ß«¬ αáí«τ¿σ «íΩÑ¬Γ«ó ¿ ¬á¬ «¡ ºá ¡Ñ¡áñ«í-
- ¡«ßΓ∞ε ¼«ªÑΓ íδΓ∞ «τ¿ΘÑ¡ »α¿ »«¼«Θ¿ ñÑßΓαπ¬Γ«αá.
-
- Å«ßΓα«Ñ¡¿Ñ ßó∩ºá¡¡«ú« ß»¿ß¬á «íΩÑ¬Γ«ó ΓαÑíπÑΓ, τΓ«íδ ¬áªñδ⌐
- «íΩÑ¬Γ ß«ñÑαªá½ π¬áºáΓѽ∞ ¡á ß½ÑñπεΘ¿⌐ «íΩÑ¬Γ ß»¿ß¬á. Æ¿»
- TEmployee ¡Ñ ß«ñÑαª¿Γ Γᬿσ π¬áºáΓѽÑ⌐. Åα«ßΓδ¼ óδσ«ñ«¼ ¿º φΓ«⌐
- ß¿Γπᵿ¿ í佫 íδ ñ«íáó½Ñ¡¿Ñ π¬áºáΓѽ∩ ó TEmployee , í½áú«ñáα∩ τÑ-
- ¼π ¼«ª¡« íδΓ∞ πóÑαÑ¡¡δ¼, τΓ« óßÑ »«Γ«¼¬¿ TEmployee ¡áß½ÑñπεΓ Γá-
- ¬«⌐ π¬áºáΓѽ∞. Äñ¡á¬«, ñ«íáó½Ñ¡¿Ñ τÑú«-½¿í« ó TEmployee ΓαÑíπÑΓ
- «Γ óáß ¡á½¿τ¿∩ ¿ßσ«ñ¡«ú« ¬«ñá, á ¬á¬ ú«ó«α¿½«ß∞ αá¡ÑÑ, «ñ¡¿¼ ¿º
- »αÑ¿¼πΘÑßΓó «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¿α«óá¡¿∩ ∩ó½∩ÑΓß∩
- 󫺼«ª¡«ßΓ∞ αáßΦ¿αÑ¡¿∩ «íΩÑ¬Γ«ó íѺ ¡Ñ«íσ«ñ¿¼«ßΓ¿ ¿σ »ÑαѬ«¼»¿½∩-
- 樨.
-
- ÉÑΦÑ¡¿Ñ, ¬«Γ«α«Ñ ¡Ñ ΓαÑíπÑΓ ¡¿¬á¬¿σ ¿º¼Ñ¡Ñ¡¿⌐ TEmployee,
- ß«ºñáÑΓ ¡«óδ⌐ Γ¿» «íΩѬΓá, ¡Ñ ∩ó½∩εΘ¿⌐ß∩ »«Γ«¼¬«¼ TEmployee. Æ¿»
- StaffList »αÑñßΓáó½∩ÑΓ ß«í«⌐ «τÑ¡∞ »α«ßΓ«⌐ «íΩѬΓ, µÑ½∞ε ¬«Γ«α«ú«
- ∩ó½∩ÑΓß∩ ß«ºñá¡¿Ñ ºáú«½«ó¬«ó ñ½∩ «íΩÑ¬Γ«ó Γ¿»á TEmployee. Æá¬ ¬á¬
- TEmployee ¡Ñ ß«ñÑαª¿Γ ¡¿¬á¬¿σ π¬áºáΓѽÑ⌐ ¡á ß½ÑñπεΘ¿⌐ «íΩÑ¬Γ ó
- ß»¿ß¬Ñ, Γ« »α«ßΓ«⌐ Γ¿» ºá»¿ß¿ TNode «ßπΘÑßΓó½∩ÑΓ φëà ßÑαó¿ß.
- TNode ñáªÑ »α«ΘÑ, τѼ StaffList ó Γ«¼, τΓ« TNode ¡Ñ ∩ó½∩ÑΓß∩ «íΩ-
- Ñ¬Γ«¼, ¡Ñ ß«ñÑαª¿Γ ¡¿ «ñ¡«ú« ¼ÑΓ«ñá ¿ ¡Ñ ¿¼ÑÑΓ ¡¿¬á¬¿σ ñá¡¡δσ, ºá
- ¿ß¬½ετÑ¡¿Ñ¼ π¬áºáΓѽ∩ ¡á Γ¿» TEmployee ¿ π¬áºáΓѽ∩ ¡á ß½ÑñπεΘ¿⌐
- πºÑ½ ß»¿ß¬á.
-
- TStaffList ß«ñÑαª¿Γ ¼ÑΓ«ñ, ¬«Γ«αδ⌐ »«ºó«½∩ÑΓ Ñ¼π ñ«íáó½∩Γ∞
- ¡«ó«ú« αáí«τÑú« ó ßó∩ºá¡¡δ⌐ ß»¿ß«¬ ºá»¿ßÑ⌐ TNode »πΓѼ ó¡ÑßÑ¡¿Ñ
- ¡«ó«ú« φ¬ºÑ¼»½∩αá TNode ¡Ñ»«ßαÑñßΓóÑ¡¡« »«ß½Ñ ßἫú« ßÑí∩ ó ¬á-
- τÑßΓóÑ π¬áºπѼ«ú« ß »«¼«Θ∞ε π¬áºáΓѽ∩ »«½∩ TNodes. îÑΓ«ñ Add »α¿-
- ¡¿¼áÑΓ π¬áºáΓѽ∞ ¡á «íΩÑ¬Γ Γ¿»á TEmployee, ¡« ¡Ñ ßá¼ «íΩѬΓ.
- êº-ºá αáßΦ¿αÑ¡¡«⌐ ß«ó¼ÑßΓ¿¼«ßΓ¿ Γ¿»«ó Æπαí« Åá߬á½∩ π¬áºáΓѽ¿ ¡á
- ½εí«ú« »«Γ«¼¬á Γ¿»á TEmployee Γá¬ªÑ ñ«½ª¡δ »ÑαÑñáóáΓ∞ß∩ ó
- TList.Add ó »áαá¼ÑΓαÑ Item.
-
- Åα«úαá¼¼á WorkList «»¿ßδóáÑΓ ßΓáΓ¿τÑ߬πε »ÑαѼѡ¡πε Staff
- Γ¿»á TStaffList ¿ ßΓα«¿Γ ßó∩ºá¡¡δ⌐ ß»¿ß«¬ ¿º »∩Γ¿ πº½«ó. èáªñδ⌐
- πºÑ½ π¬áºδóáÑΓ ¡á «Γñѽ∞¡δ⌐ αáí«τ¿⌐ «íΩѬΓ, ¬«Γ«αδ⌐ ∩ó½∩ÑΓß∩ ½¿í«
-
- B.Pascal 7 & Objects /UG - 237 -
-
- TEmployee, ½¿í« «ñ¡¿¼ ¿º Ñú« »«Γ«¼¬«ó. ÅÑαÑñ ß«ºñ᡿Ѽ ¬áªñ«ú«
- ñ¿¡á¼¿τÑ߬«ú« «íΩѬΓá ¿ »«ß½Ñ Γ«ú«, ¬á¬ «íΩÑ¬Γ ß«ºñá¡, ó«ºóαáΘáÑΓ
- τ¿ß½« íá⌐Γ ßó«í«ñ¡«⌐ ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿. ìᬫ¡Ñµ, »«½¡á∩ ßΓαπ¬-
- Γπαá, ó¬½ετáεΘá∩ »∩Γ∞ ºá»¿ßÑ⌐ TNode ¿ »∩Γ∞ «íΩÑ¬Γ«ó Γ¿»á
- TEmployee, «τ¿ΘáÑΓß∩ ¿ πñá½∩ÑΓß∩ ¿º ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿ ß »«¼«Θ∞ε
- «ñ¡«ú« ó맮óá ñÑßΓαπ¬Γ«αá ßΓáΓ¿τÑ߬«ú« «íΩѬΓá Staff Γ¿»á
- TStaffList.
-
-
- B.Pascal 7 & Objects /UG - 238 -
-
-
- │
-
- List │ Node Node Node
- ┌───────┐ ┌────┬────┐ ┌────┬────┐ ┌────┬────┐
- │ │ │ │ │ │ │ │ │ │ │ │
- │ O──┼────> │ O │ O─┼───> │ O │ O─┼────> │ O │ O─┼───┐
- │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │
- └───────┘ └──┼─┴────┘ └──┼─┴────┘ └──┼─┴────┘ │
- │ │ │ │ ──┴──
- v v v ───
- │ ┌─────────────┐ ┌─────────────┐ ┌─────────────┐ ─
- │ Name │ │ Name │ │ Name │
- │ ├─────────────┤ ├─────────────┤ ├─────────────┤
- │ Title │ │ Title │ │ Title │
- │ ├─────────────┤ ├─────────────┤ ├─────────────┤
- │ Rate │ │ Rate │ │ Rate │
- │ ├─────────────┤ ├─────────────┤ ├─────────────┤
- │ │ │ │ │ │
- æÑú¼Ñ¡Γ │ 信ἿτÑ߬¿ αáß»αÑñѽ∩Ѽá∩ «í½áßΓ∞
- ñá¡¡δσ »á¼∩Γ¿ (ñ¿¡á¼¿τÑ߬¿⌐)
- (ßΓáΓ¿τÑ߬¿Ñ│
- «íΩѬΓδ)
- │
-
- É¿ß. 9.2 æσѼá ßΓαπ¬Γπα ñá¡¡δσ »α«úαá¼¼δ ListDemo.
-
- ôñá½Ñ¡¿Ñ ß½«ª¡«⌐ ßΓαπ¬Γπαδ ñá¡¡δσ ¿º ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿
-
- äÑßΓαπ¬Γ«α Staff.Done ßΓ«¿Γ Γ«ú«, τΓ«íδ αáßß¼«ΓαÑΓ∞ Ñú« ó¡¿-
- ¼áΓѽ∞¡«. ô¡¿τΓ«ªÑ¡¿Ñ «íΩѬΓá TStaffList ó¬½ετáÑΓ πñá½Ñ¡¿Ñ ΓαÑσ
- αẽ¿τ¡δσ Γ¿»«ó ßΓαπ¬Γπα: »«½¿¼«αΣ¿τÑ߬¿σ «íΩÑ¬Γ«ó αáí«τ¿σ ßΓαπ¬-
- Γπα ó ß»¿ß¬Ñ, ºá»¿ßÑ⌐ TNode, »«ññÑনóáεΘ¿σ ß»¿ß«¬, ¿ (Ñß½¿ «¡
- αẼÑΘÑ¡ ó ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿) «íΩÑ¬Γ TList, ¬«Γ«αδ⌐ «ºáú½áó½¿-
- óáÑΓ ß»¿ß«¬. éÑß∞ »α«µÑßß ºá»π߬áÑΓß∩ »πΓѼ Ññ¿¡ßΓóÑ¡¡«ú« ó맮óá
- ñÑßΓαπ¬Γ«αá «íΩѬΓá TStaffList:
-
- Staff.Done;
-
- è«ñ ñÑßΓαπ¬Γ«αá ºáß½πª¿óáÑΓ í«½ÑÑ »«ñα«í¡«ú« ¿ºπτÑ¡¿∩:
-
- destructor StaffList.Done;
- var
- N: TNodePtr;
- begin
- while TNodes <> nil do
- begin
- N := TNodes;
- Disαose(N^.Item, Done);
- TNodes := N^.Next;
- Disαose (N);
- end;
- end;
-
- B.Pascal 7 & Objects /UG - 239 -
-
-
- 滿߫¬ «τ¿ΘáÑΓß∩ ¡áτ¿¡á∩ ß "ú«½«óδ" ß»¿ß¬á ß »«¼«Θ∞ε á½ú«-
- α¿Γ¼á "¿º α㪨 ó απ¬π", ¬«Γ«αδ⌐ ñ« ¡Ñ¬«Γ«α«⌐ ßΓѻѡ¿ ¡á»«¼¿¡áÑΓ
- ñÑαúá¡∞Ñ ºá óÑαÑó¬π ó«ºñπΦ¡«ú« º¼Ñ∩: ñóá π¬áºáΓѽ∩ (π¬áºáΓѽ∞
- TNodes ó¡πΓα¿ Staff ¿ αáí«τ¿⌐ π¬áºáΓѽ∞ N) ¿º¼Ñ¡∩εΓ ßó«¿ ßß佬¿ ó
- ß»¿ß¬Ñ, Γ«úñá ¬á¬ »Ñαóδ⌐ φ½Ñ¼Ñ¡Γ ß»¿ß¬á πñá½∩ÑΓß∩. é맮ó »α«µÑñπ-
- αδ Disαose «ßó«í«ªñáÑΓ »á¼∩Γ∞, ºá¡¿¼áѼπε »Ñαóδ¼ «íΩÑ¬Γ«¼
- TEmployee ó ß»¿ß¬Ñ (Item^), ºáΓѼ TNodes »α«ñó¿úáÑΓß∩ ¡á ß½Ññπε-
- Θπε ºá»¿ß∞ ß»¿ß¬á ß »«¼«Θ∞ε «»ÑαáΓ«αá TNodes := N^.Next, ßá¼á ºá-
- »¿ß∞ TNode πñá½∩ÑΓß∩, ¿ »α«µÑßß »α«ñ«½ªáÑΓß∩ ñ« »«½¡«ú« «τ¿ΘÑ¡¿∩
- ᯨ᪠.
-
- éáª¡δ¼ ¼«¼Ñ¡Γ«¼ ó ñÑßΓαπ¬Γ«αÑ Done ∩ó½∩ÑΓß∩ ß»«ß«í, ¬«Γ«αδ¼
- πñá½∩εΓß∩ ¿º ß»¿ß¬á «íΩѬΓδ TEmployee:
-
- Disαose(N.Item, Done);
-
- çñÑß∞ N.Item ∩ó½∩ÑΓß∩ »Ñαóδ¼ «íΩÑ¬Γ«¼ TEmployee ó ß»¿ß¬Ñ, á
- óδºδóáѼδ⌐ ¼ÑΓ«ñ Done ∩ó½∩ÑΓß∩ ñÑßΓαπ¬Γ«α«¼ φΓ«ú« «íΩѬΓá. çừ¼-
- ¡¿ΓÑ, τΓ« ñÑ⌐ßΓó¿Γѽ∞¡δ⌐ Γ¿» N^.Item^ ¡Ñ «í∩ºáΓѽ∞¡« ∩ó½∩ÑΓß∩ Γ¿-
- »«¼ TEmployee, «ñ¡á¬« «¡ ¼«ªÑΓ íδΓ∞ ½εíδ¼ ñ«τÑα¡¿¼ Γ¿»«¼ Γ¿»á
- TEmployee. Äτ¿ΘáѼδ⌐ «íΩÑ¬Γ ∩ó½∩ÑΓß∩ »«½¿¼«αΣ¿τÑ߬¿¼ ¿ »«φΓ«¼π
- ¡Ñ½∞º∩ ßñѽáΓ∞ ¡¿¬á¬¿σ »αÑñ»«½«ªÑ¡¿⌐ «Γ¡«ß¿Γѽ∞¡« Ñú« ñÑ⌐ßΓó¿-
- Γѽ∞¡«ú« αẼÑαá ¿½¿ Γ«τ¡«ú« Ñú« Γ¿»á ¡á φΓá»Ñ ¬«¼»¿½∩µ¿¿. é »α¿-
- óÑñÑ¡¡«¼ óδΦÑ ó맮óÑ Disαose, ¬á¬ Γ«½∞¬« Done óδ»«½¡¿Γ óßÑ ß«ñÑα-
- ªáΘ¿Ñß∩ ó ¡Ñ¼ «»ÑαáΓ«αδ, "¡Ñó¿ñ¿¼δ⌐" ¬«ñ φ»¿½«úá ¿ΘÑΓ αẼÑα αÑá-
- ½¿ºáµ¿¿ «τ¿ΘáѼ«ú« «íΩѬΓá ó Æéî φΓ«ú« «íΩѬΓá. îÑΓ«ñ Done »ÑαÑ-
- ñáÑΓ αẼÑα »α«µÑñπαÑ Disαose, ¬«Γ«αá∩ ºáΓѼ «ßó«í«ªñáÑΓ Γ«τ¡«Ñ
- ¬«½¿τÑßΓó« ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿, ó ñÑ⌐ßΓó¿Γѽ∞¡«ßΓ¿ ºá¡¿¼áѼ«⌐ »«-
- ½¿¼«αΣ¿τÑ߬¿¼ «íΩÑ¬Γ«¼.
-
- Å«¼¡¿ΓÑ, τΓ« Ñß½¿ ñ«½ª¡« «ßó«í«ªñáΓ∞ß∩ »αáó¿½∞¡«Ñ ¬«½¿τÑßΓó«
- ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿, Γ« »«½¿¼«αΣ¿τÑ߬¿⌐ «íΩÑ¬Γ ñ«½ªÑ¡ «τ¿ΘáΓ∞ß∩
- Γ«½∞¬« »«ßαÑñßΓó«¼ ó맮óá »ÑαÑñáóáѼ«ú« Disαose ñÑßΓαπ¬Γ«αá.
-
- é »α¿¼ÑαÑ »α«úαá¼¼δ Staff «íΩ∩ó½∩ÑΓß∩ ¬á¬ ßΓáΓ¿τÑ߬á∩ »ÑαÑ-
- ¼Ñ¡¡á∩ ó ßÑú¼Ñ¡ΓÑ ñá¡¡δσ. Staff ¼«ú íδ ßΓ«½∞ ªÑ ½Ñú¬« αẼÑßΓ¿Γ∞-
- ß∩ ó ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿ ¿ "»α¿¬αÑ»¿Γ∞ß∩ ¬ αÑá½∞¡«¼π ¼¿απ" »«ß-
- αÑñßΓó«¼ π¬áºáΓѽ∩ Γ¿»á ListPtr. àß½¿ ºáú«½«ó«¬ ß»¿ß¬á Γá¬ªÑ ∩ó-
- ½∩ÑΓß∩ ñ¿¡á¼¿τÑ߬¿¼ «íΩÑ¬Γ«¼, Γ« πñá½Ñ¡¿Ñ ßΓαπ¬Γπαδ ¼«ª¡« «ßπ-
- ΘÑßΓó¿Γ∞ »πΓѼ ó맮óá ñÑßΓαπ¬Γ«αá, óδ»«½¡∩εΘÑú«ß∩ ó¡πΓα¿ Disαose:
-
- var
- Staff: TStaffListPtr;
- begin
- Disαose(Staff, Done);
- .
- .
- .
-
- çñÑß∞ »α«µÑñπαá Disαose óδºδóáÑΓ ¼ÑΓ«ñ ñÑßΓαπ¬Γ«αá Done ñ½∩
- «τ¿ßΓ¬¿ ßΓαπ¬Γπαδ ó ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿. çáΓѼ, ¬«úñá Done ºáóÑα-
- ΦáÑΓß∩, Disαose «ßó«í«ªñáÑΓ »á¼∩Γ∞, ¡á ¬«Γ«απε π¬áºδóáÑΓ Staff,
-
- B.Pascal 7 & Objects /UG - 240 -
-
- πñá½∩∩, ¬á¬ »αá󿽫, ¿º ñ¿¡á¼¿τÑ߬«⌐ »á¼∩Γ¿ Γá¬ªÑ ¿ ºáú«½«ó«¬
- ᯨ᪠.
-
- Åα«úαá¼¼á WORKLIST.PAS (¡áσ«ñ∩Θá∩ß∩ ¡á óáΦѼ ñ¿ß¬Ñ) ¿ß»«½∞-
- ºπÑà ëà ªÑ ¼«ñπ½∞ WORKERS.PAS, τΓ« ¿ αá¡∞ΦÑ Ä¡á ß«ºñáÑΓ «íΩѬΓ
- List, ∩ó½∩εΘ¿⌐ß∩ «ú½áó½Ñ¡¿Ñ¼ ßó∩ºá¡¡«ú« ß»¿ß¬á ¿º »∩Γ¿ »«½¿¼«αΣ¿-
- τÑ߬¿σ «íΩÑ¬Γ«ó, ß«ó¼ÑßΓ¿¼δσ ß TEmployee, á ºáΓѼ πñá½∩ÑΓ óßε ñ¿-
- ¡á¼¿τÑ߬πε ßΓαπ¬Γπαπ ñá¡¡δσ ß »«¼«Θ∞ε Ññ¿¡ßΓóÑ¡¡«ú« ó맮óá ñÑßΓ-
- απ¬Γ«αá Staff.Done.
-
- ùΓ« ªÑ ñá½∞ΦÑ?
- ─────────────────────────────────────────────────────────────────
-
- èᬠ¿ ó« óß∩¬«¼ ñαπú«¼ á߻ѬΓÑ ¼áΦ¿¡¡«ú« »α«úαá¼¼¿α«óá¡¿∩,
- óδ ¡Ñ »αÑπß»ÑÑΓÑ ó «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«¼ »α«úαá¼¼¿α«óá¡¿¿, Ñß-
- ½¿ íπñÑΓÑ Γ«½∞¬« τ¿ΓáΓ∞ « ¡Ñ¼, ¡« óδ ñ«íΩÑΓÑß∞ αѺπ½∞ΓáΓá, Ñß½¿
- ¡áτ¡ÑΓÑ »α«úαá¼¼¿α«óáΓ∞. ü«½∞Φ¿¡ßΓó« ½εñÑ⌐, »α¿ »Ñαó«¼ ßΓ«½¬¡«óÑ-
- ¡¿¿ ß «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«¼ »α«úαá¼¼¿α«ó᡿Ѽ, ¡áτ¿¡áεΓ í«α¼«-
- ΓáΓ∞ ß »α¿ñδσ᡿Ѽ; "ƒ ¡Ñ ¼«úπ »«ßΓ¿τ∞ φΓ«ú«". "Çúá!" »α¿σ«ñ¿Γ
- »«ºñ¡ÑÑ, ¡«τ∞ε, ¬«úñá µÑ½«ßΓ¡á∩ ¬«¡µÑ»µ¿∩ ∩ó½∩ÑΓß∩ ¬ ¡á¼ ó «ñ¡«
- »αѬαáß¡«Ñ ¼ú¡«óÑ¡¿Ñ, ¿ ¼δ, »«íα«ßáó ßó«¿ ¡¿¬τѼ¡δÑ ñѽá, ¿ß»«½∞-
- ºπѼ φΓ« ¼ú¡«óÑ¡¿Ñ ñ½∩ «íαáΘÑ¡¿∩ ¬ í«úπ. èᬠ½¿µ« ªÑ¡Θ¿¡δ, 󫺡¿-
- ¬áεΘÑÑ ¿º τÑα¡¿½∞¡δσ »∩ΓÑ¡ É«Φá, Γ«, τΓ« ñ« φΓ«ú« í佫 ß¼πΓ¡δ¼,
- ßΓá¡«ó¿Γß∩ «τÑó¿ñ¡δ¼ ¿ ºáΓѼ ½Ñú¬¿¼.
-
- æá¼«Ñ ½πτΦÑÑ, τΓ« óδ ¼«ªÑΓÑ ßñѽáΓ∞ ó ¬áτÑßΓóÑ »Ñαó«ú« Φáúá
- ó «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«¼ »α«úαá¼¼¿α«óá¡¿¿, ΓᬠφΓ« óº∩Γ∞ ¼«ñπ½∞
- WORKERS.PAS («¡ ¡áσ«ñ¿Γß∩ ¡á óáΦѼ ñ¿ß¬Ñ) ¿ αáßΦ¿α¿Γ∞ Ñú«. èá¬
- Γ«½∞¬« óδ ó«ß¬½¿¬¡¿ΓÑ "Çúá!", ¡áτ¿¡á⌐ΓÑ ßΓα«¿Γ∞ «α¿Ñ¡Γ¿α«óá¡¡δÑ
- ¡á «íΩѬΓδ ¬«¡µÑ»µ¿¿ ó óáΦÑ⌐ »«óßÑñ¡Ñó¡«⌐ »α«úαá¼¼¿ßΓ߬«⌐ ª¿º¡¿.
- 髺∞¼¿ΓÑ ¡Ñ߬«½∞¬« ¿¼ÑεΘ¿σß∩ πΓ¿½¿Γ, ¬«Γ«αδÑ óδ ¿ß»«½∞ºπÑΓÑ ¬áª-
- ñδ⌐ ñÑ¡∞, ¿ »Ñαѫ߼δß½¿ΓÑ ¿σ ó «α¿Ñ¡Γ¿α«óá¡¡δσ ¡á «íΩѬΓδ ΓÑନ-
- ¡áσ. ū߼«Γα¿ΓÑ ¬α¿Γ¿τÑ߬¿ ¡á "«ó«Θ¡«Ñ αáúπ" óáΦÑ⌐ í¿í½¿«ΓѬ¿
- »α«µÑñπα ¿ »«»δΓá⌐ΓÑß∞ ¡á⌐Γ¿ ó ¡¿σ «íΩѬΓδ, ºáΓѼ »ÑαÑ»¿Φ¿ΓÑ »α«-
- µÑñπαδ ó «íΩÑ¬Γ¡«⌐ Σ«α¼Ñ. éδ πíÑñ¿ΓÑß∞, τΓ« í¿í½¿«ΓѬ¿ «íΩÑ¬Γ«ó
- ßΓá¡ÑΓ ¡á¼¡«ú« ½ÑúτÑ ¿ß»«½∞º«óáΓ∞ ó íπñπΘ¿σ »α«Ñ¬Γáσ. äáªÑ ßá¼δÑ
- ¡Ñº¡áτ¿Γѽ∞¡δÑ óáΦ¿ ¡áτá½∞¡δÑ ¿¡óÑßΓ¿µ¿¿ ó »α«úαá¼¼¡δÑ πß¿½¿∩
- ßΓá¡πΓ ¡áóßÑúñá ¿º½¿Φ¡¿¼¿. ô óáß Ññóá ½¿ 󫺡¿¬¡ÑΓ ¡Ñ«íσ«ñ¿¼«ßΓ∞
- »ÑαÑ»¿ßδóáΓ∞ «íΩÑ¬Γ ß ßἫú« ¡áτá½á. àß½¿ «¡ αáí«ΓáÑΓ ¬á¬ ¡áñ«,
- Γ« ¿ß»«½∞ºπ⌐ΓÑ Ñú«. àß½¿ «íΩѬΓπ τÑú«-½¿í« ¡Ñ σóáΓáÑΓ, Γ« αáß-
- Φ¿α∞ΓÑ Ñú«. ì« Ñß½¿ «¡ αáí«ΓáÑΓ σ«α«Φ«, Γ« ¡ÑΓ ß¼δß½á óδíαáßδóáΓ∞
- ¿º ¡Ñú« τΓ«-½¿í«.
-
- çᬽετÑ¡¿Ñ
- ─────────────────────────────────────────────────────────────────
-
- ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ ∩ó½∩ÑΓß∩ »α∩¼δ¼
- ß½ÑñßΓó¿Ñ¼ πß½«ª¡Ñ¡¿∩ ß«óαѼѡ¡δσ »α¿½«ªÑ¡¿⌐, πß½«ª¡Ñ¡¿∩, ¬«Γ«α«Ñ
- τáßΓ« ºáßΓáó½∩ÑΓ ¼¡«ú¿σ »α«úαá¼¼¿ßΓ«ó ó «Γτá∩¡¿¿ ó߬¿ñδóáΓ∞ óóÑασ
- απ¬¿. ìáß½Ññ«óá¡¿Ñ ¿ ¿¡¬á»ßπ½∩µ¿∩ ∩ó½∩εΓß∩ ¼á¬ß¿¼á½∞¡« φΣΣÑ¬Γ¿ó-
- ¡δ¼¿ ßαÑñßΓóἿ ñ½∩ π»αáó½Ñ¡¿∩ ß½«ª¡«ßΓ∞ε. (æπΘÑßΓóπÑΓ αạ¿µá
- ¼Ñªñπ ñÑß∩Γ∞ε Γδß∩τἿ ¡áßѬ«¼δσ, ¬½áßß¿Σ¿µ¿α«óá¡¡δσ »« Γá¬ß«¡«-
- ¼¿τÑ߬«⌐ ßσѼÑ, ¿ ñÑß∩Γ∞ε Γδß∩τἿ ¡áßѬ«¼δσ, ªπªªáΘ¿σ ó«º½Ñ óá-
-
- B.Pascal 7 & Objects /UG - 241 -
-
- Φ¿σ πΦÑ⌐.) ÅαÑñßΓáó½∩∩ ß«í«⌐ º¡áτ¿Γѽ∞¡« í«½∞ΦÑÑ, τѼ »α«ßΓ«
- ßΓαπ¬Γπα¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ, «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿-
- α«óá¡¿Ñ ó¡«ß¿Γ αᵿ«¡á½∞¡δ⌐ »«α∩ñ«¬ ó ßΓαπ¬Γπαπ »α«úαá¼¼¡«ú«
- «íÑß»ÑτÑ¡¿∩ ¥éî, τΓ«, ¬á¬ ¿ Γá¬ß«¡«¼¿τÑ߬á∩ ßσѼá, πßΓá¡áó½¿óáÑΓ
- »«α∩ñ«¬, ¡Ñ πßΓá¡áó½¿óá∩ »αÑñѽ«ó.
-
- ä«íáó∞ΓÑ ßεñá »Ñαß»Ñ¬Γ¿óδ 󫺼«ª¡«ßΓ¿ αáßΦ¿αÑ¡¿∩ ¿ »«óΓ«α¡«-
- ¼π ¿ß»«½∞º«óá¡¿∩ ßπΘÑßΓóπεΘÑú« ¬«ñá ¿ óßÑ φΓ« ¡áτ¡ÑΓ ºóπτáΓ∞ ¡áß-
- Γ«½∞¬« σ«α«Φ«, τΓ« íπñÑΓ »«σ«ñ¿Γ∞ ¡á »αáóñπ. éδ ñπ¼áÑΓÑ, τΓ« φΓ«
- ¡Ñ󫺼«ª¡«?
-
- ì« φΓ« ªÑ Borland Pascal! 潫ó« "¡Ñ󫺼«ª¡«" ó ¡Ñ¼ ¡Ñ «»αÑ-
- ñѽѡ«.
-
-
-
- B.Pascal 7 & Objects /UG - 242 -
-
- ────────────────────────────────────────────────────────────────────────────
- â½áóá 10. éºú½∩ñ ¡á Windows
- ─────────────────────────────────────────────────────────────────
-
- é ñá¡¡«⌐ ú½áóÑ ß«ñÑনΓß∩ «íº«α »α«úαá¼¼¿α«óá¡¿∩ ñ½∩
- Microsoft Windows ß ¿ß»«½∞º«ó᡿Ѽ Borland Pascal (ß á¬µÑ¡Γ«¼ ¡á
- «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ). é »αÑñßΓáó½Ñ¡¡«¼
- ºñÑß∞ »α¿¼ÑαÑ ¿ß»«½∞ºπÑΓß∩ »«ßΓáó½∩Ѽá∩ ß Borland Pascal í¿í½¿«-
- ΓѬá ObjectWindows. éδ πº¡áÑΓÑ « »«óÑñÑ¡¿¿ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ
- Windows ¿ « Γ«¼, ¬á¬ ß »«¼«Θ∞ε ObjectWindows áóΓ«¼áΓ¿º¿α«óáΓ∞ «ñ-
- ¡¿ ºáñáτ¿ ¿ π»α«ßΓ¿Γ∞ ñαπú¿Ñ.
-
- ùΓ«íδ ¿ºó½Ñτ∞ ¿º ñá¡¡«⌐ ú½áóδ ¼á¬ß¿¼π¼ »«½∞ºδ, óδ ñ«½ª¡δ »«-
- ¡¿¼áΓ∞ »α¿¡µ¿»δ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¿α«óá¡¿∩. àß½¿
- óδ ¡Ñ º¡á¬«¼δ ß «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δ¼ »α«úαá¼¼¿α«ó᡿Ѽ, »α«-
- τ¿Γá⌐ΓÑ â½áóπ 9 "ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ". éδ
- ñ«½ª¡δ Γá¬ªÑ º¡áΓ∞, ¬á¬ αáí«ΓáΓ∞ ß Windows.
-
-
-
- B.Pascal 7 & Objects /UG - 243 -
-
- ùΓ« Γá¬«Ñ »α¿½«ªÑ¡¿Ñ Windows?
- ─────────────────────────────────────────────────────────────────
-
- ìá É¿ß. 10.1 »«¬áºá¡δ «ß¡«ó¡δÑ ¬«¼»«¡Ñ¡Γδ »α¿½«ªÑ¡¿∩
- Windows. ùΓ«íδ »«¡∩Γ∞ «íßπªñáѼδÑ ΓѼδ, óá¼ ñ«½ª¡δ íδΓ∞ º¡á¬«¼δ
- φΓ¿ ¬«¼»«¡Ñ¡Γδ, ¿ óδ ñ«½ª¡δ π¼ÑΓ∞ ß ¡¿¼¿ αáí«ΓáΓ∞.
-
- è¡«»¬á ¼¿¡¿¼¿ºáµ¿¿
- è¡«»¬á ¼á¬ß¿¼¿ºáµ¿¿ │
- æΓα«¬á ºáú«½«ó¬á │ │
- 諼á¡ñ¡á∩ ¬¡«»¬á │ │ │
- π»αáó½Ñ¡¿∩ ¼Ñ¡ε æΓα«¬á ¼Ñ¡ε │ éÑαΓ¿¬á½∞¡á∩ »«½«ßá │ │
- │ │ │ »α«¬απΓ¬¿ │ │ │
- ▄▄│▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄│▄▄▄▄▄▄▄▄▄▄▄▄│▄▄▄▄▄▄▄▄▄▄▄▄▄│▄▄▄▄▄▄▄▄▄▄▄▄│▄│▄▄
- █╔│[]═════════════│════════════│═════════════│════════════│═│╗█
- █║▒=▒ │ Borland Pascal │ │^│v║█
- █║─────────────────│──────────────────────────│───────────┴─┴─║█
- █║ File Edit Search Run Compile Tools Options │indows Help ║█
- █║────────────────────────────────────────────│───────────────║█
- █║╔═══════════════════════════════════════════│╗ ║█
- █║║▒=▒ c:\bpw\helloapp.pas │^││║ ║█
- █║║────────────────────────────────────────┴─┴│║ ║█
- █║║ program Hello; ^║ ║█
- █║║ ▒║ ║█
- █║║ uses WObjects, WinTypes, WinProcs; ▒║ ║█
- █║║ ▒║ ║█
- █║║ type ▒║ ║█
- █║║ ▄║ ║█
- █║║ { Define a TApplications descendant } ▒║ ║█
- █║║ THelloApp = object(TApplication) ▒║ ║█
- █║║ procedure InitMa╔════════════════════════════════╗ ║█
- █║║ end; │ ║█=██████Go to Line Number███████║ ║█
- █║║<▒█▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒│▒▒▒║ ║ ║█
- █║╚════════│═════════│═══║ ▒▒Enter new line number▒█████v ║ ║█
- █║ │ │ ║ ║ ║█
- █║ │ │ ║ ║ ║█
- █║ │ │ ║ ┌────────┐┌────────┐┌────────┐ ║ ║█
- █║ │ │ ║ │√ OK ││X Cancel││? Help │ ║ ║█
- █║ │ │ ║ └───│────┘└────────┘└────────┘ ║ ║█
- █║ │ │ ║ │ │ ║ ║█
- █║ │ │ ╚═════│═══════════════│══════════╝ ║█
- █║▒▒▒1:1▒▒▒│▒▒Insert▒│▒▒▒▒▒▒▒▒▒│▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒│▒▒▒▒▒▒▒▒▒▒▒▒▒▒║█
- █╚═════════│═════════│═════════│═══════════════│══════════════╝█
- ███████████│█████████│█████████│███████████████│████████████████
- │ │ │ │
- │ Ĭ¡« ô»αáó½∩εΘ¿⌐ ä¿á½«ú«ó«Ñ «¬¡«
- â«α¿º«¡Γá½∞¡á∩ φ½Ñ¼Ñ¡Γ
- »«½«ßá »α«¬απΓ¬¿
-
- É¿ß. 10.1 éδó«ñ¿¼δÑ ¡á φ¬αá¡ ¬«¼»«¡Ñ¡Γδ »α¿½«ªÑ¡¿∩ Windows.
-
- Åα¿½«ªÑ¡¿Ñ Windows - φΓ« ߻ѵ¿á½∞¡δ⌐ Γ¿» »α«úαá¼¼δ PC, ¬«Γ«-
- αá∩:
-
- B.Pascal 7 & Objects /UG - 244 -
-
-
- - ñ«½ª¡á ¿¼ÑΓ∞ ߻ѵ¿á½∞¡δ⌐ óδ»«½¡∩Ѽδ⌐ Σ«α¼áΓ Σá⌐½á (.EXE);
-
- - αáí«ΓáΓ∞ Γ«½∞¬« ß Windows;
-
- - «íδτ¡« αáí«ΓáΓ∞ ó »α∩¼«πú«½∞¡«¼ «¬¡Ñ ¡á φ¬αá¡Ñ;
-
- - »α¿ óδó«ñÑ ¡á φ¬αá¡ ß½Ññ«óáΓ∞ αѬ«¼Ñ¡ñᵿ∩¼ »« ßΓá¡ñáαΓ¡«-
- ¼π ¿¡ΓÑαΣÑ⌐ßπ ß »«½∞º«óáΓѽѼ;
-
- - ¼«ªÑΓ αáí«ΓáΓ∞ «ñ¡«óαѼѡ¡« ß ñαπú¿¼¿ »α«úαἼἿ Windows
- ¿ »α«τ¿¼¿ »α«úαἼἿ, ó¬½ετá∩ ñαπú¿Ñ φ¬ºÑ¼»½∩αδ ßá¼«Ñ ßÑ-
- í∩;
-
- - ¼«ªÑΓ óºá¿¼«ñÑ⌐ßΓó«óáΓ∞ ¿ ß«ó¼ÑßΓ¡« ¿ß»«½∞º«óáΓ∞ ñá¡¡δÑ ß
- ñαπú¿¼¿ »α¿½«ªÑ¡¿∩¼¿ Windows.
-
- ÅαÑ¿¼πΘÑßΓóá Windows
- ─────────────────────────────────────────────────────────────────
-
- èᬠñ½∩ »«½∞º«óáΓѽÑ⌐, Γᬠ¿ ñ½∩ αáºαáí«Γτ¿¬«ó Windows »αÑñ-
- ½áúáÑΓ ¼¡«ªÑßΓó« »αÑ¿¼πΘÑßΓó, ¬«Γ«αδÑ ó¬½ετáεΓ ó ßÑí∩:
-
- * æΓá¡ñáαΓ¡δÑ ¿ »αÑñ߬áºπѼδÑ «»ÑαáΓ«αδ: Ñß½¿ óδ º¡áÑΓÑ, ¬á¬
- ¿ß»«½∞º«óáΓ∞ «ñ¡« »α¿½«ªÑ¡¿Ñ Windows, Γ« ß¼«ªÑΓÑ αáí«ΓáΓ∞
- ß« óßѼ¿ «ßΓá½∞¡δ¼¿.
-
- * ä½∩ ¬áªñ«ú« »α¿½«ªÑ¡¿∩ ¡ÑΓ ¡Ñ«íσ«ñ¿¼«ßΓ¿ πßΓá¡áó½¿óáΓ∞
- ñαá⌐óÑαδ πßΓα«⌐ßΓó ¿ πßΓα«⌐ßΓóá: ó Windows »αÑñπß¼«ΓαÑ¡δ
- ñαá⌐óÑαδ ñ½∩ »«ññÑ᪬¿ »Ñα¿ΣÑα¿⌐¡«⌐ á»»áαáΓπαδ.
-
- * îѪ»α«úαá¼¼¡«Ñ óºá¿¼«ñÑ⌐ßΓó¿Ñ ¿ ßó∩º∞.
-
- * î¡«ú«ºáñáτ¡«ßΓ∞: 󫺼«ª¡«ßΓ∞ «ñ¡«óαѼѡ¡« ºá»π߬áΓ∞ ¼¡«-
- ªÑßΓó« »α«úαá¼¼.
-
- * ä«ßΓπ» ¬ í«½∞ΦѼπ «íΩѼπ »á¼∩Γ¿: Windows »«ññÑনóáÑΓ ºá-
- Θ¿ΘÑ¡¡δ⌐ αѪ¿¼.
-
- ä½∩ αáºαáí«Γτ¿¬«ó φΓ¿ »αÑ¿¼πΘÑßΓóá ó¬½ετáεΓ ó ßÑí∩:
-
- * ìѺáó¿ß¿¼πε «Γ πßΓα«⌐ßΓó úαáΣ¿¬π, í½áú«ñáα∩ τѼπ úαáΣ¿τÑß-
- ¬¿Ñ »α¿½«ªÑ¡¿∩ ¼«úπΓ αáí«ΓáΓ∞ ¡á óßÑσ ßΓá¡ñáαΓ¡δσ ñ¿ß»½Ñ⌐-
- ¡δσ áñá»ΓÑαáσ.
-
- * ìÑ»«ßαÑñßΓóÑ¡¡πε »«ññÑ᪬π Φ¿α«¬«ú« ñ¿á»áº«¡á »α¿¡ΓÑα«ó,
- ¼«¡¿Γ«α«ó ¿ πßΓα«⌐ßΓó Γ¿»á "¼δΦ∞".
-
- * ü«úáΓπε í¿í½¿«ΓѬπ úαáΣ¿τÑ߬¿σ »«ñ»α«úαá¼¼.
-
- * ü«½∞ΦÑ »á¼∩Γ¿ ñ½∩ í«½∞Φ¿σ »α«úαá¼¼.
-
- * Å«ññÑ᪬π ¼Ñ¡ε, »¿¬Γ«úαá¼¼, í¿Γ«óδσ ¼áßß¿ó«ó ¿ ñα.
-
- B.Pascal 7 & Objects /UG - 245 -
-
-
-
- ÆαÑí«óá¡¿∩
- ─────────────────────────────────────────────────────────────────
-
- ÄíαáΓ¡«⌐ ßΓ«α«¡«⌐ α∩ñá »αÑñ½áúáѼδσ Windows »«½∞º«óáΓѽε
- »αÑ¿¼πΘÑßΓó ∩ó½∩ÑΓß∩ »ÑαÑτÑ¡∞ í«½ÑÑ ßΓα«ú¿σ á»»áαáΓ¡δσ ΓαÑí«óá-
- ¡¿⌐. é «íΘѼ ß½πτáÑ Windows ΓαÑíπÑΓ ñ½∩ »α«¿ºó«ñ¿Γѽ∞¡«ßΓ¿, ßαáó-
- ¡¿¼«⌐ ß »α¿½«ªÑ¡¿Ñ¼ DOS ½πτΦ¿σ úαáΣ¿τÑ߬¿σ ßαÑñßΓó, í«½∞Φ¿σ «íΩ-
- Ѽ«ó »á¼∩Γ¿, í«½ÑÑ íδßΓαδσ »α«µÑßß«α«ó. àß½¿ óδ αáß»«½áúáÑΓÑ »α«-
- µÑßß«α«¼ 80286 ¿½¿ ßΓáαΦÑ ¿ ¡Ñ ¼Ñ¡ÑÑ 2 ¼Ñúáíá⌐ΓἿ »á¼∩Γ¿, Γ«
- Windows íπñÑΓ »αѬαáß¡« αáí«ΓáΓ∞.
-
-
- Åα«úαá¼¼¡δÑ ßαÑñßΓóá
- ─────────────────────────────────────────────────────────────────
-
- ä½∩ αáºαáí«Γτ¿¬«ó »α¿¬½áñ¡δσ »α«úαá¼¼ Windows »αÑñπß¼áΓα¿óá-
- ÑΓ Φ¿α«¬¿⌐ ñ¿á»áº«¡ »α«úαá¼¼¡δσ ßαÑñßΓó.
-
-
- Çασ¿ΓѬΓπαá ß π»αáó½Ñ¡¿Ñ¼ »« ß«íδΓ¿∩¼
- ─────────────────────────────────────────────────────────────────
-
- Windows «ß¡«óá¡á ¡á áασ¿ΓѬΓπαÑ ß π»αáó½Ñ¡¿Ñ¼ »« ß«íδΓ¿∩¼.
- ¥Γ« «º¡áτáÑΓ, τΓ« óÑß∞ óó«ñ «Γ »«½∞º«óáΓѽ∩ ¿¡ΓÑα»αÑΓ¿απÑΓß∩ ¬á¬
- ß«íδΓ¿∩. è«úñá ß«íδΓ¿Ñ¼ ∩ó½∩ÑΓß∩ Θѽτ«¬ ¬¡«»¬«⌐ "¼δΦ¿" ¿½¿ ¡áªá-
- Γ¿Ñ ¬½áó¿Φ¿ ¬½áó¿áΓπαδ, Γ« »α«¿ßσ«ñ¿Γ ß«íδΓ¿Ñ, ¿ Windows úÑ¡Ñα¿-
- απÑΓ ß««íΘÑ¡¿Ñ. ìá»α¿¼Ñα, Ñß½¿ »«½∞º«óáΓѽ∞ Θѽ¬áÑΓ ½Ñó«⌐ ¬¡«»¬«⌐
- "¼δΦ¿", Windows úÑ¡Ñα¿απÑΓ ß««íΘÑ¡¿Ñ wm_LButtonDown. àß½¿ »«½∞º«-
- óáΓѽ∞ ¡áª¿¼áÑΓ ¬½áó¿Φπ, Windows úÑ¡Ñα¿απÑΓ ß«íδΓ¿Ñ wm_KeyDown.
-
- Åα¿ óδí«αÑ "¼δΦ∞ε" ¿½¿ ß »«¼«Θ∞ε ¬½áó¿áΓπαδ Windows ¿¡ΓÑα»-
- αÑΓ¿απÑΓ óßÑ ¬«¼á¡ñδ ¼Ñ¡ε ¿ π»αáó½∩εΘ¿Ñ ¬«¼á¡ñδ ¬á¬ ß««íΘÑ¡¿∩
- wm_Command. ¥Γá áασ¿ΓѬΓπαá ß π»αáó½Ñ¡¿Ñ¼ »« ß«íδΓ¿∩¼ «Γ½¿τ¡« ß«-
- ú½áßπÑΓß∩ ß «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δ¼ »«ñσ«ñ«¼ Borland Pascal.
-
-
- âαáΣ¿¬á, ¡Ñºáó¿ß¿¼á∩ «Γ πßΓα«⌐ßΓó
- ─────────────────────────────────────────────────────────────────
-
- Windows π¡¿Σ¿µ¿απÑΓ »α«µÑßß óδó«ñá ¡á φ¬αá¡ ¿ »ÑτáΓ∞ ó «ñ¡«¼
- ¼«ñπ½Ñ, ¬«Γ«αδ⌐ ¡áºδóáÑΓß∩ ¿¡ΓÑαΣÑ⌐ß«¼ ß úαáΣ¿τÑ߬¿¼¿ πßΓα«⌐ßΓóá-
- ¼¿ (GDI) ¿ ¬«Γ«αδ⌐ «íÑß»Ñτ¿óáÑΓ «íΘ¿⌐ ¿¡ΓÑαΣÑ⌐ß ñ½∩ ¬áªñ«⌐ »α«ú-
- αá¼¼δ Windows. èα«¼Ñ Γ«ú«, ó Windows »αÑñπß¼«ΓαÑ¡δ ñαá⌐óÑαδ πßΓ-
- α«⌐ßΓó ñ½∩ í«½∞Φ¿¡ßΓóá ßΓá¡ñáαΓ¡δσ úαáΣ¿τÑ߬¿σ áñá»ΓÑα«ó ¿ »α¿¡-
- ΓÑα«ó. é αѺπ½∞ΓáΓÑ ß¿ßΓÑ¼á »«ºó«½∩ÑΓ óá¼ »¿ßáΓ∞ «ñ¡« »α¿½«ªÑ¡¿Ñ,
- ¬«Γ«α«Ñ íѺ ¿º¼Ñ¡Ñ¡¿⌐ αáí«ΓáÑΓ ¡á í«½∞Φ¿¡ßΓóÑ ßπΘÑßΓóπεΘ¿σ ó ¼¿αÑ
- á»»áαáΓ¡δσ ßαÑñßΓóáσ.
-
- âαáΣ¿¬á, ¡Ñºáó¿ß¿¼á∩ «Γ πßΓα«⌐ßΓó, »αÑñ½áúáÑΓ ¡Ñ¬«Γ«αδÑ »αÑ-
- ¿¼πΘÑßΓóá, ¬«Γ«αδÑ ¡Ñ íα«ßáεΓß∩ ó ú½áºá ßαáºπ. Äñ¡¿¼ ¿º ¡¿σ ∩ó½∩-
- ÑΓß∩ Γ«, τΓ« »α¿½«ªÑ¡¿∩ Windows ½Ñú¬«πßΓá¡áó½¿óáѼδ, Γᬠ¬á¬ ¡Ñ
-
- B.Pascal 7 & Objects /UG - 246 -
-
- ΓαÑíπεΓ »ÑαѬ«¡Σ¿úπαᵿ¿ ß¿ßΓѼδ ß ¬«¡¬αÑΓ¡δ¼¿ ñαá⌐óÑαἿ πßΓ-
- α«⌐ßΓó. äαπú«Ñ ß«ßΓ«¿Γ ó Γ«¼, τΓ« »α¿½«ªÑ¡¿∩ Windows τáßΓ« ½πτΦÑ
- αáí«ΓáεΓ ó ½«¬á½∞¡«⌐ ßÑΓ¿, »«ß¬«½∞¬π ¬áªñδ⌐ »«½∞º«óáΓѽ∞ ¿¼ÑÑΓ
- ßó«ε ß«íßΓóÑ¡¡πε ½«¬á½∞¡πε ¬«¡Σ¿úπαᵿε.
-
- ì« úαáΣ¿¬á, ¡Ñºáó¿ß¿¼á∩ «Γ πßΓα«⌐ßΓó, ΓαÑíπÑΓ ªÑαΓó. ä½∩
- αáºαáí«Γτ¿¬á φΓ¿ "ªÑαΓóδ" ß«ßΓ«∩Γ ó ß«í½εñÑ¡¿¿ ó τѼ-Γ« ßΓα«ú¿σ
- ΓαÑí«óá¡¿⌐ GDI. GDI «úαá¡¿τ¿óáÑΓ ó«º¼«ª¡«ßΓ¿ »α«úαá¼¼¿ßΓá ó »α«-
- Ñ¬Γ¿α«óá¡¿¿ »α¿½«ªÑ¡¿⌐.
-
-
- î¡«ú«ºáñáτ¡«ßΓ∞
- ─────────────────────────────────────────────────────────────────
-
- Windows »«ºó«½∩ÑΓ »«½∞º«óáΓѽ∩¼ óδ»«½¡∩Γ∞ ¡Ñ߬«½∞¬« »α¿½«ªÑ-
- ¡¿⌐ »áαώѽ∞¡«, πßΓαá¡∩∩ ¡Ñ«íσ«ñ¿¼«ßΓ∞ ¿ß»«½∞º«óá¡¿∩ αѺ¿ñÑ¡Γ¡δσ
- ó »á¼∩Γ¿ »α«úαá¼¼ (TSR). é Windows αÑ὿º«óá¡á ¡Ñ »α«ßΓ« ¼¡«ú«ºá-
- ñáτ¡«ßΓ∞. Ä¡á »«ññÑαªá¡á ¡áí«α«¼ ßαÑñßΓó ¿ ¼Ñª»α«µÑßß«α¡δσ ¬«¼¼π-
- ¡¿¬áµ¿⌐, Γᬿσ ¬á¬ íπΣÑα óδαѺᡡ«ú« ¿º«íαáªÑ¡¿∩ Clipboard ¿ ñ¿-
- ¡á¼¿τÑ߬¿⌐ «í¼Ñ¡ ñá¡¡δ¼¿ (DDE).
-
- Windows π»αáó½∩ÑΓ ¼¡«ªÑßΓó«¼ »α¿½«ªÑ¡¿⌐, «úαá¡¿τ¿óá∩ ¿ß»«½∞-
- º«óá¡¿Ñ φ¬αá¡á ¬áªñδ¼ »α¿½«ªÑ¡¿Ñ¼ «ñ¡«⌐ ¿½¿ í«½ÑÑ »α∩¼«πú«½∞¡«⌐
- «í½áßΓ∞ε, ¬«Γ«αδÑ ¡áºδóáεΓß∩ «¬¡á¼¿. ¥Γ¿ «¬¡á ¼«ª¡« »ÑαѼÑΘáΓ∞,
- ¿º¼Ñ¡∩Γ∞ ¿σ αẼÑα ¿ óαѼѡ¡« ßó«αáτ¿óáΓ∞ ó »¿¬Γ«úαá¼¼δ, »«ºó«½∩∩
- »«½∞º«óáΓѽε íδßΓα« »ÑαѬ½ετáΓ∞ß∩ «Γ «ñ¡«⌐ ºáñáτ¿ ¬ ñαπú«⌐.
-
- æ Γ«τ¬¿ ºαÑ¡¿∩ »α«úαá¼¼¿ßΓá φΓ« «º¡áτáÑΓ, τΓ« »α«úαá¼¼á ¡Ñ
- ñ«½ª¡á ºá»¿ßδóáΓ∞ ΓѬßΓ ¿½¿ úαáΣ¿¬π ¡Ñ»«ßαÑñßΓóÑ¡¡« »« φ¬αá¡¡δ¼
- áñαÑßá¼, á ñ«½ª¡á óδó«ñ¿Γ∞ ¿σ ó »«½∞º«óáΓѽ∞߬πε «í½áßΓ∞ «¬¡á -
- «í½áßΓ∞ ó¡πΓα¿ αἬ¿ «¬¡á. ǡὫú¿τ¡«, »α¿¬½áñ¡á∩ »α«úαá¼¼á ñ«½ª-
- ¡á ¿ß»«½∞º«óáΓ∞ »á¼∩Γ∞ ¬«¼»∞εΓÑαá ß«ó¼ÑßΓ¡« ß ñαπú¿¼¿ »α¿½«ªÑ¡¿∩-
- ¼¿. ò«α«Φ« »«ßΓα«Ñ¡¡«Ñ »α¿½«ªÑ¡¿Ñ Windows ¬«ααÑ¬Γ¡« ß«í½εñáÑΓ
- »αáó¿½á Windows αáí«Γδ ß φ¬αá¡«¼ ¿ π»αáó½Ñ¡¿∩ »á¼∩Γ∞ε.
-
-
- ô»αáó½Ñ¡¿Ñ »á¼∩Γ∞ε
- ─────────────────────────────────────────────────────────────────
-
- é Γ¿»¿τ¡«¼ ßÑá¡ßÑ αáí«Γδ ß Windows ¼¡«ªÑßΓó« »α¿½«ªÑ¡¿⌐ ¼¡«-
- ú«¬αáΓ¡« «Γ¬αδóáεΓß∩ ¿ ºá¬αδóáεΓß∩, »«φΓ«¼π ¡Ñαᵿ«¡á½∞¡« ºáúαπ-
- ªáΓ∞ ¬áªñ«Ñ »α¿½«ªÑ¡¿Ñ ó »á¼∩Γ∞ »«ß½Ñ »αÑñδñπΘÑú« - Windows ߬«α«
- ¿ßτÑα»áÑΓ »á¼∩Γ∞. é¼ÑßΓ« φΓ«ú« Windows, τΓ«íδ πñ«ó½ÑΓó«α¿Γ∞ »«Γ-
- αÑí¡«ßΓ¿ ñαπú¿σ »α¿½«ªÑ¡¿⌐ ¿½¿ ßἫ⌐ Windows, ¼«ªÑΓ »ÑαѼÑΘáΓ∞
- »á¼∩Γ∞ í«½∞Φ¿¡ßΓóá »α¿½«ªÑ¡¿⌐ ó ñαπúπε τáßΓ∞ »á¼∩Γ¿ ¿½¿ ¡á ñ¿ß¬.
-
- Æá¬¿¼ «íαẫ¼, »α¿½«ªÑ¡¿Ñ Windows ñ«½ª¡« ß««ΓóÑΓßΓó«óáΓ∞ ñ¿-
- ¡á¼¿τÑ߬«¼π αáß»αÑñѽѡ¿ε »á¼∩Γ¿ Windows ¿ ¿ºíÑúáΓ∞ »α∩¼«ú« «íαá-
- ΘÑ¡¿∩ ¬ áñαÑßá¼ »á¼∩Γ¿. ìá»α¿¼Ñα, Γαáñ¿µ¿«¡¡δ⌐ π¬áºáΓѽ∞ ¡á ∩τÑ⌐-
- ¬π »á¼∩Γ¿ ¼«ªÑΓ íδßΓα« ßΓáΓ∞ ¡Ññ«»πßΓ¿¼δ¼, ¬«úñá Windows »ÑαÑ-
- αáß»αÑñѽ¿Γ »á¼∩Γ∞, Γᬠ¬á¬ ¼«ªÑΓ π¬áºδóáΓ∞ ¡á ∩τÑ⌐¬π »á¼∩Γ¿, ¬«-
- Γ«αá∩ ¿ß»«½∞ºπÑΓß∩ ñ½∩ τÑú«-Γ« ÑΘÑ.
-
-
- B.Pascal 7 & Objects /UG - 247 -
-
- é¼ÑßΓ« π¬áºáΓѽÑ⌐ Windows ¿ß»«½∞ºπÑΓ «»¿ßáΓѽ¿, ¬«Γ«αδÑ »«
- ßπΘÑßΓóπ »αÑñßΓáó½∩εΓ ß«í«⌐ π¬áºáΓѽ¿ ¡á π¬áºáΓѽ¿. Ä»¿ßáΓѽ¿ -
- φΓ« ¡«¼Ñαá, ¿ß»«½∞ºπεΘ¿Ñß∩ ó ¬áτÑßΓóÑ ¿¡ñѬ߫ó ó «íß½πª¿óáѼ«⌐
- Windows Γáí½¿µÑ π¬áºáΓѽÑ⌐. Æá¬¿¼ «íαẫ¼, »α¿½«ªÑ¡¿∩ Windows
- ßßδ½áεΓß∩ ¡á «¬¡« ¿½¿ ß«ñÑন¼«Ñ φ¬αá¡á («í½áßΓ∞ ñ½∩ «Γ«íαáªÑ¡¿∩
- ¡á φ¬αá¡Ñ) »« «»¿ßáΓѽε. ê¼ÑεΓß∩ Γá¬ªÑ π¬áºáΓѽ¿ φ¬ºÑ¼»½∩α«ó »α¿-
- ½«ªÑ¡¿⌐, ßΓ᫬, ßαÑñßΓó «Γ«íαáªÑ¡¿∩ ¿ αÑßπαß«ó, Γᬿσ ¬á¬ ¼Ñ¡ε ¿
- »¿¬Γ«úαá¼¼δ.
-
- Åα¿ «íδτ¡«⌐ αáí«ΓÑ óá¼ ¡Ñ »«ΓαÑíπÑΓß∩ ¿¼ÑΓ∞ ñѽ« ß ßἿ¼¿
- «»¿ßáΓѽ∩¼¿. éδ ¼«ªÑΓÑ óδñѽ∩Γ∞ ¿ «ßó«í«ªñáΓ∞ »á¼∩Γ∞ ó ñ¿¡á¼¿τÑß-
- ¬¿ αáß»αÑñѽ∩Ѽ«⌐ «í½áßΓ¿ ß »«¼«Θ∞ε «íδτ¡δσ »«ñ»α«úαá¼¼ New,
- Dispose, GetMem ¿ FreeMem, á Borland Pascal íπñÑΓ óºá¿¼«ñÑ⌐ßΓó«-
- óáΓ∞ ß Windows ¿ «íÑß»Ñτ¿óáΓ∞ ñ½∩ ¡ÑÑ ¿¡Σ«α¼áµ¿ε « Γ«¼, ¡á τΓ«
- Σá¬Γ¿τÑ߬¿ ßßδ½áεΓß∩ φΓ¿ π¬áºáΓѽ¿.
-
- Äñ¡¿¼ ¿º «ß¡«ó¡δσ »αÑ¿¼πΘÑßΓó π»αáó½Ñ¡¿∩ »á¼∩Γ∞ε ó Windows
- ∩ó½∩ÑΓß∩ 󫺼«ª¡«ßΓ∞ ß«ó¼ÑßΓ¡« ¿ß»«½∞º«óáΓ∞ ó »α¿½«ªÑ¡¿∩σ ߬«¼»¿-
- ½¿α«óá¡¡δ⌐ ¬«ñ. ìá»α¿¼Ñα, Ñß½¿ »«½∞º«óáΓѽ∞ óδ»«½¡∩ÑΓ ñóá φ¬ºÑ¼»-
- ½∩αá «ñ¡«ú« ¿ Γ«ú« ªÑ »α¿½«ªÑ¡¿∩, Γ« φΓ¿ »α¿½«ªÑ¡¿∩ ¿ß»«½∞ºπεΓ
- «ñ¿¡ ¿ ëà ªÑ ߬«¼»¿½¿α«óá¡¡δ⌐ ¬«ñ ó »á¼∩Γ¿. ǡὫú¿τ¡«, »α¿½«ªÑ-
- ¡¿Ñ ¼«ªÑΓ ñ¿¡á¼¿τÑ߬¿ ºáúαπªáΓ∞ í¿í½¿«ΓÑτ¡δ⌐ ¼«ñπ½∞, ß«ó¼ÑßΓ¡«
- ¿ß»«½∞ºπѼδ⌐ ó ¡Ñ߬«½∞¬¿σ »α¿¬½áñ¡δσ »α«úαá¼¼áσ. ¥Γ« ¡áºδóáÑΓß∩
- ñ¿¡á¼¿τÑ߬¿ ¬«¼»«¡πѼ«⌐ í¿í½¿«ΓѬ«⌐ - DLL.
-
- ÉÑßπαßδ
- ─────────────────────────────────────────────────────────────────
-
- ÉÑßπαßδ »αÑñßΓáó½∩εΓ ß«í«⌐ «»¿ßá¡¿∩ πßΓα«⌐ßΓó »«½∞º«óáΓѽ∞-
- ߬«ú« ¿¡ΓÑαΣÑ⌐ßá »α¿½«ªÑ¡¿∩ Windows: Ñú« ¼Ñ¡ε, ñ¿á½«ú«óδσ «¬«¡,
- ¬παß«α«ó, »¿¬Γ«úαá¼¼, í¿Γ«óδÑ ¼áßß¿óδ, ßΓ᫬¿ ¿ ¬«¼á¡ñ¡δÑ ¬½áó¿-
- Φ¿. Windows «íÑß»Ñτ¿óáÑΓ ßαÑñßΓóá ñ½∩ »«ññÑ᪬¿ φΓ¿σ «»¿ßá¡¿⌐ ó¡Ñ
- ¿ßσ«ñ¡«ú« ¬«ñá »α¿½«ªÑ¡¿∩. ÉÑßπαßδ »α¿½«ªÑ¡¿∩ «íΩÑñ¿¡∩εΓß∩ ß Ñú«
- óδ»«½¡∩Ñ¼δ¼ Σá⌐½«¼ »ÑαÑñ óδ»«½¡Ñ¡¿Ñ¼ »α¿½«ªÑ¡¿∩. ùΓ«íδ «úαá¡¿τ¿Γ∞
- ¿ß»«½∞º«óá¡¿Ñ »á¼∩Γ¿, »α¿½«ªÑ¡¿Ñ óδºδóáÑΓ αÑßπαßδ ó »á¼∩Γ∞ Γ«½∞¬«
- ¬«úñá «¡¿ ¡Ñ«íσ«ñ¿¼δ.
-
- ÄΓñѽѡ¿Ñ ߻ѵ¿Σ¿¬áµ¿⌐ αÑßπαßá «Γ ¿ßσ«ñ¡«ú« ¬«ñá ¿¼ÑÑΓ ñ«-
- »«½¡¿Γѽ∞¡«Ñ »αÑ¿¼πΘÑßΓó«: óδ ¼«ªÑΓÑ ¿º¼Ñ¡¿Γ∞ ó¿ñ »α¿½«ªÑ¡¿∩, ¡Ñ
- ºáΓαáú¿óá∩ ¿ßσ«ñ¡«ú« ¬«ñá »α«úαá¼¼δ. öá¬Γ¿τÑ߬¿, ñ½∩ ¼«ñ¿Σ¿¬áµ¿¿
- αÑßπαß«ó »α¿½«ªÑ¡¿∩ óá¼ ¡Ñ ¡πª¡« ñáªÑ ¿¼ÑΓ∞ ¿ßσ«ñ¡δ⌐ ¬«ñ. ¥Γ« «í-
- ½ÑúτáÑΓ ¡áßΓα«⌐¬π ¿½¿ Γαá¡ß½∩µ¿ε ßπΘÑßΓóπεΘ¿σ »α¿½«ªÑ¡¿⌐ Windows.
-
- ä½∩ ß«ºñá¡¿∩ ¿ ¡áßΓα«⌐¬¿ αÑßπαß«ó Borland Pascal ó¬½ετáÑΓ ó
- ßÑí∩ »á¬ÑΓ αáºαáí«Γτ¿¬á αÑßπαß«ó Resourse Workshop.
-
-
- 信ἿτÑ߬á∩ ¬«¼»«¡«ó¬á
- ─────────────────────────────────────────────────────────────────
-
- Windows »«ºó«½∩ÑΓ »α¿½«ªÑ¡¿∩¼, ó¬½ετá∩ »α«úαá¼¼δ Borland
- Pascal, ºáúαπªáΓ∞ ¿ «ßó«í«ªñáΓ∞ í¿í½¿«ΓÑτ¡δÑ ¼«ñ㫨 ¡á φΓá»Ñ ¬«¼-
- »«¡«ó¬¿. ¥Γ¿ ¼«ñ㫨 ñ«½ª¡δ íδΓ∞ ºá»¿ßá¡δ ó ߻ѵ¿á½∞¡«¼ óδ»«½¡∩Ñ-
-
- B.Pascal 7 & Objects /UG - 248 -
-
- ¼«¼ Σ«α¼áΓÑ (EXE), ¬«Γ«αδ⌐ ¡áºδóáÑΓß∩ ñ¿¡á¼¿τÑ߬¿ ¬«¼»«¡πѼ«⌐
- í¿í½¿«ΓѬ«⌐ (DLL). ùáßΓ« φΓ¿ í¿í½¿«ΓѬ¿ óδ»«½¡∩εΓ ß»Ñµ¿á½∞¡δÑ ¿
- ß½«ª¡δÑ ºáñáτ¿, Γá¬¿Ñ ¬á¬ »αÑ«íαẫóá¡¿Ñ Σ«α¼áΓ«ó Σá⌐½«ó. é φΓ«¼
- ß½πτáÑ »α«úαá¼¼á ¼«ªÑΓ »α¿¼Ñ¡∩Γ∞ DLL ¬á¬ Σ¿½∞Γαδ ñ½∩ φ¬ß»«αΓá ¿
- ¿¼»«αΓá Σá⌐½«ó. èα«¼Ñ Γ«ú«, DLL ¼«úπΓ ß«ó¼ÑßΓ¡« ¿ß»«½∞º«óáΓ∞ß∩
- úαπ»»«⌐ »α¿½«ªÑ¡¿⌐, τΓ« ß»«ß«íßΓóπÑΓ ß«ó¼ÑßΓ¡«¼π ¿ß»«½∞º«óá¡¿ε ¿
- φ¬«¡«¼¿¿ »á¼∩Γ¿.
-
-
- üπΣÑα óδαѺᡡ«ú« ¿º«íαáªÑ¡¿∩
- ─────────────────────────────────────────────────────────────────
-
- üπΣÑα óδαѺᡡ«ú« ¿º«íαáªÑ¡¿∩ Clipboard »«ºó«½∩ÑΓ »«½∞º«óá-
- Γѽ∩¼ »ÑαÑñáóáΓ∞ ¿¡Σ«α¼áµ¿ε, Γá¬πε ¬á¬ ΓѬßΓ, úαáΣ¿¬π ¿ ñá¡¡δÑ,
- ¼Ñªñπ »α¿½«ªÑ¡¿∩¼¿, ¼Ñªñπ αẽ¿τ¡δ¼¿ τáßΓ∩¼¿ »α¿½«ªÑ¡¿∩ ¿½¿ ó ¬á-
- τÑßΓóÑ óαѼѡ¡«⌐ »á¼∩Γ¿ ñ½∩ »«ß½ÑñπεΘÑú« ¿ß»«½∞º«óá¡¿∩. ìá»α¿¼Ñα,
- »α«úαá¼¼á «íαáí«Γ¬¿ ΓѬßΓá ¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ íπΣÑα óδαѺᡡ«ú«
- «Γ«íαáªÑ¡¿∩ ñ½∩ «»Ñαᵿ⌐ πñá½Ñ¡¿∩, ¬«»¿α«óá¡¿∩ ¿ óßΓáó¬¿ ΓѬßΓá.
-
-
- 信ἿτÑ߬¿⌐ «í¼Ñ¡ ñá¡¡δ¼¿
- ─────────────────────────────────────────────────────────────────
-
- 信ἿτÑ߬¿⌐ «í¼Ñ¡ ñá¡¡δ¼¿ (DDE) - φΓ« ÑΘÑ «ñ¿¡ ¼Ñσá¡¿º¼ »Ñ-
- αÑñáτ¿ ¿¡Σ«α¼áµ¿¿. é Γ« óαѼ∩ ¬á¬ íπΣÑα óδαѺᡡ«ú« ¿º«íαáªÑ¡¿∩
- »«½¡«ßΓ∞ε ¡áσ«ñ¿Γß∩ »«ñ ¬«¡Γα«½Ñ¼ »«½∞º«óáΓѽ∩, DDE óδ»«½¡∩ÑΓ
- "ºá¬π½¿ß¡πε" αáí«Γπ »«ñ π»αáó½Ñ¡¿Ñ¼ »α«úαá¼¼δ. Å«ßδ½á∩ DDE-ß««í-
- ΘÑ¡¿∩, »α«úαá¼¼á »ÑαÑñáÑΓ ¿¡Σ«α¼áµ¿ε ñαπú«⌐ »α«úαá¼¼Ñ.
-
-
-
-
- B.Pascal 7 & Objects /UG - 249 -
-
- î¡«ªÑßΓóÑ¡¡δ⌐ ñ«¬π¼Ñ¡Γá½∞¡δ⌐ ¿¡ΓÑαΣÑ⌐ß
- ─────────────────────────────────────────────────────────────────
-
- î¡«ªÑßΓóÑ¡¡δ⌐ ñ«¬π¼Ñ¡Γá½∞¡δ⌐ ¿¡ΓÑαΣÑ⌐ß (MDI) πßΓá¡áó½¿óáÑΓ
- ß«ú½áΦÑ¡¿∩ »« »«½∞º«óáΓѽ∞߬«¼π ¿¡ΓÑαΣÑ⌐ßπ ñ½∩ ß«ºñá¡¿∩ «¬«¡, ß«-
- ñÑαªáΘ¿σ ó¡πΓα¿ ßÑí∩ ñ«τÑα¡¿Ñ «¬¡á. Åα¿¼Ñα«¼ MDI ¼«ªÑΓ ß½πª¿Γ∞
- ¿¡ΓÑúα¿α«óá¡¡á∩ ¿¡ΓÑαá¬Γ¿ó¡á∩ ßαÑñá ñ½∩ Windows Borland Pascal. é
- «»ÑαáΓ¿ó¡«⌐ «í½áßΓ¿ Borland Pascal »«½∞º«óáΓѽ∞ ¼«ªÑΓ «Γ¬αδΓ∞
- ßαáºπ ¡Ñ߬«½∞¬« «¬«¡. èáªñ«Ñ «¬¡« αÑñá¬Γ¿α«óá¡¿∩ ∩ó½∩ÑΓß∩ ñ«τÑα-
- ¡¿¼ «¬¡«¼.
-
- ▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄
- █╔═[]═════════════════════════════════════════════════════════╗█
- █║▒=▒████████████████████Borland Pascal████████████████████│^│v║█
- █║─────────────────────────────────────────────────────────┴─┴─║█
- █║ File Edit Search Run Compile Tools Options Windows Help ║█
- █║─────────────────────────────────────────────────────────────║█
- █║╔════════════════════════════════════════════╗ ║█
- █║║▒=▒ c:\bpw\helloapp.pas │^│v║ ║█
- █║║────────────────────────────────────────┴─┴─║ ║█
- █║║ program Hello; ^║ ║█
- █║║ ▒║ ║█
- █║║ uses WObjects, WinTypes, WinProcs; ▒║ ║█
- █║║ ▒║ ║█
- █║║ type ▒║ ║█
- █║║ ▄║ ║█
- █║║ { Define a TApplications descendant } ▒║ ║█
- █║║ THelloApp = object(TApplication) ▒║ ║█
- █║║ procedure InitMainWindow; virtual; v║ ║█
- █║║<▒█▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒>▒║ ║█
- █║╚════════════════════════════════════════════╝ ║█
- █║ ║█
- █║ ║█
- █║ ║█
- █║▒▒▒1:1▒▒▒▒▒▒Insert▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒║█
- █╚═════════════════════════════════════════════════════════════╝█
- █████████████████████████████████████████████████████████████████
-
- É¿ß. 10.2 Ĭ¡á IDE ñ½∩ Windows Borland Pascal - »α¿½«ªÑ¡¿Ñ
- MDI.
-
-
-
- B.Pascal 7 & Objects /UG - 250 -
-
- Æ¿»δ ñá¡¡δσ Windows
- ─────────────────────────────────────────────────────────────────
-
- ü½áú«ñáα∩ ßσÑ¼Ñ π»αáó½Ñ¡¿∩ ñá¡¡δ¼¿ Windows ¿ ÑÑ »«ñ«í¿ε ∩ºδ-
- ¬π »α«úαá¼¼¿α«óá¡¿∩ æ¿, »α«úαá¼¼¿α«óá¡¿ε ñ½∩ Windows ß »«¼«Θ∞ε
- Borland Pascal ß»«ß«íßΓóπεΓ ¡Ñ¬«Γ«αδÑ ß»Ñµ¿á½¿º¿α«óá¡¡δÑ Γ¿»δ
- ñá¡¡δσ. ìá»α¿¼Ñα, «»¿ßáΓѽ∞ «¬¡á ß«σαá¡∩ÑΓß∩ »«ñ Γ¿»«¼ HWnd.
- Borland Pascal ¿ ObjectWindows «»αÑñѽ∩εΓ ¡«óδÑ Γ¿»δ, ß«ñÑ⌐ßΓóπε-
- Θ¿Ñ αáí«ΓÑ ß Γᬿ¼ Γ¿»«¼ ¬á¬ HWnd. éßÑ φΓ¿ ¡«óδÑ Γ¿»δ ¿ ßΓαπ¬Γπαδ
- ñá¡¡δσ «»¿ßá¡δ ó "Éπ¬«ó«ñßΓóÑ »« »α«úαá¼¼¿α«óá¡¿ε ß ¿ß»«½∞º«óá¡¿-
- Ѽ ObjectWindows".
-
-
- ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡á∩ αáí«Γá ß «¬¡á¼¿
- ─────────────────────────────────────────────────────────────────
-
- èᬠ¼«ª¡« ó¿ñÑΓ∞, »α«úαá¼¼¿α«óá¡¿Ñ ó ¼¡«ú««¬«¡¡«⌐ ßαÑñÑ ΓαÑ-
- íπÑΓ º¡á¡¿∩ ¼¡«ú¿σ ß«íδΓ¿⌐, Σ«α¼áΓ«ó, «»¿ßáΓѽÑ⌐ ¿ ñαπú¿σ »α¿½«-
- ªÑ¡¿⌐, »«φΓ«¼π αáºαáí«Γ¬á »α«úαá¼¼δ Windows ¼«ªÑΓ »«¬áºáΓ∞ß∩
- Γαπñ¡«⌐ ºáñáτÑ⌐. è ßτáßΓ∞ε, «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«-
- óá¡¿Ñ π»α«ΘáÑΓ ºáñáτπ »α«úαá¼¼¿α«óá¡¿∩ ñ½∩ ¼¡«ú««¬«¡¡«⌐ ßαÑñδ ¿
- »«ºó«½∩ÑΓ αáºαáí«Γτ¿¬π »α¿¬½áñ¡«⌐ »α«úαá¼¼δ ß«ßαÑñ«Γ«τ¿Γ∞ß∩ ¡á
- Σπ¡¬µ¿∩σ »α¿½«ªÑ¡¿∩, á ¡Ñ ¡á Ñú« Σ«α¼Ñ. êß»«½∞ºπ∩ «íΩѬΓδ ñ½∩
- »αÑñßΓáó½Ñ¡¿∩ Γᬿσ ß½«ª¡δσ ßΓαπ¬Γπα ¬á¬ «¬¡á, »α«úαá¼¼δ Borland
- Pascal ¼«úπΓ ¿¡¬á»ßπ½¿α«óáΓ∞ ßó«¿ «»Ñαᵿ¿ ¿ σαá¡Ñ¡¿Ñ ñá¡¡δσ.
- ¥Γ«⌐ µÑ½¿ ß½πª¿Γ ObjectWindows.
-
- ÄíΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«Ñ »α«úαá¼¼¿α«óá¡¿Ñ «íÑß»Ñτ¿óáÑΓ Γπ
- «ß¡«óπ, ó αἬáσ ¬«Γ«α«⌐ »α«úαá¼¼¿ßΓ ¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ «íΩѬΓδ
- ñ½∩ »αÑñßΓáó½Ñ¡¿∩ φ½Ñ¼Ñ¡Γ«ó ¿¡ΓÑαΣÑ⌐ßá ß »«½∞º«óáΓѽѼ »α«úαá¼¼δ
- Windows. ¥Γ« «º¡áτáÑΓ, τΓ« «¬¡« ∩ó½∩ÑΓß∩ «íΩÑ¬Γ«¼.
-
- Ĭ¡« ObjectWindows «íΩÑ¬Γ¡δÑ Γ¿»δ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ »«ñ-
- ñÑনóáεΓ ΓαÑíπѼπε «Γ »α«úαá¼¼δ Windows αáí«Γπ ß ß««íΘÑ¡¿∩¼¿,
- º¡áτ¿Γѽ∞¡« π»α«Θá∩ óºá¿¼«ñÑ⌐ßΓó¿Ñ »α«úαá¼¼¿ßΓá ß »«½∞º«óáΓѽѼ.
- öá¬Γ¿τÑ߬¿, «íΩѬΓδ ObjectWindows »αÑñßΓáó½∩εΓ ¡Ñ Γ«½∞¬« «¬¡á,
- «¡¿ »αÑñßΓáó½∩εΓ ñ¿á½«ú«óδÑ í½«¬¿ ¿ π»αáó½∩εΘ¿Ñ φ½Ñ¼Ñ¡Γδ, ΓᬿÑ
- ¬á¬ í½«¬¿ ß»¿ß¬á ¿ ¬«¼á¡ñ¡δÑ ¬¡«»¬¿.
-
-
- ïπτΦ¿⌐ ¿¡ΓÑαΣÑ⌐ß ß Windows
- ─────────────────────────────────────────────────────────────────
-
- ObjectWindows ¿ß»«½∞ºπÑΓ «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡δÑ αáßΦ¿αÑ¡¿∩
- Borland Pascal ñ½∩ ¿¡¬á»ßπ½∩µ¿¿ »α¿¬½áñ¡«ú« »α«úαá¼¼¡«ú« ¿¡ΓÑα-
- ΣÑ⌐ßá Windows (API), ߬αδóá∩ «Γ óáß ñÑΓ὿ »α«úαá¼¼¿α«óá¡¿∩ ñ½∩
- Windows. é αѺπ½∞ΓáΓÑ óδ ¼«ªÑΓÑ ¿ß»«½∞º«óáΓ∞ IDE ñ½∩ Windows
- Borland Pascal ñ½∩ ¡á»¿ßá¡¿∩ »α«úαá¼¼ Windows, ºáΓαáτ¿óá∩ ßπΘÑßΓ-
- óÑ¡¡« ¼Ñ¡∞ΦÑ óαѼѡ¿ ¿ πß¿½¿⌐, τѼ φΓ« »«ΓαÑí«óὫß∞ íδ »α¿ ¡Ñ-
- «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«¼ »α«úαá¼¼¿α«óá¡¿¿. ObjectWindows »αÑñπß-
- ¼áΓα¿óáÑΓ Γα¿ »«½Ñº¡δσ ßαÑñßΓóá: ¿¡¬á»ßπ½∩µ¿ε ¿¡Σ«α¼áµ¿¿ «¬¡á,
- áíßΓαᬵ¿ε Σπ¡¬µ¿⌐ API Windows ¿ áóΓ«¼áΓ¿τÑ߬¿⌐ «ΓóÑΓ ¡á ß««íΘÑ-
- ¡¿∩.
-
- B.Pascal 7 & Objects /UG - 251 -
-
- ê¡ΓÑαΣÑ⌐ß¡δÑ «íΩѬΓδ
-
- ò«Γ∩ í¿í½¿«ΓѬá ObjectWindows «»αÑñѽ∩ÑΓ «íΩѬΓδ ñ½∩ «¬«¡,
- ñ¿á½«ú«óδσ «¬«¡ ¿ π»αáó½∩εΘ¿σ φ½Ñ¼Ñ¡Γ«ó, «¡á »αÑñπß¼áΓα¿óáÑΓ
- Γ«½∞¬« »«óÑñÑ¡¿Ñ «íΩÑ¬Γ«ó, ¿σ áΓα¿íπΓδ ¿ Γ¿»δ ñá¡¡δσ. ö¿º¿τÑ߬«⌐
- αÑ὿ºáµ¿Ñ⌐, ó¿ºπá½∞¡δ¼ «Γ«íαáªÑ¡¿Ñ¼ φ½Ñ¼Ñ¡Γá ¡á φ¬αá¡Ñ, π»αáó½∩-
- ÑΓ ßá¼á Windows. Æá¬¿¼ «íαẫ¼, «íΩѬΓδ ObjectWindows, ¬«Γ«αδÑ ¼δ
- ¡áºδóáѼ ¿¡ΓÑαΣÑ⌐ß¡δ¼¿ «íΩѬΓἿ, óºá¿¼«ñÑ⌐ßΓóπεΓ ß ß««ΓóÑΓßΓóπε-
- Θ¿¼¿ ó¿ºπá½∞¡δ¼¿ φ½Ñ¼Ñ¡ΓἿ, ¬«Γ«αδÑ ¼δ ¡áºδóáÑΓ ¿¡ΓÑαΣÑ⌐ß¡δ¼¿
- φ½Ñ¼Ñ¡ΓἿ. ôß»ÑΦ¡«Ñ π»αáó½Ñ¡¿Ñ óºá¿¼«ñÑ⌐ßΓó¿Ñ¼ «íΩѬΓ/φ½Ñ¼Ñ¡Γ -
- φΓ« ¬½ετ ¬ πß»ÑΦ¡«¼π »α«úαá¼¼¿α«óá¡¿ε ó Windows ß ¿ß»«½∞º«ó᡿Ѽ
- ObjectWindows.
-
- éºá¿¼«ñÑ⌐ßΓó¿Ñ «íΩѬΓ/φ½Ñ¼Ñ¡Γ «ßπΘÑßΓó½∩ÑΓß∩ τÑαѺ «»¿ßáΓѽ∞
- «¬¡á. è«úñá óδ ßΓα«¿ΓÑ ¿¡ΓÑαΣÑ⌐ß¡δ⌐ «íΩѬΓ, «ñ¡«⌐ ¿º Ñú« Σπ¡¬µ¿⌐
- ∩ó½∩ÑΓß∩ π¬áºá¡¿Ñ Windows ¡á ß«ºñá¡¿Ñ ¿¡ΓÑαΣÑ⌐ß¡«ú« φ½Ñ¼Ñ¡Γá.
- Windows ó«ºóαáΘáÑΓ ¿ñÑ¡Γ¿Σ¿µ¿απεΘ¿⌐ φëà φ½Ñ¼Ñ¡Γ «»¿ßáΓѽ∞, ¬«Γ«-
- αδ⌐ «íΩÑ¬Γ ß«σαá¡∩ÑΓ ó »«½Ñ ß ¿¼Ñ¡Ñ¼ HWindow. î¡«ú¿Ñ Σπ¡¬µ¿¿
- Windows ó«ß»α¿¡¿¼áεΓ «»¿ßáΓѽ∞ «¬¡á ó ¬áτÑßΓóÑ »áαá¼ÑΓαá, »«φΓ«¼π
- ß«σαá¡Ñ¡¿Ñ Ñú« ó »«½Ñ »«ññÑনóáÑΓ ú«Γ«ó¡«ßΓ∞ ñ«ßΓπ»á ¬ «¬«¡¡«¼π
- «íΩѬΓπ. ǡὫú¿τ¡«, »«½∩ ¿¡ΓÑαΣÑ⌐ß¡«ú« «íΩѬΓá ¼«ª¡« ¿ß»«½∞º«-
- óáΓ∞ ñ½∩ ß«σαá¡Ñ¡¿∩ ¿¡Σ«α¼áµ¿¿ « ßαÑñßΓóáσ «Γ«íαáªÑ¡¿∩ ¿½¿ ¿¡Σ«α-
- ¼áµ¿¿ « ß«ßΓ«∩¡¿¿ ¬«¡¬αÑΓ¡«ú« «¬¡á.
-
- ÇíßΓαáú¿α«óá¡¿Ñ Σπ¡¬µ¿⌐ Windows
-
- Åα¿½«ªÑ¡¿∩ Windows π»αáó½∩εΓ ßó«¿¼ ó¿ñ«¼ ¿ »«óÑñÑ¡¿Ñ¼ »πΓѼ
- ó맮óá Σπ¡¬µ¿⌐ Windows - ¡áí«αá »«τΓ¿ ¿º 600 Σπ¡¬µ¿⌐, «íαáºπεΘ¿⌐
- ¿¡ΓÑαΣÑ⌐ß ß »α¿¬½áñ¡«⌐ »α«úαá¼¼«⌐ Windows (API). èáªñá∩ Σπ¡¬µ¿∩
- ó«ß»α¿¡¿¼áÑΓ αạ««íαạδÑ »áαá¼ÑΓαδ αẽ¿τ¡δσ Γ¿»«ó, ¬«Γ«αδÑ ¼«-
- úπΓ íδΓ∞ ñ«ßΓáΓ«τ¡« ºá»πΓá¡¡δ¼¿. ò«Γ∩ ¿º Borland Pascal óδ ¼«ªÑΓÑ
- ¡Ñ»«ßαÑñßΓóÑ¡¡« óδºδóáΓ∞ ½εíπε Σπ¡¬µ¿ε Windows, ObjectWindows π»-
- α«ΘáÑΓ ºáñáτπ, »αÑñ½áúá∩ «íΩÑ¬Γ¡δÑ ¼ÑΓ«ñδ, áíßΓαáú¿απεΘ¿Ñ Σπ¡¬µ¿-
- «¡á½∞¡δÑ ó맮óδ.
-
- èᬠ«Γ¼ÑτὫß∞ óδΦÑ, ¼¡«ú¿Ñ ¿º »áαá¼ÑΓα«ó ñ½∩ Σπ¡¬µ¿⌐
- Windows πªÑ ºá»¿ßá¡δ ó »«½∩σ ¿¡ΓÑαΣÑ⌐ß¡δσ «íΩÑ¬Γ«ó. Æá¬¿¼ «íαá-
- º«¼, ¼ÑΓ«ñδ ¼«úπΓ ¿ß»«½∞º«óáΓ∞ φΓ¿ ñá¡¡δÑ ñ½∩ »«ñßΓá¡«ó¬¿ »áαá-
- ¼ÑΓα«ó ñ½∩ Σπ¡¬µ¿⌐ Windows. èα«¼Ñ Γ«ú«, ObjectWindows úαπ»»¿απÑΓ
- α«ñßΓóÑ¡¡δÑ Σπ¡¬µ¿«¡á½∞¡δÑ ó맮óδ ó «Γñѽ∞¡δσ ¼ÑΓ«ñáσ, ¬«Γ«αδÑ
- óδ»«½¡∩εΓ ºáñáτ¿ í«½ÑÑ óδß«¬«ú« πα«ó¡∩. ÉѺπ½∞ΓáΓ«¼ ∩ó½∩ÑΓß∩ π»-
- α«ΘÑ¡¡δ⌐ ¿ »α«ßΓ«⌐ ó ¿ß»«½∞º«óá¡¿¿ ¿¡ΓÑαΣÑ⌐ß API, π½πτΦáεΘ¿⌐ ßπ-
- ΘÑßΓóπεΘ¿⌐ API Windows.
-
- ò«Γ∩ Γᬫ⌐ »«ñσ«ñ ßπΘÑßΓóÑ¡¡« π¼Ñ¡∞ΦáÑΓ óáΦπ ºáó¿ß¿¼«ßΓ∞ «Γ
- ß«ΓÑ¡ Σπ¡¬µ¿⌐ API Windows, «¡ ¡Ñ ºá»αÑΘáÑΓ óá¼ óδºδóáΓ∞ API ¡Ñ-
- »«ßαÑñßΓóÑ¡¡«. ObjectWindows »αÑñ½áúáÑΓ ½πτΦÑÑ ¿º «í«¿σ "¼¿α«ó":
- «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡πε αáºαáí«Γ¬π óδß«¬«ú« πα«ó¡∩, »½εß ¼á¬ß¿-
- ¼á½∞¡«Ñ π»αáó½Ñ¡¿Ñ úαáΣ¿τÑ߬«⌐ «»Ñαᵿ«¡¡«⌐ ßαÑñ«⌐.
-
- ÇóΓ«¼áΓ¿ºáµ¿∩ «ΓóÑΓá ¡á ß««íΘÑ¡¿∩
-
- èα«¼Ñ ß««íΘÑ¡¿∩ «»Ñαᵿ«¡¡«⌐ ßαÑñÑ Windows, τΓ« ¡áñ« τΓ«-Γ«
-
- B.Pascal 7 & Objects /UG - 252 -
-
- ßñѽáΓ∞, í«½∞Φ¿¡ßΓó« »α¿½«ªÑ¡¿⌐ ñ«½ª¡δ ¿¼ÑΓ∞ 󫺼«ª¡«ßΓ∞ «ΓóÑτáΓ∞
- ¡á ß«Γ¡¿ ß««íΘÑ¡¿⌐ Windows, ∩ó½∩εΘ¿σß∩ αѺπ½∞ΓáΓ«¼ ñÑ⌐ßΓó¿⌐ »«½∞-
- º«óáΓѽ∩ (¡á»α¿¼Ñα, Θѽτ¬á ¬¡«»¬«⌐ "¼δΦ¿"), ñαπú¿σ »α¿½«ªÑ¡¿⌐ ¿½¿
- »α«τ¿σ ¿ßΓ«τ¡¿¬«ó. è«ααÑ¬Γ¡á∩ «íαáí«Γ¬á ß««íΘÑ¡¿⌐ ¿ «ΓóÑΓ ¡á ¡¿σ
- ∩ó½∩ÑΓß∩ αÑΦáεΘ¿¼ ñ½∩ »αáó¿½∞¡«⌐ αáí«Γδ óáΦÑ⌐ »α«úαá¼¼δ. èα«¼Ñ
- Γ«ú«, óáΦá »α«úαá¼¼á ñ«½ª¡á ¬á¬-Γ« «ΓóÑτáΓ∞ ¡á óδí«α ¼Ñ¡ε, ¿ ó
- «ΓóÑΓ ¡á ¬«¡¬αÑΓ¡«Ñ ß««íΘÑ¡¿Ñ αÑ὿º«óáΓ∞ φΓ« ¡Ñ Γαπñ¡«. ì« ¡á»¿-
- ßá¡¿Ñ »α«úαá¼¼δ, ¬«Γ«αá∩ º¡áÑΓ ¬á¬ «ΓóÑτáΓ∞ »«τΓ¿ ¡á 200 αẽ¿τ-
- ¡δσ ß««íΘÑ¡¿⌐ Windows, Γá¬ªÑ ºáΓαπñ¡¿Γѽ∞¡«, ¬á¬ ó맮ó ¡πª¡δσ
- Σπ¡¬µ¿¿ Windows.
-
- ÄíΩѬΓδ ß ¿σ »αÑñ«»αÑñѽѡ¡δ¼ »«óÑñÑ¡¿Ñ¼ (¼ÑΓ«ñἿ) »αѬαáß-
- ¡« »«ñσ«ñ∩Γ ñ½∩ ºáñáτ¿ «ΓóÑΓá ¡á ó¡ÑΦ¡¿Ñ ó«ºñÑ⌐ßΓó¿∩ (ß««íΘÑ¡¿∩
- Windows). ObjectWindows »αÑóαáΘáÑΓ ß««íΘÑ¡¿∩ Windows ó ó맮óδ ¼Ñ-
- Γ«ñ«ó Borland Pascal. Æá¬¿¼ «íαẫ¼, ß »«¼«Θ∞ε ObjectWindows óδ
- »α«ßΓ« «»αÑñѽ∩ÑΓÑ ¼ÑΓ«ñ ñ½∩ «ΓóÑΓá ¡á ¬áªñ«Ñ ß««íΘÑ¡¿Ñ, ¬«Γ«α«Ñ
- óá¼ ¡πª¡« «íαáíáΓδóáΓ∞ ó »α«úαá¼¼Ñ. ìá»α¿¼Ñα, ¬«úñá »«½∞º«óáΓѽ∞
- Θѽ¬áÑΓ ½Ñó«⌐ ¬¡«»¬«⌐ "¼δΦ¿", Windows úÑ¡Ñα¿απÑΓ ß««íΘÑ¡¿Ñ
- wm_LButtonDown. àß½¿ óδ σ«Γ¿ΓÑ, τΓ«íδ «¬¡« ¿½¿ π»αáó½∩εΘ¿⌐ φ½Ñ-
- ¼Ñ¡Γ ó óáΦÑ⌐ »α«úαá¼¼Ñ αÑáú¿α«ó὿ ¡á Γá¬¿Ñ ¡áªáΓ¿∩ ¬¡«»¬¿ "¼δ-
- Φ¿", ¡πª¡« «»αÑñѽ¿Γ∞ ¼ÑΓ«ñ WMLButtonDown, ¡áßΓα«Ñ¡¡δ⌐ ¡á ß««íΘÑ-
- ¡¿Ñ wm_LButtonDown. çáΓѼ, ¬«úñá Windows »«ßδ½áÑΓ φΓ« ß««íΘÑ¡¿Ñ,
- óáΦ «íΩÑ¬Γ áóΓ«¼áΓ¿τÑ߬¿ óδºδóáÑΓ «»αÑñѽѡ¡δ⌐ óἿ ¼ÑΓ«ñ.
-
- Æá¬¿Ñ ¼ÑΓ«ñδ ¡áºδóáεΓß∩ ¼ÑΓ«ñἿ «ΓóÑΓá ¡á ß««íΘÑ¡¿Ñ. üѺ
- «íΩÑ¬Γ¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¿α«óá¡¿∩ ¿ ObjectWindows óá¼
- »α¿Φ½«ß∞ íδ ¡á»¿ßáΓ∞ ñ½¿¡¡δ⌐ «»ÑαáΓ«α case ñ½∩ ¬áªñ«ú« «¬¡á ¿ π»-
- αáó½∩Γ∞ »«ßΓπ»½Ñ¡¿Ñ¼ φΓ«ú« ß««íΘÑ¡¿∩, «Γß«αΓ¿α«óδóáΓ∞ ó¿ñ ß««íΘÑ-
- ¡¿∩ ¿ ¡á¬«¡Ñµ, αÑΦáΓ∞, τΓ« ß ¡¿¼ ñѽáΓ∞. ObjectWindows íÑαÑΓ ¡á
- ßÑí∩ óßÑ φΓ¿ Σπ¡¬µ¿¿.
-
-
- B.Pascal 7 & Objects /UG - 253 -
-
- æΓαπ¬Γπαá »α«úαá¼¼δ Windows
- ─────────────────────────────────────────────────────────────────
-
- Åα¿ ¡á½¿τ¿¿ Γᬫú« ¼¡«ªÑßΓóá óºá¿¼«ñÑ⌐ßΓóπεΘ¿σ φ½Ñ¼Ñ¡Γ«ó
- »α«úαá¼¼¡«ú« «íÑß»ÑτÑ¡¿∩ ¬á¬ DOS, Windows ¿ »α¿¬½áñ¡δÑ »α«úαá¼¼δ
- »«½Ñº¡« º¡áΓ∞ « Γ«¼, ¬á¬¿Ñ τáßΓ¿ óáΦ¿σ »α¿½«ªÑ¡¿⌐ Windows óºá¿¼«-
- ñÑ⌐ßΓóπεΓ ß «¬απªáεΘÑ⌐ ¿σ »α«úαá¼¼¡«⌐ ßαÑñ«⌐. é ñá¡¡«¼ αáºñѽÑ
- ¿ßß½ÑñπÑΓß∩ ßΓαπ¬Γπαá Γ¿»¿τ¡δσ »α¿½«ªÑ¡¿⌐ Windows, ¡á»¿ßá¡¡δσ ó
- Borland Pascal with Objects.
-
- æΓαπ¬Γπαá Windows
- ─────────────────────────────────────────────────────────────────
-
- ìá φΓá»Ñ óδ»«½¡Ñ¡¿∩ Σπ¡¬µ¿«¡á½∞¡δÑ ó«º¼«ª¡«ßΓ¿ Windows ¿ ÑÑ
- API ß«ßαÑñ«Γ«τÑ¡δ ó ΓαÑσ í¿í½¿«ΓÑτ¡δσ ¼«ñπ½∩σ, óδºδóáѼδσ αáí«Γá-
- εΘ¿¼¿ ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ »α¿½«ªÑ¡¿∩¼¿. ¥Γ« ß½ÑñπεΘ¿Ñ ¼«ñ㫨 Windows:
-
- * KERNEL.EXE - π»αáó½∩ÑΓ αáß»αÑñѽѡ¿Ñ¼ »á¼∩Γ¿ ¿ αÑßπαß«ó,
- óδ»«½¡∩ÑΓ »½á¡¿α«óá¡¿Ñ ¿ óºá¿¼«ñÑ⌐ßΓó¿Ñ ß DOS.
-
- * GDI.EXE - óδó«ñ¿Γ ¡á φ¬αá¡ ¿ ¡á »α¿¡ΓÑα úαáΣ¿¬π.
-
- * USER.EXE - αáí«ΓáÑΓ ß «¬¡á¼¿, óó«ñ«¼ ñá¡¡δσ «Γ »«½∞º«óáΓÑ-
- ½∩ ¿ ¬«¼¼π¡¿¬áµ¿∩¼¿.
-
- ¥Γ¿ ¼«ñ㫨 ∩ó½∩εΓß∩ ¬«¼»«¡Ñ¡ΓἿ αáß»α«ßΓαá¡∩Ѽ«⌐ óÑαß¿¿
- Windows, »«φΓ«¼π »«½∞º«óáΓѽ¿ Windows ¼«úπΓ ¡á⌐Γ¿ ¿σ ¡á ßó«¿σ
- ñ¿ß¬áσ. Å«ßΓáó½∩ѼδÑ »α«úαá¼¼δ ¿ß»«½∞ºπεΓ φΓ¿ í¿í½¿«ΓÑτ¡δÑ ¼«ñπ-
- ½¿; «¡ ¡Ñ ó¬½ετáεΓ ¿σ.
-
- éºá¿¼«ñÑ⌐ßΓó¿Ñ ß Windows ¿ DOS
- ─────────────────────────────────────────────────────────────────
-
- êº-ºá «úαá¡¿τÑ¡¡«ú« ¼áßΦΓáíá «»Ñαᵿ«¡¡«⌐ ß¿ßΓѼδ DOS ½Ñú¬«
- »αÑñó¿ñÑΓ∞, ¬á¬ íπñÑΓ ó½¿∩Γ∞ DOS ¡á πß»ÑΦ¡«Ñ óδ»«½¡Ñ¡¿Ñ óáΦ¿σ
- »α¿¬½áñ¡δσ »α«úαá¼¼. ÆÑ¼ ¡Ñ ¼Ñ¡ÑÑ, »α«úαá¼¼á ñ½∩ DOS αáí«ΓáÑΓ
- í½áú«ñáα∩ óºá¿¼«ñÑ⌐ßΓó¿ε ¼Ñªñπ óáΦÑ⌐ »α«úαá¼¼«⌐ ¿ ßαÑñßΓóἿ «»Ñ-
- αᵿ«¡¡«⌐ ß¿ßΓѼδ.
-
- ǡὫú¿τ¡«Ñ »αá󿽫 ñÑ⌐ßΓóπÑΓ ñ½∩ »α«úαá¼¼δ Windows. Å«ß-
- ¬«½∞¬π Windows »αÑñ½áúáÑΓ º¡áτ¿Γѽ∞¡« í«½∞ΦÑÑ τ¿ß½« Σπ¡¬µ¿«¡á½∞-
- ¡δσ ó맮ó«ó «»Ñαᵿ«¡¡«⌐ ß¿ßΓѼδ, óºá¿¼«ñÑ⌐ßΓó¿Ñ ¼Ñªñπ Windows ¿
- óáΦÑ⌐ »α«úαá¼¼«⌐ «Γß½Ññ¿Γ∞ º¡áτ¿Γѽ∞¡« Γαπñ¡ÑÑ. ìá»α¿¼Ñα, τΓ«íδ
- óδóÑßΓ¿ úαáΣ¿¬π ¡á φ¬αá¡, óáΦá »α«úαá¼¼á ñ«½ª¡á óδºóáΓ∞ Σπ¡¬µ¿ε
- GDI Windows. ä½∩ αÑᬵ¿¿ ¡á ¡áªáΓ¿Ñ »«½∞º«óáΓѽѼ ¬¡«»¬¿ "¼δΦ¿"
- »α«úαá¼¼á ñ«½ª¡á «»αÑñѽ∩Γ∞ ¼ÑΓ«ñ αÑᬵ¿¿ («ΓóÑΓá) ¡á ß««íΘÑ¡¿Ñ.
- éáΦá »α«úαá¼¼á ñ«½ª¡á ¡Ñ»αÑαδó¡« óºá¿¼«ñÑ⌐ßΓó«óáΓ∞ ß «»Ñαᵿ«¡¡«⌐
- ß¿ßΓѼ«⌐ (DOS + Windows).
-
-
-
- B.Pascal 7 & Objects /UG - 254 -
-
- ¥½Ñ¼Ñ¡Γáα¡á∩ »α«úαá¼¼á
- ─────────────────────────────────────────────────────────────────
-
- Æαáñ¿µ¿«¡¡δ¼ óóÑñÑ¡¿Ñ¼ ó ¡«óδ⌐ ∩ºδ¬ »α«úαá¼¼¿α«óá¡¿∩ ¿½¿
- «»Ñαᵿ«¡¡πε ßαÑñπ ∩ó½∩ÑΓß∩ »α«úαá¼¼á, óδó«ñ∩Θá∩ ß««íΘÑ¡¿Ñ
- "Hello, Word!", ¡á»¿ßá¡¡á∩ ¡á ñá¡¡«¼ ∩ºδ¬Ñ ¿½¿ ñ½∩ ñá¡¡«⌐ «»Ñαá-
- µ¿«¡¡«⌐ ßαÑñδ. ¥Γ« »α«úαá¼¼á ß«ñÑαª¿Γ ¬«½¿τÑßΓó« »α«úαá¼¼¡«ú« ¬«-
- ñá, ñ«ßΓáΓ«τ¡«Ñ ñ½∩ óδó«ñá ¡á φ¬αá¡ ßΓ᫬¿ "Hello, Word!".
-
- è«¡Ñτ¡«, ó Windows ¡πª¡« ßñѽáΓ∞ º¡áτ¿Γѽ∞¡« í«½∞ΦÑ. éá¼
- ¡πª¡« óδóÑßΓ¿ «¬¡«, ºá»¿ßáΓ∞ ó ¡Ñú« ΓѬßΓ ¿ ßñѽáΓ∞ Γá¬, τΓ«íδ
- «¬¡« óºá¿¼«ñÑ⌐ßΓó«óὫ ß "«¬απªáεΘ¿¼ ¼¿α«¼", »« ¬αá⌐¡Ñ⌐ ¼ÑαÑ óδ
- ñ«½ª¡δ ¿¼ÑΓ∞ 󫺼«ª¡«ßΓ∞ ºá¬αδΓ∞ «¬¡« ¿ óδ⌐Γ¿. àß½¿ óδ íπñÑΓÑ ñÑ-
- ½áΓ∞ óßÑ φΓ« ß ßá¼δσ «ß¡«ó, Γ« ñáªÑ ñ½∩ óδ»«½¡Ñ¡¿∩ φΓ¿σ φ½Ñ¼Ñ¡-
- Γáα¡δσ ºáñáτ »«ΓαÑíπÑΓß∩ «τÑ¡∞ í«½∞Φ«⌐ «íΩѼ ¬«ñá. ìá»α¿¼Ñα,
- »α«úαá¼¼á GENERIC.PAS, ß«ñÑαªáΘá∩ß∩ ¡á ñ¿ßΓα¿íπΓ¿ó¡δσ ñ¿ß¬áσ, óδ-
- »«½¡∩∩ Γá¬¿Ñ φ½Ñ¼Ñ¡Γáα¡δÑ ñÑ⌐ßΓó¿∩, ºá¡¿¼áÑΓ í«½ÑÑ 100 ßΓ᫬.
-
- ¥Γ« ßó∩ºá¡« ß ΓѼ, τΓ« »αÑñΩ∩ó½∩ÑΓ ¬ »α¿¬½áñ¡«⌐ »α«úαá¼¼Ñ
- α∩ñ ΓαÑí«óá¡¿⌐, ¬«Γ«αδÑ Γá ñ«½ª¡á πñ«ó½ÑΓó«α∩Γ∞ »ÑαÑñ ΓѼ, ¬á¬
- «¡á ß¼«ªÑΓ αáí«ΓáΓ∞ ó Windows. äáªÑ »α«ßΓÑ⌐Φá∩ »α«úαá¼¼á ΓαÑíπÑΓ
- í«½∞Φ«ú« «íΩÑ¼á ¿ßσ«ñ¡«ú« ¬«ñá. è ßτáßΓ∞ε, »α«úαá¼¼δ, ¡á»¿ßá¡¡δÑ
- ß ¿ß»«½∞º«ó᡿Ѽ ObjectWindows, áóΓ«¼áΓ¿τÑ߬¿ πñ«ó½ÑΓó«α∩εΓ φΓ¿¼
- ΓαÑí«óá¡¿∩¼ (ó¬½ετá∩ ß«ºñá¡¿Ñ ¿ óδó«ñ ¡á φ¬αá¡ «ß¡«ó¡«ú« «¬¡á ¿
- ß«σαá¡Ñ¡¿Ñ ñ½∩ »α¿½«ªÑ¡¿∩ «»¿ßáΓѽ∩ «¬¡á). Æá¬¿¼ «íαẫ¼, »α«ú-
- αá¼¼á "Hello, Word!" ß«¬αáΘáÑΓß∩ óßÑú« ñ« 16 ßΓ᫬.
-
- program HelloApp;
-
- uses WObjects;
-
- type
- THelloWord = object(TApplication)
- procedure InitMainWindow; virtual;
- end;
-
- procedure THelloWord.InitMainWindow;
- begin
- MainWindow := New(PWindow,
- Init(nil, 'Hello, Borland Pascal'));
- end;
-
- var HelloWord: THelloWord;
-
- begin
- HelloWord.Init('HelloWord');
- HelloWord.Run;
- HelloWord.Done;
- end.
-
- äÑ⌐ßΓó¿∩ »α«úαá¼¼δ »α¿ ºá»π߬Ñ
-
- Åα¿ ºá»π᪥ »α«úαá¼¼á ObjectWindows ñ«½ª¡á ß¡áτá½á »«½πτ¿Γ∞
-
- B.Pascal 7 & Objects /UG - 255 -
-
- «Γ Windows τÑΓδαÑ º¡áτÑ¡¿∩ ¿ ß«σαá¡¿Γ∞ ¿σ ó ß««ΓóÑΓßΓóπεΘ¿σ ú½«-
- íá½∞¡δσ »ÑαѼѡ¡δσ. (¥Γ« »α«¿ßσ«ñ¿Γ áóΓ«¼áΓ¿τÑ߬¿, ¡« Ñß½¿ íδ óδ
- »¿ß὿ »α«úαá¼¼π, ¡Ñ ¿ß»«½∞ºπ∩ ObjectWindows, Γ« »α¿Φ½«ß∞ íδ «í
- φΓ«¼ »«ºáí«Γ¿Γ∞ß∩.)
-
- * é HInstance ß«σαá¡∩ÑΓß∩ «»¿ßáΓѽ∞ φ¬ºÑ¼»½∩αá »α«úαá¼¼δ.
-
- * é HPrevInst ß«σαá¡∩ÑΓß∩ «»¿ßáΓѽ∞ »«ß½Ññ¡Ñú« φ¬ºÑ¼»½∩αá
- Γ«⌐ ªÑ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ.
-
- * é CmdShow ºá»¿ßδóáÑΓß∩ µÑ½«Ñ º¡áτÑ¡¿Ñ, »αÑñßΓáó½∩εΘÑÑ ¡á-
- τá½∞¡δ⌐ αѪ¿¼ óδó«ñá «ß¡«ó¡«ú« «¬¡á. Ä¡« ¿ß»«½∞ºπÑΓß∩ ñ½∩
- ó맮óá ¼ÑΓ«ñá Show.
-
- * é CmdLine ºá»¿ßδóáÑΓß∩ ¬«¼á¡ñ¡á∩ ßΓ᫬á ó맮óá »α¿¬½áñ¡«⌐
- »α«úαá¼¼δ, ó¬½ετá∩ »áαá¼ÑΓαδ ¿ ¿¼∩ Σá⌐½á, ¡á»α¿¼Ñα
- "CALC.EXE /M" ¿½¿ "WORDPROC.EXE LETTER1.DOC".
-
- èᬠ»α¿½«ªÑ¡¿Ñ ObjectWindows, »α«úαá¼¼á HelloApp ñ«½ª¡á
- ßΓα«¿Γ∞ ¿ ¿¡¿µ¿á½¿º¿α«óáΓ∞ «íΩÑ¬Γ «ß¡«ó¡«ú« «¬¡á. Ä¡á ¼«ªÑΓ ¿¡¿-
- µ¿á½¿º¿α«óáΓ∞ Γ«½∞¬« »Ñαóδ⌐ φ¬ºÑ¼»½∩α HelloApp ß »«¼«Θ∞ε ¼ÑΓ«ñá
- InitApplication, ½¿í« ¿¡¿µ¿á½¿º¿α«óáΓ∞ ¬áªñδ⌐ φ¬ºÑ¼»½∩α HelloApp
- ß »«¼«Θ∞ε ¼ÑΓ«ñá InitInstance.
-
- HelloApp ¡áτ¿¡áÑΓ µ¿¬½ ß««íΘÑ¡¿∩, óδºδóá∩ ¼ÑΓ«ñ Run. ìᬫ-
- ¡Ñµ, «¡á ºáóÑαΦáÑΓß∩ »πΓѼ «ßó«í«ªñÑ¡¿∩ «íΩѬΓá »α¿¬½áñ¡«⌐ »α«ú-
- αá¼¼δ ß »«¼«Θ∞ε ¼ÑΓ«ñá Done.
-
- ìạáτÑ¡¿Ñ «ß¡«ó¡«ú« «¬¡á
-
- Äß¡«ó¡«Ñ «¬¡« »α¿¬½áñ¡«⌐ »α«úαá¼¼δ - φΓ« «¬¡« »Ñαó«¡áτá½∞¡«-
- ú« óδó«ñá »α¿¬½áñ¡«⌐ »α«úαá¼¼δ »α¿ ÑÑ ºá»π߬Ñ. Ä¡« «ΓóÑτáÑΓ ºá
- »αÑñßΓáó½Ñ¡¿∩ »«½∞º«óáΓѽε ß»¿ß¬á ñ«ßΓπ»¡δσ ¬«¼á¡ñ (¼Ñ¡ε). é«
- óαѼ∩ ßÑá¡ßá αáí«Γδ ß »α¿¬½áñ¡«⌐ »α«úαá¼¼«⌐ «ß¡«ó¡«Ñ «¬¡« π»αáó-
- ½∩ÑΓ ¿¡ΓÑαΣÑ⌐ß«¼ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ ¿ ó« ¼¡«ú¿σ ß½πτá∩σ ∩ó½∩ÑΓ-
- ß∩ Ññ¿¡ßΓóÑ¡¡«⌐ αáí«τÑ⌐ «í½áßΓ∞ε »α«úαá¼¼δ, ß«ºñáóá∩, ¬«úñá φΓ«
- ΓαÑíπÑΓß∩, ñ¿á½«ú«óδÑ «¬¡á. äαπú¿Ñ, í«½ÑÑ ß½«ª¡δÑ »α¿½«ªÑ¡¿∩, ¼«-
- úπΓ ¿ß»«½∞º«óáΓ∞ ó ¬áτÑßΓóÑ αáí«τ¿σ «í½áßΓÑ⌐ ¡Ñ߬«½∞¬« «¬«¡. è«ú-
- ñá »«½∞º«óáΓѽ∞ ºá¬αδóáÑΓ «ß¡«ó¡«Ñ «¬¡«, «¡ ¿¡¿µ¿á½¿º¿απÑΓ »α«-
- µÑßß ºá¬αδΓ¿∩ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ.
-
-
-
- B.Pascal 7 & Objects /UG - 256 -
-
- û¿¬½ αáºαáí«Γ¬¿ »α¿¬½áñ¡«⌐ »α«úαá¼¼δ
- ─────────────────────────────────────────────────────────────────
-
- êº-ºá ¡á½¿τ¿∩ «»αÑñѽѡ¡δσ ΓαÑí«óá¡¿⌐ ¬« ¼¡«ú¿¼ »α¿¬½áñ¡δ¼
- »α«úαἼἠWindows (¡á»α¿¼Ñα, ¿¡¿µ¿á½¿ºáµ¿∩ «ß¡«ó¡«ú« «¬¡á) óá¼
- íπñÑΓ ½ÑúτÑ óßÑú« ¡áτáΓ∞ »¿ßáΓ∞ »α«úαá¼¼π, ¿ß»«½∞ºπ∩ ßπΘÑßΓóπεΘÑÑ
- »α¿½«ªÑ¡¿Ñ Windows ¿ »α¿ß»«ßáí½¿óá∩ Ñú« ñ½∩ ßó«¿σ ¡πªñ. é
- ObjectWindows óδ ¼«ªÑΓÑ ¡á⌐Γ¿ ¼¡«ú« »α¿¼Ñα«ó »α«úαá¼¼. éδíÑα¿ΓÑ
- ñ½∩ ßó«Ñú« »α¿½«ªÑ¡¿∩ ¡á¿í«½ÑÑ »«ñσ«ñ∩Θπε.
-
- êß»«½∞ºπ∩ ó Windows ¿¡ΓÑúα¿α«óá¡¡πε ¿¡ΓÑαá¬Γ¿ó¡πε ßαÑñπ αáº-
- αáí«Γ¬¿ »α«úαá¼¼, óδ º¡áτ¿Γѽ∞¡« ß«¬αáΓ¿ΓÑ óαѼ∩ αáºαáí«Γ¬¿. ü½á-
- ú«ñáα∩ ¼¡«ú«ºáñáτ¡δ¼ 󫺼«ª¡«ßΓ∩¼ Windows, óδ ¼«ªÑΓÑ ºá»πßΓ¿Γ∞
- IDE, Resource Workshop ¿ ßó«ε »α¿¬½áñ¡πε »α«úαá¼¼π «ñ¡«óαѼѡ¡«.
- Å«ßΓáó½∩ѼδÑ ß Borland Pascal for Windows ¿¡ßΓαπ¼Ñ¡Γá½∞¡δÑ ßαÑñß-
- Γóá ¡Ñ Γ«½∞¬« «í½ÑúτáεΓ ¬áªñπε ºáñáτπ, ¡« ¿ ß«¬αáΘáεΓ τ¿ß½« ºáñáτ
- »α¿ αáºαáí«Γ¬Ñ »α¿½«ªÑ¡¿∩ Windows. Å« ßπΘÑßΓóπ, φΓ« »α«µÑßß ¼«ª¡«
- ß«¬αáΓ¿Γ∞ ñ« ß½ÑñπεΘ¿σ ¡Ñ߬«½∞¬¿σ Φáú«ó:
-
- 1. 櫺ñá¡¿Ñ ¿ßσ«ñ¡«ú« ¬«ñá »α«úαá¼¼δ ¿ ó¬½ετÑ¡¿Ñ ó »α«úαá¼¼π
- ¿¼Ñ¡ Σá⌐½«ó αÑßπαß«ó, ¬«Γ«αδÑ íπñπΓ ¿ß»«½∞º«óáΓ∞ß∩ »« ñ¿-
- αÑ¬Γ¿óÑ {$R ¿¼∩_Σá⌐½á}.
-
- 2. 櫺ñá¡¿Ñ αÑßπαß«ó ñ½∩ ñ¿á½«ú«óδσ «¬«¡, ¼Ñ¡ε ¿ Γ.ñ.
-
- 3. 諼»¿½∩µ¿∩ »α«úαá¼¼δ.
-
- 4. ê¡ΓÑαá¬Γ¿ó¡á∩ «Γ½áñ¬á »α«úαá¼¼δ.
-
- êºπτÑ¡¿Ñ ObjectWindows
- ─────────────────────────────────────────────────────────────────
-
- ÆÑ»Ñα∞, ¬«úñá óδ »«¡∩½¿ «ß¡«óδ »α«úαá¼¼¿α«óá¡¿∩ ó Windows ¿
- ¿¼ÑÑΓÑ ¡áτá½∞¡δÑ ßóÑñÑ¡¿∩ «í ObjectWindows, ¼«ªÑΓÑ ¡áτ¿¡áΓ∞ »α«ú-
- αá¼¼¿α«óáΓ∞. ìáτ¡¿ΓÑ ß τΓÑ¡¿∩ "Éπ¬«ó«ñßΓóá »« »α«úαá¼¼¿α«óá¡¿ε ß
- ¿ß»«½∞º«ó᡿Ѽ ObjectWindows" ¿ Φáú ºá Φáú«¼ ¿ºπτ¿ΓÑ, ¬á¬ αáºαá-
- íáΓδóáΓ∞ »α¿½«ªÑ¡¿Ñ ObjectWindows.
-