'We assume that the GdViewer1 control has been properly integrated.
If GdViewer1.DisplayFromFile("") = GdPictureStatus.OK Then
Dim text_to_find As String = "GdPicture"
Dim regID As Integer = 0, occurrence As Integer = 1
Dim left As Single = 0, top As Single = 0, width As Single = 0, height As Single = 0
'Removing previously defined regions, if any.
GdViewer1.RemoveAllRegions()
While GdViewer1.SearchText(GdViewer1.CurrentPage, text_to_find, occurrence, True, True, left, top, width, height)
If GdViewer1.GetStat() = GdPictureStatus.OK Then
regID = GdViewer1.AddRegionInches("", left, top, width, height, ForegroundMixMode.ForegroundMixModeMASKPEN, GdViewer1.ARGBI(255, 176, 224, 230))
If GdViewer1.GetStat() = GdPictureStatus.OK Then
GdViewer1.SetRegionName(regID, "Region" + regID.ToString())
occurrence += 1
Else
Exit While
End If
Else
Exit While
End If
End While
If GdViewer1.GetStat() = GdPictureStatus.OK Then
If GdViewer1.RegionCount() = 0 Then MessageBox.Show("The given text has not been found.", "GdViewer.SetRegionName")
Else
MessageBox.Show("An error has occurred. Status: " + GdViewer1.GetStat().ToString(), "GdViewer.SetRegionName")
End If
Else
MessageBox.Show("The file can't be displayed. Status: " + GdViewer1.GetStat().ToString(), "GdViewer.SetRegionName")
End If
//We assume that the GdViewer1 control has been properly integrated.
if (GdViewer1.DisplayFromFile("") == GdPictureStatus.OK)
{
string text_to_find = "GdPicture";
int regID = 0, occurrence = 1;
float left = 0, top = 0, width = 0, height = 0;
//Removing previously defined regions, if any.
GdViewer1.RemoveAllRegions();
while (GdViewer1.SearchText(GdViewer1.CurrentPage, text_to_find, occurrence, true, true, ref left, ref top, ref width, ref height))
{
if (GdViewer1.GetStat() == GdPictureStatus.OK)
{
regID = GdViewer1.AddRegionInches("", left, top, width, height, ForegroundMixMode.ForegroundMixModeMASKPEN, GdViewer1.ARGBI(255, 176, 224, 230));
if (GdViewer1.GetStat() == GdPictureStatus.OK)
{
GdViewer1.SetRegionName(regID, "Region" + regID.ToString());
occurrence += 1;
}
else
break;
}
else
break;
}
if (GdViewer1.GetStat() == GdPictureStatus.OK)
{
if (GdViewer1.RegionCount() == 0)
MessageBox.Show("The given text has not been found.", "GdViewer.SetRegionName");
}
else
MessageBox.Show("An error has occurred. Status: " + GdViewer1.GetStat().ToString(), "GdViewer.SetRegionName");
}
else
MessageBox.Show("The file can't be displayed. Status: " + GdViewer1.GetStat().ToString(), "GdViewer.SetRegionName");