Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2006.06.25;
Скачать: [xml.tar.bz2];

Вниз

Рисование на канве другого приложения   Найти похожие ветки 

 
TStas ©   (2006-05-16 19:17) [0]

Из любопытства пробовал рисовать по канве другого приложения: через FindWindow получал Handle окна, дальше Canva:=Tcanvas.Create; Canva.Handle:=H; //Присваиваю Handle
Но почему-то ничего не выводилось. Однако подобным образом можно рисовать по рабочему столу. Почему не вывелся рисунок или это каким-то образом сами винды запрещают?


 
Rial ©   (2006-05-16 20:55) [1]

>>Однако подобным образом можно рисовать по рабочему столу
странно, не знал :))

Используй
LineTo(DC: HDC; X, Y: Integer)
Pie(DC: HDC; X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer)
Rectangle(DC: HDC; X1, Y1, X2, Y2: Integer)
и прочие функции из модуля Windows.
Первым параметром передается DC:HDC, причем:

Начало работы
DC:=GetDC(Handle);//Тот хендл, кот. ты получил
...
Конец работы
releaseDC(Handle,DC);

Функциональность та же, что и с Canvas.
С кистями попробуй разобраться сам.


 
REA   (2006-05-17 10:10) [2]

Canvas.Handle := GetDC(Handle);
Try
 ...
Finally
 ReleaseDC(Handle, Canvas.Handle);
End;


 
Neo Trinitron ©   (2006-05-17 10:56) [3]

Может быть у окна на котором идёт рисование вызывается обработчик события OnPaint который разрушает нарисованое и восстанавливает прежний вид окна?...


 
TStas ©   (2006-05-17 15:36) [4]

>REA Canvas.Handle := GetDC(Handle); :) Спасибо, торможу, именно так по столу и рисовал. А все функции рисования без канвы от рисования по канве отличаются на один параметр, как раз DC. Канва же это надстройка просто. ТОрможу. :)



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2006.06.25;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.01 c
2-1149511088
$Cursor
2006-06-05 16:38
2006.06.25
Собственный курсор из ресурса


5-1134500036
ANB
2005-12-13 21:53
2006.06.25
Как вытащить значение индексированного свойства ?


15-1149171523
antonn
2006-06-01 18:18
2006.06.25
Обстановка изменилась?..


15-1149059299
boriskb
2006-05-31 11:08
2006.06.25
Студенты, вас еще не напрягают?


1-1147857997
Kvinta
2006-05-17 13:26
2006.06.25
Как сохранить объект в фаил?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский