Форум: "WinAPI";
Текущий архив: 2003.09.29;
Скачать: [xml.tar.bz2];

Вниз

TWinControl   Найти похожие ветки 

← →
chs2r   (2003-07-29 18:27) [0]

Может надо было не в основном, а тут вопрос свой задать...
Как мне нарисовать курсор на WinControl"e?
я создаю
EditWindow:=TWinControl.Create(nil);
...
DC:=GetDC(EditWindow.Handle);
...
HP1:=CreatePen(PS_SOLID,1,clGreen);
...
SETTEXTCOLOR(DC,$0);
SETBKCOLOR(DC,clWhite);
текст в общем вывожу

drawText(DC,buff+VStextbegin,i-VSTextBegin,r,DT_LEFT);
по таймеру (SetTimer) нужно рисовать мигающий курсор
если я его рисую процедурами MoveToEx() LineTo()
то он затирает текст
как нарисовать через XOR, как наприм в том же делфи ?

---

← →
default   (2003-07-29 20:28) [1]

SetROP2 глянь или делай типа SelectObject(DC, TPen.Handle)
а в TPen.Mode установишь нуджный тебе режим

---

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

Форум: "WinAPI";
Текущий архив: 2003.09.29;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.009 c