O
okgxsh
Unregistered / Unconfirmed
GUEST, unregistred user!
使 用CANVAS 时: 比 如 当 窗 口 进 行 最 小 化 又 重 新 恢 复 时， 就 会 引 起 画 布 上 图 像 的 消 失， (100分)<br />procedure TForm1.Button2Click(Sender: TObject);
var
MyCanvas: TControlCanvas;
begin
MyCanvas:=TControlCanvas.Create;
Mycanvas.control:=memo1;//想在memo1上作画
With Mycanvas do
Begin
pen.color:=clyellow;
begin
Brush.Color := clBtnFace; //
MoveTo ( 33, 0 );
Brush.Color := clWhite; //
LineTo ( 33, ClientHeight );
end;
End;
end;
使 用CANVAS 时: 比 如 当 窗 口 进 行 最 小 化 又 重 新 恢 复 时， 就 会 引 起 画 布 上 图 像 的 消 失，
//如何解决上述“图像消失”的问题？？？
如何实现win2000性能中监视>>>>>所画cpu 、内存的数据的动态的的曲线
var
MyCanvas: TControlCanvas;
begin
MyCanvas:=TControlCanvas.Create;
Mycanvas.control:=memo1;//想在memo1上作画
With Mycanvas do
Begin
pen.color:=clyellow;
begin
Brush.Color := clBtnFace; //
MoveTo ( 33, 0 );
Brush.Color := clWhite; //
LineTo ( 33, ClientHeight );
end;
End;
end;
使 用CANVAS 时: 比 如 当 窗 口 进 行 最 小 化 又 重 新 恢 复 时， 就 会 引 起 画 布 上 图 像 的 消 失，
//如何解决上述“图像消失”的问题？？？
如何实现win2000性能中监视>>>>>所画cpu 、内存的数据的动态的的曲线
]，好了，呵呵，这个是个很基本的技巧