ImageEn, unit ievision

TIEVisionVectorScalarInt32


Declaration

TIEVisionVectorScalarInt32 = interface(TIEVisionBaseVector)


Description

An interface object that stores a vector (list) of four integers (four 32 bit integers, TIEVisionScalarInt32).


Methods and Properties

Public Method  getScalarInt32
Public Method  push_back
Public Method  setScalarInt32

Note: You can draw the lines to a canvas using DrawLines


Example

// Draw lines onto image
var
  i: Integer;
  sc: TIEVisionScalarInt32;
begin
  ImageEnView1.IO.LoadFromFile( edtInputFilename.Text );   // Reload full color image
  for i := 0 to lines.size() - 1 do
  begin
    sc := lines.getScalarInt32(i);

    with ImageEnView1.IEBitmap.Canvas do
    begin
      Pen.Width := 2;
      Pen.Color := clRed;
      MoveTo( sc.val[0], sc.val[1] );
      LineTo( sc.val[2], sc.val[3] );
    end;
  end;
  ImageEnView1.Proc.TextOut( Align_Text_Near_Left, Align_Text_Near_Top, Format( 'Lines: %d', [ lines.size ]), 'Arial', 12, clYellow, [fsBold] );
  ImageEnView1.Update();
end;