7 lines
150 B
ObjectPascal
7 lines
150 B
ObjectPascal
|
uses GraphWPF;
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
Window.SetSize(640, 480);
|
|||
|
|
SetPixels(0,0,640,480,(x, y)->RGB(2 * x - y, x - 3 * y, x + y));
|
|||
|
|
Milliseconds.Println;
|
|||
|
|
end.
|