- 4.51.2.4.64. -
Table of Contents
4. Standard Units
4.51. ObjGfx40 - ObjectGraphics 4.0 Unit
4.51.2. ObjGfx40 Unit Object Types
4.51.2.4. ogSurface object
4.51.2.4.64. ogVLine()
4.51.2.4.64. ogVLine()
Targets: MS-DOS, Win32 console
ObjGfx40 Unit
Draws a vertical line.
Declaration:
procedure ogVLine(x, y1, y2:int32; colour:uInt32); virtual;
Remarks:
Draws a vertical line. Uses a faster algorithm than ogLine().
See also:
Sample code:
{ogVLine.pas}
uses
ObjGfx40, CRT;
var
xx:uInt32;
begin
if not screen^.ogCreate(320, 200, OG_PIXFMT_8BPP) then
begin
writeln('Error setting video mode');
halt
end;
for xx:=0 to screen^.ogGetMaxX do
screen^.ogVLine(xx, 0, screen^.ogGetMaxY, xx);
readKey;
end.
- 4.51.2.4.64. -
