Dim caption As String = "Example: NewOCG"
Dim oGdPicturePDF As GdPicturePDF = New GdPicturePDF()
If (oGdPicturePDF.NewPDF() = GdPictureStatus.OK) AndAlso
(oGdPicturePDF.NewPage(PdfPageSizes.PdfPageSizeA4) = GdPictureStatus.OK) Then
'Creating content of a new layer.
Dim image_res_name As String = oGdPicturePDF.AddJpegImageFromFile("image.jpg")
If oGdPicturePDF.GetStat() = GdPictureStatus.OK Then
Dim width As Single = oGdPicturePDF.GetPageWidth()
Dim height As Single = oGdPicturePDF.GetPageHeight()
'Drawing the layer's content on the current page.
If oGdPicturePDF.DrawImage(image_res_name, 0, 0, width, height) = GdPictureStatus.OK Then
'Creating the layer and setting its properties.
Dim ocgID As Integer = oGdPicturePDF.NewOCG("Image layer")
If (oGdPicturePDF.GetStat() = GdPictureStatus.OK) AndAlso
(oGdPicturePDF.SetImageOptional(image_res_name, ocgID) = GdPictureStatus.OK) Then
If (oGdPicturePDF.SetOCGExportState(ocgID, PdfOcgState.StateOff) = GdPictureStatus.OK) AndAlso
(oGdPicturePDF.SetOCGLockedState(ocgID, True) = GdPictureStatus.OK) AndAlso
(oGdPicturePDF.SetOCGPrintState(ocgID, PdfOcgState.StateOn) = GdPictureStatus.OK) AndAlso
(oGdPicturePDF.SetOCGViewState(ocgID, PdfOcgState.StateOn) = GdPictureStatus.OK) AndAlso
(oGdPicturePDF.SetOCGZoomMin(ocgID, 0) = GdPictureStatus.OK) AndAlso
(oGdPicturePDF.SetOCGZoomMax(ocgID, 1) = GdPictureStatus.OK) Then
If oGdPicturePDF.SaveToFile("test_NewOCG.pdf") = GdPictureStatus.OK Then
MessageBox.Show("The example HAS been followed successfully and the file has been saved.", caption)
Else
MessageBox.Show("The example HAS been followed successfully, but the file can't be saved. Status: " + oGdPicturePDF.GetStat().ToString(), caption)
End If
Else
MessageBox.Show("Setting up layer's options has failed with the status: " + oGdPicturePDF.GetStat().ToString(), caption)
End If
Else
MessageBox.Show("The NewOCG() or SetImageOptional() method has failed with the status: " + oGdPicturePDF.GetStat().ToString(), caption)
End If
Else
MessageBox.Show("The DrawImage() method has failed with the status: " + oGdPicturePDF.GetStat().ToString(), caption)
End If
Else
MessageBox.Show("The AddJpegImageFromFile() method has failed with the status: " + oGdPicturePDF.GetStat().ToString(), caption)
End If
Else
MessageBox.Show("The document can't be created.", caption)
End If
oGdPicturePDF.Dispose()
string caption = "Example: NewOCG";
GdPicturePDF oGdPicturePDF = new GdPicturePDF();
if ((oGdPicturePDF.NewPDF() == GdPictureStatus.OK) &&
(oGdPicturePDF.NewPage(PdfPageSizes.PdfPageSizeA4) == GdPictureStatus.OK))
{
//Creating content of a new layer.
string image_res_name = oGdPicturePDF.AddJpegImageFromFile("image.jpg");
if (oGdPicturePDF.GetStat() == GdPictureStatus.OK)
{
float width = oGdPicturePDF.GetPageWidth();
float height = oGdPicturePDF.GetPageHeight();
//Drawing the layer's content on the current page.
if (oGdPicturePDF.DrawImage(image_res_name, 0, 0, width, height) == GdPictureStatus.OK)
{
//Creating the layer and setting its properties.
int ocgID = oGdPicturePDF.NewOCG("Image layer");
if ((oGdPicturePDF.GetStat() == GdPictureStatus.OK) &&
(oGdPicturePDF.SetImageOptional(image_res_name, ocgID) == GdPictureStatus.OK))
{
if ((oGdPicturePDF.SetOCGExportState(ocgID, PdfOcgState.StateOff) == GdPictureStatus.OK) &&
(oGdPicturePDF.SetOCGLockedState(ocgID, true) == GdPictureStatus.OK) &&
(oGdPicturePDF.SetOCGPrintState(ocgID, PdfOcgState.StateOn) == GdPictureStatus.OK) &&
(oGdPicturePDF.SetOCGViewState(ocgID, PdfOcgState.StateOn) == GdPictureStatus.OK) &&
(oGdPicturePDF.SetOCGZoomMin(ocgID, 0) == GdPictureStatus.OK) &&
(oGdPicturePDF.SetOCGZoomMax(ocgID, 1) == GdPictureStatus.OK))
{
if (oGdPicturePDF.SaveToFile("test_NewOCG.pdf") == GdPictureStatus.OK)
{
MessageBox.Show("The example HAS been followed successfully and the file has been saved.", caption);
}
else
{
MessageBox.Show("The example HAS been followed successfully, but the file can't be saved. Status: " + oGdPicturePDF.GetStat().ToString(), caption);
}
}
else
{
MessageBox.Show("Setting up layer's options has failed with the status: " + oGdPicturePDF.GetStat().ToString(), caption);
}
}
else
{
MessageBox.Show("The NewOCG() or SetImageOptional() method has failed with the status: " + oGdPicturePDF.GetStat().ToString(), caption);
}
}
else
{
MessageBox.Show("The DrawImage() method has failed with the status: " + oGdPicturePDF.GetStat().ToString(), caption);
}
}
else
{
MessageBox.Show("The AddJpegImageFromFile() method has failed with the status: " + oGdPicturePDF.GetStat().ToString(), caption);
}
}
else
{
MessageBox.Show("The document can't be created.", caption);
}
oGdPicturePDF.Dispose();