9 lines
135 B
ObjectPascal
9 lines
135 B
ObjectPascal
uses GraphABC;
|
|
|
|
const
|
|
clRed=GraphABC.clRed;
|
|
clRedMy=GraphABC.clRed;
|
|
begin
|
|
PutPixel(100,10,clRedMy);
|
|
PutPixel(10,10,clRed);
|
|
end. |