想改变TEdit控件的边框,
在窗口过程的WM_NCPAINT消息里这样写 WM_NCPAINT: begin
dc := BeginPaint(FEdit.Handle, ps);
try
GetClientRect(FEdit.Handle, Rect);
h1 := CreatePen(PS_SOLID, 1, RGB($43, $B6, $FF));
h2 := SelectObject(dc, h1);
Rectangle(dc, Rect.Left, Rect.Top, Rect.Right, Rect.Bottom);
SelectObject(dc, h2);
finally
EndPaint(FEdit.Handle, ps);
end;
end;
可是移动窗口的时候edit里面的字看不见了,怎么解决?
在窗口过程的WM_NCPAINT消息里这样写 WM_NCPAINT: begin
dc := BeginPaint(FEdit.Handle, ps);
try
GetClientRect(FEdit.Handle, Rect);
h1 := CreatePen(PS_SOLID, 1, RGB($43, $B6, $FF));
h2 := SelectObject(dc, h1);
Rectangle(dc, Rect.Left, Rect.Top, Rect.Right, Rect.Bottom);
SelectObject(dc, h2);
finally
EndPaint(FEdit.Handle, ps);
end;
end;
可是移动窗口的时候edit里面的字看不见了,怎么解决?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货