ImageOverlaySelector
property ImageOverlaySelector: LongInt read GetImageOverlaySelector write SetImageOverlaySelector;
__property System::LongInt ImageOverlaySelector = {read=GetImageOverlaySelector, write=SetImageOverlaySelector, nodefault};
public int ImageOverlaySelector { get; set; }
Public Property ImageOverlaySelector As Integer
int GetImageOverlaySelector ();
void SetImageOverlaySelector (int Value);
Used to select a group of image overlay settings. Up to 1000 image overlay groups of settings may be used, allowing to perform different image overlays (with different location, image format, etc...) at the same time. The default image overlay settings correspond to the group 0 (ImageOverlaySelector = 0). Note that TVideoGrabber does not allocate the resources for 1000 image overlays, by default it allocates the settings corresponding to ImageOverlaySelector = 0 (the resource allocation is made when ImageOverlaySelector receives a new value never used before, see the Image overlays chapter for more explanations). Set ImageOverlaySelector to the index of the image overlay properties to read or write before reading or writing their values. It is applied to all the ImageOverlay... properties and functions. For example, the following code overlays 2 images at 2 different locations, the 1st is overlayed in its current size (width = -1 and height = -1), the second is stretched (because the width and height are specified):
procedure TfrmMainForm.Button1Click(Sender: TObject); begin VideoGrabber.ImageOverlaySelector := 0; VideoGrabber.SetImageOverlayFromAnyImageFile ('myimage1.gif'); VideoGrabber.SetImageOverlayAttributes (10, 10, -1, -1, false, false, 0, false, 0); VideoGrabber.ImageOverlayEnabled := True; VideoGrabber.ImageOverlaySelector := 1; VideoGrabber.SetImageOverlayFromAnyImageFile ('myimage2.png'); VideoGrabber.SetImageOverlayAttributes (100, 100, 30, 20, false, false, 0, false, 0); VideoGrabber.ImageOverlayEnabled := True; end;
in C++:
void __fastcall TfrmMainForm::Button1Click(TObject Sender) { void __fastcall TForm1::Button1Click(TObject Sender) { VideoGrabber->ImageOverlaySelector = 0; VideoGrabber->SetImageOverlayFromAnyImageFile ("myimage1.gif"); VideoGrabber->SetImageOverlayAttributes (10, 10, -1, -1, false, false, 0, false, 0); VideoGrabber->ImageOverlayEnabled = true; VideoGrabber->ImageOverlaySelector = 1; VideoGrabber->SetImageOverlayFromAnyImageFile ("myimage2.png"); VideoGrabber->SetImageOverlayAttributes (100, 100, 30, 20, false, false, 0, false, 0); VideoGrabber->ImageOverlayEnabled = true; }
in VB:
Private Sub Command1_Click() VideoGrabber.ImageOverlaySelector = 0 VideoGrabber.SetImageOverlayFromAnyImageFile ("myimage1.gif") VideoGrabber.SetImageOverlayAttributes (10, 10, -1, -1, false, false, 0, false, 0) VideoGrabber.ImageOverlayEnabled = true VideoGrabber.ImageOverlaySelector = 1 VideoGrabber.SetImageOverlayFromAnyImageFile ("myimage2.png") VideoGrabber.SetImageOverlayAttributes (100, 100, 30, 20, false, false, 0, false, 0) VideoGrabber.ImageOverlayEnabled = true End Sub