mirror of
https://github.com/love2d/megasource.git
synced 2026-08-17 11:11:35 +02:00
Add DevIL 1.7.8.
This commit is contained in:
@@ -0,0 +1,31 @@
|
||||
Imports System.Reflection
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
' General Information about an assembly is controlled through the following
|
||||
' set of attributes. Change these attribute values to modify the information
|
||||
' associated with an assembly.
|
||||
|
||||
' Review the values of the assembly attributes
|
||||
|
||||
<Assembly: AssemblyTitle("")>
|
||||
<Assembly: AssemblyDescription("")>
|
||||
<Assembly: AssemblyCompany("")>
|
||||
<Assembly: AssemblyProduct("")>
|
||||
<Assembly: AssemblyCopyright("")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
<Assembly: CLSCompliant(True)>
|
||||
|
||||
'The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
<Assembly: Guid("1B50578B-A3AB-4AA2-858B-267B61D35579")>
|
||||
|
||||
' Version information for an assembly consists of the following four values:
|
||||
'
|
||||
' Major Version
|
||||
' Minor Version
|
||||
' Build Number
|
||||
' Revision
|
||||
'
|
||||
' You can specify all the values or you can default the Build and Revision Numbers
|
||||
' by using the '*' as shown below:
|
||||
|
||||
<Assembly: AssemblyVersion("1.0.*")>
|
||||
@@ -0,0 +1,117 @@
|
||||
<VisualStudioProject>
|
||||
<VisualBasic
|
||||
ProjectType = "Local"
|
||||
ProductVersion = "7.0.9466"
|
||||
SchemaVersion = "1.0"
|
||||
ProjectGuid = "{F073580C-F355-4F4A-98B7-83D571B96B9E}"
|
||||
>
|
||||
<Build>
|
||||
<Settings
|
||||
ApplicationIcon = ""
|
||||
AssemblyKeyContainerName = ""
|
||||
AssemblyName = "ImageViewVb"
|
||||
AssemblyOriginatorKeyFile = ""
|
||||
AssemblyOriginatorKeyMode = "None"
|
||||
DefaultClientScript = "JScript"
|
||||
DefaultHTMLPageLayout = "Grid"
|
||||
DefaultTargetSchema = "IE50"
|
||||
DelaySign = "false"
|
||||
OutputType = "WinExe"
|
||||
OptionCompare = "Binary"
|
||||
OptionExplicit = "On"
|
||||
OptionStrict = "Off"
|
||||
RootNamespace = "ImageViewVb"
|
||||
StartupObject = "ImageViewVb.frmImageView"
|
||||
>
|
||||
<Config
|
||||
Name = "Debug"
|
||||
BaseAddress = "285212672"
|
||||
ConfigurationOverrideFile = ""
|
||||
DefineConstants = ""
|
||||
DefineDebug = "true"
|
||||
DefineTrace = "true"
|
||||
DebugSymbols = "true"
|
||||
IncrementalBuild = "true"
|
||||
Optimize = "false"
|
||||
OutputPath = "bin\"
|
||||
RegisterForComInterop = "false"
|
||||
RemoveIntegerChecks = "false"
|
||||
TreatWarningsAsErrors = "false"
|
||||
WarningLevel = "1"
|
||||
/>
|
||||
<Config
|
||||
Name = "Release"
|
||||
BaseAddress = "285212672"
|
||||
ConfigurationOverrideFile = ""
|
||||
DefineConstants = ""
|
||||
DefineDebug = "false"
|
||||
DefineTrace = "true"
|
||||
DebugSymbols = "false"
|
||||
IncrementalBuild = "false"
|
||||
Optimize = "true"
|
||||
OutputPath = "bin\"
|
||||
RegisterForComInterop = "false"
|
||||
RemoveIntegerChecks = "false"
|
||||
TreatWarningsAsErrors = "false"
|
||||
WarningLevel = "1"
|
||||
/>
|
||||
</Settings>
|
||||
<References>
|
||||
<Reference
|
||||
Name = "System"
|
||||
AssemblyName = "System"
|
||||
/>
|
||||
<Reference
|
||||
Name = "System.Data"
|
||||
AssemblyName = "System.Data"
|
||||
/>
|
||||
<Reference
|
||||
Name = "System.Drawing"
|
||||
AssemblyName = "System.Drawing"
|
||||
/>
|
||||
<Reference
|
||||
Name = "System.Windows.Forms"
|
||||
AssemblyName = "System.Windows.Forms"
|
||||
/>
|
||||
<Reference
|
||||
Name = "System.XML"
|
||||
AssemblyName = "System.Xml"
|
||||
/>
|
||||
<Reference
|
||||
Name = "DevIL.NET"
|
||||
Project = "{30D94686-D452-4A73-B59D-178288807EE5}"
|
||||
Package = "{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}"
|
||||
/>
|
||||
</References>
|
||||
<Imports>
|
||||
<Import Namespace = "Microsoft.VisualBasic" />
|
||||
<Import Namespace = "System" />
|
||||
<Import Namespace = "System.Collections" />
|
||||
<Import Namespace = "System.Data" />
|
||||
<Import Namespace = "System.Drawing" />
|
||||
<Import Namespace = "System.Diagnostics" />
|
||||
<Import Namespace = "System.Windows.Forms" />
|
||||
</Imports>
|
||||
</Build>
|
||||
<Files>
|
||||
<Include>
|
||||
<File
|
||||
RelPath = "AssemblyInfo.vb"
|
||||
SubType = "Code"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "frmImageView.vb"
|
||||
SubType = "Form"
|
||||
BuildAction = "Compile"
|
||||
/>
|
||||
<File
|
||||
RelPath = "frmImageView.resx"
|
||||
DependentUpon = "frmImageView.vb"
|
||||
BuildAction = "EmbeddedResource"
|
||||
/>
|
||||
</Include>
|
||||
</Files>
|
||||
</VisualBasic>
|
||||
</VisualStudioProject>
|
||||
|
||||
@@ -0,0 +1,48 @@
|
||||
<VisualStudioProject>
|
||||
<VisualBasic>
|
||||
<Build>
|
||||
<Settings ReferencePath = "" >
|
||||
<Config
|
||||
Name = "Debug"
|
||||
EnableASPDebugging = "false"
|
||||
EnableASPXDebugging = "false"
|
||||
EnableUnmanagedDebugging = "false"
|
||||
EnableSQLServerDebugging = "false"
|
||||
RemoteDebugEnabled = "false"
|
||||
RemoteDebugMachine = ""
|
||||
StartAction = "Project"
|
||||
StartArguments = ""
|
||||
StartPage = ""
|
||||
StartProgram = ""
|
||||
StartURL = ""
|
||||
StartWorkingDirectory = ""
|
||||
StartWithIE = "true"
|
||||
/>
|
||||
<Config
|
||||
Name = "Release"
|
||||
EnableASPDebugging = "false"
|
||||
EnableASPXDebugging = "false"
|
||||
EnableUnmanagedDebugging = "false"
|
||||
EnableSQLServerDebugging = "false"
|
||||
RemoteDebugEnabled = "false"
|
||||
RemoteDebugMachine = ""
|
||||
StartAction = "Project"
|
||||
StartArguments = ""
|
||||
StartPage = ""
|
||||
StartProgram = ""
|
||||
StartURL = ""
|
||||
StartWorkingDirectory = ""
|
||||
StartWithIE = "false"
|
||||
/>
|
||||
</Settings>
|
||||
</Build>
|
||||
<OtherProjectSettings
|
||||
CopyProjectDestinationFolder = ""
|
||||
CopyProjectUncPath = ""
|
||||
CopyProjectOption = "0"
|
||||
ProjectView = "ProjectFiles"
|
||||
ProjectTrust = "0"
|
||||
/>
|
||||
</VisualBasic>
|
||||
</VisualStudioProject>
|
||||
|
||||
@@ -0,0 +1,132 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 1.3
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">1.3</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1">this is my long string</data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
[base64 mime encoded serialized .NET Framework object]
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
[base64 mime encoded string representing a byte array form of the .NET Framework object]
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>1.3</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="mainMenu.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>159, 0</value>
|
||||
</data>
|
||||
<data name="mainMenu.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnuFile.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnuFileOpen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnuFileSaveAs.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnuFileSep1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnuFileExit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnuHelp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="mnuHelpAbout.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="pictureBox.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>Assembly</value>
|
||||
</data>
|
||||
<data name="$this.Name">
|
||||
<value>frmImageView</value>
|
||||
</data>
|
||||
</root>
|
||||
@@ -0,0 +1,184 @@
|
||||
Public Class frmImageView
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
#Region " Windows Form Designer generated code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
'This call is required by the Windows Form Designer.
|
||||
InitializeComponent()
|
||||
|
||||
'Add any initialization after the InitializeComponent() call
|
||||
|
||||
End Sub
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Friend WithEvents mainMenu As System.Windows.Forms.MainMenu
|
||||
Friend WithEvents mnuFile As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnuFileOpen As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnuFileSaveAs As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnuFileSep1 As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnuFileExit As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnuHelp As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents mnuHelpAbout As System.Windows.Forms.MenuItem
|
||||
Friend WithEvents pictureBox As System.Windows.Forms.PictureBox
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.mainMenu = New System.Windows.Forms.MainMenu()
|
||||
Me.mnuFile = New System.Windows.Forms.MenuItem()
|
||||
Me.mnuFileOpen = New System.Windows.Forms.MenuItem()
|
||||
Me.mnuFileSaveAs = New System.Windows.Forms.MenuItem()
|
||||
Me.mnuFileSep1 = New System.Windows.Forms.MenuItem()
|
||||
Me.mnuFileExit = New System.Windows.Forms.MenuItem()
|
||||
Me.mnuHelp = New System.Windows.Forms.MenuItem()
|
||||
Me.mnuHelpAbout = New System.Windows.Forms.MenuItem()
|
||||
Me.pictureBox = New System.Windows.Forms.PictureBox()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'mainMenu
|
||||
'
|
||||
Me.mainMenu.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuFile, Me.mnuHelp})
|
||||
'
|
||||
'mnuFile
|
||||
'
|
||||
Me.mnuFile.Index = 0
|
||||
Me.mnuFile.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuFileOpen, Me.mnuFileSaveAs, Me.mnuFileSep1, Me.mnuFileExit})
|
||||
Me.mnuFile.Text = "&File"
|
||||
'
|
||||
'mnuFileOpen
|
||||
'
|
||||
Me.mnuFileOpen.Index = 0
|
||||
Me.mnuFileOpen.Text = "&Open..."
|
||||
'
|
||||
'mnuFileSaveAs
|
||||
'
|
||||
Me.mnuFileSaveAs.Index = 1
|
||||
Me.mnuFileSaveAs.Text = "Save &as..."
|
||||
'
|
||||
'mnuFileSep1
|
||||
'
|
||||
Me.mnuFileSep1.Index = 2
|
||||
Me.mnuFileSep1.Text = "-"
|
||||
'
|
||||
'mnuFileExit
|
||||
'
|
||||
Me.mnuFileExit.Index = 3
|
||||
Me.mnuFileExit.Text = "E&xit"
|
||||
'
|
||||
'mnuHelp
|
||||
'
|
||||
Me.mnuHelp.Index = 1
|
||||
Me.mnuHelp.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuHelpAbout})
|
||||
Me.mnuHelp.Text = "&?"
|
||||
'
|
||||
'mnuHelpAbout
|
||||
'
|
||||
Me.mnuHelpAbout.Index = 0
|
||||
Me.mnuHelpAbout.Text = "&About..."
|
||||
'
|
||||
'pictureBox
|
||||
'
|
||||
Me.pictureBox.Name = "pictureBox"
|
||||
Me.pictureBox.Size = New System.Drawing.Size(720, 414)
|
||||
Me.pictureBox.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize
|
||||
Me.pictureBox.TabIndex = 1
|
||||
Me.pictureBox.TabStop = False
|
||||
'
|
||||
'frmImageView
|
||||
'
|
||||
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
|
||||
Me.ClientSize = New System.Drawing.Size(720, 434)
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.pictureBox})
|
||||
Me.Menu = Me.mainMenu
|
||||
Me.Name = "frmImageView"
|
||||
Me.Text = "ImageView VB.NET"
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
Private m_bmp As System.Drawing.Bitmap
|
||||
|
||||
|
||||
Private Sub mnuFileOpen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuFileOpen.Click
|
||||
Dim ofd As New System.Windows.Forms.OpenFileDialog()
|
||||
ofd.Filter = "All Image Files(*.BMP;*.CUT;*.DCX;*.DDS;*.ICO;*.GIF;*.JPG;*.LBM;*.LIF;*.MDL;*.PCD;*.PCX;*.PIC;*.PNG;*.PNM;*.PSD;*.PSP;*.RAW;*.SGI;*.TGA;*.TIF;*.WAL;*.ACT;*.PAL;)|*.BMP;*.CUT;*.DCX;*.DDS;*.ICO;*.GIF;*.JPG;*.LBM;*.LIF;*.MDL;*.PCD;*.PCX;*.PIC;*.PNG;*.PNM;*.PSD;*.PSP;*.RAW;*.SGI;*.TGA;*.TIF;*.WAL;*.ACT;*.PAL|All files (*.*)|*.*"
|
||||
ofd.Filter += "|BMP files (*.BMP)|*.BMP"
|
||||
ofd.Filter += "|CUT files (*.CUT)|*.CUT"
|
||||
ofd.Filter += "|DCX files (*.DCX)|*.DCX"
|
||||
ofd.Filter += "|DDS files (*.DDS)|*.DDS"
|
||||
ofd.Filter += "|ICO files (*.ICO)|*.ICO"
|
||||
ofd.Filter += "|GIF files (*.GIF)|*.GIF"
|
||||
ofd.Filter += "|JPG files (*.JPG)|*.JPG"
|
||||
ofd.Filter += "|LBM files (*.LBM)|*.LBM"
|
||||
ofd.Filter += "|LIF files (*.LIF)|*.LIF"
|
||||
ofd.Filter += "|MDL files (*.MDL)|*.MDL"
|
||||
ofd.Filter += "|PCD files (*.PCD)|*.PCD"
|
||||
ofd.Filter += "|PCX files (*.PCX)|*.PCX"
|
||||
ofd.Filter += "|PIC files (*.PIC)|*.PIC"
|
||||
ofd.Filter += "|PNG files (*.PNG)|*.PNG"
|
||||
ofd.Filter += "|PNM files (*.PNM)|*.PNM"
|
||||
ofd.Filter += "|PSD files (*.PSD)|*.PSD"
|
||||
ofd.Filter += "|PSP files (*.PSP)|*.PSP"
|
||||
ofd.Filter += "|RAW files (*.RAW)|*.RAW"
|
||||
ofd.Filter += "|SGI files (*.SGI)|*.SGI"
|
||||
ofd.Filter += "|TGA files (*.TGA)|*.TGA"
|
||||
ofd.Filter += "|TIF files (*.TIF)|*.TIF"
|
||||
ofd.Filter += "|WAL files (*.WAL)|*.WAL"
|
||||
ofd.Filter += "|ACT files (*.ACT)|*.ACT"
|
||||
ofd.Filter += "|PAL files (*.PAL)|*.PAL"
|
||||
ofd.Filter += "|All files (*.*)|*.*"
|
||||
|
||||
If (ofd.ShowDialog() = DialogResult.OK) Then
|
||||
m_bmp = DevIL.DevIL.LoadBitmap(ofd.FileName)
|
||||
If Not (m_bmp Is Nothing) Then
|
||||
pictureBox.Image = m_bmp
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub mnuFileSaveAs_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuFileSaveAs.Click
|
||||
If Not (m_bmp Is Nothing) Then
|
||||
Dim sfd As New System.Windows.Forms.SaveFileDialog()
|
||||
sfd.Filter = "BMP format (*.BMP)|*.BMP"
|
||||
sfd.Filter += "|DDS format (*.DDS)|*.DDS"
|
||||
sfd.Filter += "|JPG format (*.JPG)|*.JPG"
|
||||
sfd.Filter += "|PCX format (*.PCX)|*.PCX"
|
||||
sfd.Filter += "|PNG format (*.PNG)|*.PNG"
|
||||
sfd.Filter += "|PNM format (*.PNM)|*.PNM"
|
||||
sfd.Filter += "|RAW format (*.RAW)|*.RAW"
|
||||
sfd.Filter += "|SGI format (*.SGI)|*.SGI"
|
||||
sfd.Filter += "|TGA format (*.TGA)|*.TGA"
|
||||
sfd.Filter += "|TIF format (*.TIF)|*.TIF"
|
||||
sfd.Filter += "|PAL format (*.PAL)|*.PAL"
|
||||
|
||||
If (sfd.ShowDialog() = DialogResult.OK) Then
|
||||
DevIL.DevIL.SaveBitmap(sfd.FileName, m_bmp)
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub mnuFileExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuFileExit.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub mnuHelpAbout_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuHelpAbout.Click
|
||||
MessageBox.Show("Program by Marco Mastropaolo\n\nThis is a VB.NET example for the DevIL.NET library.\n\nhttp://www.mastropaolo.com", "About")
|
||||
End Sub
|
||||
End Class
|
||||
Reference in New Issue
Block a user