'We assume that the GdViewer1 control has been properly integrated.
If GdViewer1.DisplayFromFile("") = GdPictureStatus.OK Then
Dim message As String = "The current file is: " + GdViewer1.GetLastPath()
If GdViewer1.GetDocumentType() = DocumentType.DocumentTypePDF Then
message += vbCrLf + "Author: " + GdViewer1.PdfGetAuthor() +
vbCrLf + "Creator: " + GdViewer1.PdfGetCreator() +
vbCrLf + "Producer: " + GdViewer1.PdfGetProducer()
Else
message += vbCrLf + "This file is not a PDF document, its format is: " + GdViewer1.GetDocumentType().ToString()
End If
MessageBox.Show(message, "GdViewer.PdfGetProducer")
Else
MessageBox.Show("The file can't be loaded. Status: " + GdViewer1.GetStat().ToString(), "GdViewer.PdfGetProducer")
End If
//We assume that the GdViewer1 control has been properly integrated.
if (GdViewer1.DisplayFromFile("") == GdPictureStatus.OK)
{
string message = "The current file is: " + GdViewer1.GetLastPath();
if (GdViewer1.GetDocumentType() == DocumentType.DocumentTypePDF)
{
message += "\nAuthor: " + GdViewer1.PdfGetAuthor() +
"\nCreator: " + GdViewer1.PdfGetCreator() +
"\nProducer: " + GdViewer1.PdfGetProducer();
}
else
{
message += "\nThis file is not a PDF document, its format is: " + GdViewer1.GetDocumentType().ToString();
}
MessageBox.Show(message, "GdViewer.PdfGetProducer");
}
else
MessageBox.Show("The file can't be loaded. Status: " + GdViewer1.GetStat().ToString(), "GdViewer.PdfGetProducer");