Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Очистить канву PaintBox'а [D7, WinXP]

Страницы: 1 2 >
dDan © (2005-08-10 16:11:00)
Вот собственно сталкнулся с такой проблемой. Мой пайнтбокс должен быть прозрачным на нем я отрисовываю нужные мне фигуры а под ним имэйдж должен оставаться виден. Пробовал PaintBox.Canvas.Assign(nil) не пашет. Просто заливать тоже нельзя т.к картинка в имэйдже просто станет невидимой.

dDan (2005-08-13 21:10:00) [1]
На нем можно рисовать без ImageEnVec?

забыл (2005-08-13 20:12:00) [2]
ImageEN рулит не подеЦЦки, имхо. читай справку.

Магнитон Борыч (2005-08-13 19:01:00) [3]
ICQ нет. Пиши на ящик fenik@nm.ru

dDan (2005-08-13 08:16:00) [4]
Нет намного проще в техническом плане но и намного интереснее. У тебя есть ICQ для контакта с тобой?

Магнитон Борыч (2005-08-12 23:55:00) [5]
TImageEnVect - я, честно говоря, этим не пользовался :))
Но название наводит на мысль, что это для вывода векторных фигур.
Если я прав, может быть этим и воспользоваться?
И в чем вообще задача? Граф. редактор?

dDan (2005-08-12 12:02:00) [6]
2 Магнитон Борыч
//TImageEnVect - такая вещь присутствует?
Угу присудствует

Antonn (2005-08-12 05:36:00) [7]
dDan (11.08.05 20:33) [11]
это твой код рисования? Тебе как показали?

>PaintBox1.Canvas.Brush.Style:=bsclear;
>PaintBox1.Canvas.FillRect(PaintBox1.ClientRect);
> PaintBox1.Canvas.Brush.Style:=bssolid;

Магнитон Борыч (2005-08-12 00:16:00) [8]
Рисовать можно на чем угодно!
Что касается ImageEn, то он для рисования и создан :)

TIEView = class(TCustomControl)
TImageEnView = class(TIEView)

Свойство Canvas должно быть. Исходники-то есть?
TImageEnVect - такая вещь присутствует?

dDan (2005-08-11 21:36:00) [9]
В том то и загвоздка что у меня та м не просто Image а ImageEn вот а нам незя же вроде рисовать или я тупица

Магнитон Борыч (2005-08-11 21:06:00) [10]
Посмотри пример рисования на подобие паинта http://fenik.nm.ru/DrawPanel.zip
Возможно, это то, что тебе нужно.

dDan (2005-08-11 20:33:00) [11]
procedure TForm1.PaintBox1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin PaintBox1.Canvas.Brush.Style:=bsclear; PaintBox1.Canvas.FillRect(PaintBox1.ClientRect); PaintBox1.Canvas.Rectangle(x-tw,y-th,x+tw,y+th); end;

Магнитон Борыч (2005-08-11 20:32:00) [12]
Опс. Не въехал сразу. [9] - не подходит.
Чтобы рисовать фигуры на картинке, не нужно класть ПаинтБокс на имейдж!
Это полный изврат.

Магнитон Борыч (2005-08-11 20:27:00) [13]
PatBlt(PaintBox.Canvas.Handle, 0, 0, PaintBox.Width, PaintBox.Height, WHITENESS);

Eraser (2005-08-11 18:23:00) [14]
dDan (10.08.05 16:11)

Какой эффект наблюдается при выполнении [4]? Почему не работает?

Antonn (2005-08-11 16:45:00) [15]
dDan (11.08.05 16:26) [6]
покажи код рисования.
у меня работает [4]

dDan (2005-08-11 16:26:00) [16]
Не у кого никаких идей? Mbo товарисч могет ты чего предложишь?

dDan (2005-08-10 18:58:00) [17]
нет так тоже не хочет :(

Antonn (2005-08-10 16:59:00) [18]
dDan (10.08.05 16:33) [2]
точно? а попробывать? вот, для очистки:

PaintBox1.Canvas.Brush.Style:=bsclear;
PaintBox1.Canvas.FillRect(PaintBox1.ClientRect);
PaintBox1.Canvas.Brush.Style:=bssolid;

Gydvin (2005-08-10 16:51:00) [19]
А если создать tmetafilecanvas или tcanvasmetafile - точно непомню.

Там фон прозрачный.

dDan (2005-08-10 16:33:00) [20]
Нет я таким способом рисую не прокатит вроде

Страницы: 1 2 >

Наверх

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