Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как передать канву в качестве параметра ? [D5]


Danila ©   (2002-03-30 11:44:00) 

Нужно написать процедуру, которой передается в качестве параметра TCanvas любого компонента (типа procedure Draw(var Canv:TCanvas) ). А процедура рисует на этой канве нечто...
Как это можно организовать ?


SoftOne   (2002-04-01 02:33:00) [1]

> Danila (31.03.02 03:37)
>Ну как бы обьяснить... Я всегда думал, что можно передавать >параметры в процедуру по ссылке и по значению. По значению - это >когда для процедуры создается копия передаваемого параметра,

Правильно думал! Именно так и передаются параметры в процедуру.
Но!!! Ты передаешь в нее параметр типа TCanvas, который уже имеет тип Pointer. Теперь разберись, что тебе передастся в случаях "по ссылке" и "по значению"!


Song   (2002-03-31 10:50:00) [2]

Неправда. Если Вы передаёте канвас в качестве фиктивного параметра в процедру, она будет рисовать не "хрен знает где", а именно на этом канвасе. Говорю Вам авторитетно, потому что недавно как раз занимался подобной задачей. Если у Вас ошибка, ищите её в другом месте.


Danila   (2002-03-31 03:37:00) [3]

SoftOne, что такое копия канвы ?

Ну как бы обьяснить... Я всегда думал, что можно передавать параметры в процедуру по ссылке и по значению. По значению - это когда для процедуры создается копия передаваемого параметра, и в теле процедуры идет работа с именно этой копией. То есть, процедура не может изменить самого передаваемого параметра. А по значению (ключевое слово Var) - соответственно передается ссылка на сам параметр, и если в теле процедуры его изменят, то и сам параметр изменится... мож криво объяснил, но смысл думаю понятен =)
так вот я думаю, что по аналогии, если писать просто Procedure XXX(Canv:TCanvas), то процедура XXX будет иметь дело с копией канвы. И будет рисовать хрен знает где...


SoftOne   (2002-03-31 01:41:00) [4]

> Danila (31.03.02 00:30)
А что такое "Копия Канвы"? Интересно было бы узнать :)

Никаких копий канвы и не будет. Будет обращение по ссылке на исходную канву.


stexen   (2002-03-31 01:03:00) [5]

ты если токо ресуешь то можешь вполне обйтись передачей дескриптора hdc и на WinAPI - это еще более культурнее.. а если думаешь что Бмлл Гей..тс мудак можешь ссам аргонизовать процедуры рисования.... и ваще прикиньте все так кричат во гдиплюс гдиплюс а у меня с икспи пачему то нет его


Danila   (2002-03-31 00:30:00) [6]

Не понял, как можно обойтись без VAR, а тем более использовать Const ? Ведь процедура как раз рисует на передаваемой канве ! А так она будет рисовать на копии канвы...


Anatoly Podgoretsky   (2002-03-30 11:56:00) [7]

Var только не к чему, замени на Const, можно и бех этого, но так культурнее.


MBo   (2002-03-30 11:49:00) [8]

так и организовывай
procedure Proc(Cn:Tcanvas);
begin
Canvas.Rect...
end;

вызов
Proc(MyBitmap.Canvas);


Наверх

Титульная страница Поиск, карта сайта Написать письмо