5,927
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
nicotine 2003-12-13
- 打赏
- 举报
谢谢！小弟刚学delphi，所以问的问题比较苯，望大家别见笑
cll007 2003-12-12
- 打赏
- 举报
Image1.Picture:=nil;
jiaxianglei 2003-12-12
- 打赏
- 举报
给分,哈哈.
var
m,n,i,j:integer;
begin
m:=image1.Picture.Bitmap.Height-1;
n:=image1.Picture.Bitmap.Width-1;
for i:=0 to m do
for j:=0 to n do
image1.Canvas.Pixels[j,i]:=clbtnface;
end;
var
m,n,i,j:integer;
begin
m:=image1.Picture.Bitmap.Height-1;
n:=image1.Picture.Bitmap.Width-1;
for i:=0 to m do
for j:=0 to n do
image1.Canvas.Pixels[j,i]:=clbtnface;
end;
vavyboyleon 2003-12-12
- 打赏
- 举报
大哥,Timage 有clear这个方法吗？
简单办法，Timage用的时候就显示，不用的时候就hide
简单办法，Timage用的时候就显示，不用的时候就hide
hmzgz81 2003-12-12
- 打赏
- 举报
image1.clear
