C#

private static Version GetVersion(string assemblyUri)
{
	Assembly assembly = Assembly.LoadFile(assemblyUri);
	return assembly.GetName().Version;
}

public class BuildInformation
{
	private static readonly DateTime BuildOrigin = new DateTime(1970, 1, 1, 0, 0, 0);
	private const int peHeaderOffset = 60;
	private const int linkerTimestampOffset = 8;

	private DateTime _BuildDate;
	public DateTime BuildDate
	{
		get { return this._BuildDate; }
		set { this._BuildDate = value; }
	}

	private Version _Version;
	public Version Version
	{
		get { return this._Version; }
		set { this._Version = value; }
	}

	private static DateTime GetBuildDate(string path)
	{
		byte[] b = new byte[2048];
		using (FileStream fs = File.OpenRead(path))
		{
			fs.Read(b, 0, 2048);
			fs.Close();
		}
		int i = BitConverter.ToInt32(b, peHeaderOffset);
		int secondsSince1970 = BitConverter.ToInt32(b, i + linkerTimestampOffset);

		DateTime dt = BuildOrigin.AddSeconds(secondsSince1970);
		dt = dt.AddHours(TimeZone.CurrentTimeZone.GetUtcOffset(dt).Hours);

		return dt;
	}
	public static BuildInformation Read(string path)
	{
		DateTime buildDate = GetBuildDate(path);
		Version version = Assembly.LoadFrom(path).GetName().Version;
		return new BuildInformation(buildDate, version);
	}

	private BuildInformation(DateTime buildDate, Version version)
	{
		this.BuildDate = buildDate;
		this.Version = version;
	}
}

e.Cancel = true;
this.WindowState = FormWindowState.Minimized;

if (!allowClose)
{
   e.Cancel = true;
   this.WindowState = FormWindowState.Minimized;
}

satsumatable wrote:

Is there any specific settings for Perl?