Π—Π°ΠΊΠ°Π·Π°Ρ‚ΡŒ курсовыС, ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½Ρ‹Π΅, Ρ€Π΅Ρ„Π΅Ρ€Π°Ρ‚Ρ‹...
ΠžΠ±Ρ€Π°Π·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΠ½Ρ‹Π΅ Ρ€Π°Π±ΠΎΡ‚Ρ‹ Π½Π° Π·Π°ΠΊΠ°Π·. НСдорого!

Π‘ΠΎΡ…Ρ€Π°Π½Π΅Π½ΠΈΠ΅ ΠΈ Π²Ρ‹Π΄Π°Ρ‡Π° ΠΈΠ·ΠΎΠ±Ρ€Π°ΠΆΠ΅Π½ΠΈΠΉ

Π Π΅Ρ„Π΅Ρ€Π°Ρ‚ΠŸΠΎΠΌΠΎΡ‰ΡŒ Π² Π½Π°ΠΏΠΈΡΠ°Π½ΠΈΠΈΠ£Π·Π½Π°Ρ‚ΡŒ ΡΡ‚ΠΎΠΈΠΌΠΎΡΡ‚ΡŒΠΌΠΎΠ΅ΠΉ Ρ€Π°Π±ΠΎΡ‚Ρ‹

Π—Π΄Π΅ΡΡŒ X, YΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Ρ‹ Π»Π΅Π²ΠΎΠ³ΠΎ Π²Π΅Ρ€Ρ…Π½Π΅Π³ΠΎ ΡƒΠ³Π»Π° Ρ‚ΠΎΠ³ΠΎ мСста Π½Π° ΡΠΊΡ€Π°Π½Π΅, ΠΊΡƒΠ΄Π° Π±ΡƒΠ΄Π΅Ρ‚ скопирован Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚ изобраТСния; Buf — пСрСмСнная ΠΈΠ»ΠΈ участок ΠΊΡƒΡ‡ΠΈ, ΠΎΡ‚ΠΊΡƒΠ΄Π° бСрСтся ΠΈΠ·ΠΎΠ±Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅; Mode — способ копирования. Π—Π΄Π΅ΡΡŒ X1. Y2 — ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Ρ‹ ΡƒΠ³Π»ΠΎΠ² Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚Π° изобраТСния; Buf — пСрСмСнная ΠΈΠ»ΠΈ участок ΠΊΡƒΡ‡ΠΈ, ΠΊΡƒΠ΄Π° Π±ΡƒΠ΄ΡƒΡ‚ ΠΏΠΎΠΌΠ΅Ρ‰Π΅Π½Π° копия видСопамяти с Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚ΠΎΠΌ изобраТСния. ΠŸΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Π° PutImage. Π’Ρ‹Π²ΠΎΠ΄ΠΈΡ‚ Π² Π·Π°Π΄Π°Π½Π½ΠΎΠ΅ мСсто… Π§ΠΈΡ‚Π°Ρ‚ΡŒ Π΅Ρ‰Ρ‘ >

Π‘ΠΎΡ…Ρ€Π°Π½Π΅Π½ΠΈΠ΅ ΠΈ Π²Ρ‹Π΄Π°Ρ‡Π° ΠΈΠ·ΠΎΠ±Ρ€Π°ΠΆΠ΅Π½ΠΈΠΉ (Ρ€Π΅Ρ„Π΅Ρ€Π°Ρ‚, курсовая, Π΄ΠΈΠΏΠ»ΠΎΠΌ, ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½Π°Ρ)

Ѐункция ImageSize. Π’ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ Ρ€Π°Π·ΠΌΠ΅Ρ€ памяти Π² Π±Π°ΠΉΡ‚Π°Ρ…, Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΡ‹ΠΉ для размСщСния ΠΏΡ€ΡΠΌΠΎΡƒΠ³ΠΎΠ»ΡŒΠ½ΠΎΠ³ΠΎ Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚Π° изобраТСния.

Function ImageSize(X1, Y2, X2, Y2: Integer): Word;

Π—Π΄Π΅ΡΡŒ X1. Y2 — ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Ρ‹ Π»Π΅Π²ΠΎΠ³ΠΎ Π²Π΅Ρ€Ρ…Π½Π΅Π³ΠΎ (X1,Y1) ΠΈ ΠΏΡ€Π°Π²ΠΎΠ³ΠΎ Π½ΠΈΠΆΠ½Π΅Π³ΠΎ (X2,Y2) ΡƒΠ³Π»ΠΎΠ² Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚Π° изобраТСния.

ΠŸΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Π° GetImage. ΠŸΠΎΠΌΠ΅Ρ‰Π°Π΅Ρ‚ Π² ΠΏΠ°ΠΌΡΡ‚ΡŒ копию ΠΏΡ€ΡΠΌΠΎΡƒΠ³ΠΎΠ»ΡŒΠ½ΠΎΠ³ΠΎ Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚Π° изобраТСния. графичСский функция ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Π° паскаль.

Procedure GetImage(X1, Y1, X2, Y2: Integer; var Buf);

Π—Π΄Π΅ΡΡŒ X1. Y2 — ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Ρ‹ ΡƒΠ³Π»ΠΎΠ² Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚Π° изобраТСния; Buf — пСрСмСнная ΠΈΠ»ΠΈ участок ΠΊΡƒΡ‡ΠΈ, ΠΊΡƒΠ΄Π° Π±ΡƒΠ΄ΡƒΡ‚ ΠΏΠΎΠΌΠ΅Ρ‰Π΅Π½Π° копия видСопамяти с Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚ΠΎΠΌ изобраТСния.

Π Π°Π·ΠΌΠ΅Ρ€ Buf Π΄ΠΎΠ»ΠΆΠ΅Π½ Π±Ρ‹Ρ‚ΡŒ Π½Π΅ ΠΌΠ΅Π½ΡŒΡˆΠ΅ значСния, Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅ΠΌΠΎΠ³ΠΎ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠ΅ΠΉ ImageSize с Ρ‚Π΅ΠΌΠΈ ΠΆΠ΅ ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Π°ΠΌΠΈ X1. Y2.

ΠŸΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Π° PutImage. Π’Ρ‹Π²ΠΎΠ΄ΠΈΡ‚ Π² Π·Π°Π΄Π°Π½Π½ΠΎΠ΅ мСсто экрана копию Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚Π° изобраТСния, Ρ€Π°Π½Π΅Π΅ ΠΏΠΎΠΌΠ΅Ρ‰Π΅Π½Π½ΡƒΡŽ Π² ΠΏΠ°ΠΌΡΡ‚ΡŒ ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€ΠΎΠΉ GetImage.

Procedure PutImage(X, Y: Integer; var Buf; Mode: Word);

Π—Π΄Π΅ΡΡŒ X, YΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Ρ‹ Π»Π΅Π²ΠΎΠ³ΠΎ Π²Π΅Ρ€Ρ…Π½Π΅Π³ΠΎ ΡƒΠ³Π»Π° Ρ‚ΠΎΠ³ΠΎ мСста Π½Π° ΡΠΊΡ€Π°Π½Π΅, ΠΊΡƒΠ΄Π° Π±ΡƒΠ΄Π΅Ρ‚ скопирован Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚ изобраТСния; Buf — пСрСмСнная ΠΈΠ»ΠΈ участок ΠΊΡƒΡ‡ΠΈ, ΠΎΡ‚ΠΊΡƒΠ΄Π° бСрСтся ΠΈΠ·ΠΎΠ±Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅; Mode — способ копирования.

Как Π²ΠΈΠ΄ΠΈΠΌ, ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Ρ‹ ΠΏΡ€Π°Π²ΠΎΠ³ΠΎ Π½ΠΈΠΆΠ½Π΅Π³ΠΎ ΡƒΠ³Π»Π° Π½Π΅ ΡƒΠΊΠ°Π·Ρ‹Π²Π°ΡŽΡ‚ся, Ρ‚Π°ΠΊ ΠΊΠ°ΠΊ ΠΎΠ½ΠΈ ΠΏΠΎΠ»Π½ΠΎΡΡ‚ΡŒΡŽ ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΡΡŽΡ‚ΡΡ Ρ€Π°Π·ΠΌΠ΅Ρ€Π°ΠΌΠΈ вновь Π²Ρ‹Π²ΠΎΠ΄ΠΈΠΌΠΎΠΉ Π½Π° ΡΠΊΡ€Π°Π½ ΠΊΠΎΠΏΠΈΠΈ изобраТСния. ΠšΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Ρ‹ Π»Π΅Π²ΠΎΠ³ΠΎ Π²Π΅Ρ€Ρ…Π½Π΅Π³ΠΎ ΡƒΠ³Π»Π° ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ ΠΊΠ°ΠΊΠΈΠΌΠΈ ΡƒΠ³ΠΎΠ΄Π½ΠΎ, лишь Π±Ρ‹ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ выводимая копия ΡƒΠΌΠ΅ΡΡ‚ΠΈΠ»Π°ΡΡŒ Π² ΠΏΡ€Π΅Π΄Π΅Π»Π°Ρ… экрана (Ссли копия Π½Π΅ ΡΠΌΠΎΠΆΠ΅Ρ‚ Ρ€Π°Π·ΠΌΠ΅ΡΡ‚ΠΈΡ‚ΡŒΡΡ Π½Π° ΡΠΊΡ€Π°Π½Π΅, ΠΎΠ½Π° Π½Π΅ Π²Ρ‹Π²ΠΎΠ΄ΠΈΡ‚ся ΠΈ ΡΠΊΡ€Π°Π½ остаСтся Π±Π΅Π· ΠΈΠ·ΠΌΠ΅Π½Π΅Π½ΠΈΠΉ).

ΠŸΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€ Mode опрСдСляСт способ взаимодСйствия вновь Ρ€Π°Π·ΠΌΠ΅Ρ‰Π°Π΅ΠΌΠΎΠΉ ΠΊΠΎΠΏΠΈΠΈ ΡƒΠΆΠ΅ ΠΈΠΌΠ΅ΡŽΡ‰ΠΈΠΌΡΡ Π½Π° ΡΠΊΡ€Π°Π½Π΅ ΠΈΠ·ΠΎΠ±Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ΠΌ. ВзаимодСйствиС осущСствляСтся ΠΏΡƒΡ‚Π΅ΠΌ примСнСния ΠΊΠΎΠ΄ΠΈΡ€ΡƒΠ΅ΠΌΡ‹Ρ… этим ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€ΠΎΠΌ логичСски ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΉ ΠΊ ΠΊΠ°ΠΆΠ΄ΠΎΠΌΡƒ Π±ΠΈΡ‚Ρƒ ΠΊΠΎΠΏΠΈΠΈ ΠΈ ΠΈΠ·ΠΎΠ±Ρ€Π°ΠΆΠ΅Π½ΠΈΡ.

ΠŸΠΎΠΊΠ°Π·Π°Ρ‚ΡŒ вСсь тСкст
Π—Π°ΠΏΠΎΠ»Π½ΠΈΡ‚ΡŒ Ρ„ΠΎΡ€ΠΌΡƒ Ρ‚Π΅ΠΊΡƒΡ‰Π΅ΠΉ Ρ€Π°Π±ΠΎΡ‚ΠΎΠΉ