B
billwillman
Unregistered / Unconfirmed
GUEST, unregistred user!
我创建了显示表面,设置了WINDOWS协作,加入了调色板,但在把SURFACE LOCK 后准备画图,就是没什么效果
//x,y为要在显示表面画的坐标,color为色彩值,mempitch为显示模式的水平内存间距
procedure plot8(x:integer;y:integer;color:UCHAR;buffer
char;mempitch:integer);
begin
(pcUnChar(buffer+x+y*mempitch)^):=color;
end;
//x,y为要在显示表面画的坐标,color为色彩值,mempitch为显示模式的水平内存间距
procedure plot8(x:integer;y:integer;color:UCHAR;buffer
char;mempitch:integer);begin
(pcUnChar(buffer+x+y*mempitch)^):=color;
end;