'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 + "Title: " + GdViewer1.PdfGetTitle() +
vbCrLf + "Subject: " + GdViewer1.PdfGetSubject() +
vbCrLf + "PDF Version: " + GdViewer1.PdfGetVersion()
Else
message += vbCrLf + "This file is not a PDF document, its format is: " + GdViewer1.GetDocumentType().ToString()
End If
MessageBox.Show(message, "GdViewer.PdfGetVersion")
Else
MessageBox.Show("The file can't be loaded. Status: " + GdViewer1.GetStat().ToString(), "GdViewer.PdfGetVersion")
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() +
"\nTitle: " + GdViewer1.PdfGetTitle() +
"\nSubject: " + GdViewer1.PdfGetSubject() +
"\nPDF Version: " + GdViewer1.PdfGetVersion();
}
else
{
message += "\nThis file is not a PDF document, its format is: " + GdViewer1.GetDocumentType().ToString();
}
MessageBox.Show(message, "GdViewer.PdfGetVersion");
}
else
MessageBox.Show("The file can't be loaded. Status: " + GdViewer1.GetStat().ToString(), "GdViewer.PdfGetVersion");