first visual basic code upload
|
After Width: | Height: | Size: 438 KiB |
|
After Width: | Height: | Size: 1.1 MiB |
|
After Width: | Height: | Size: 402 KiB |
|
After Width: | Height: | Size: 1.0 MiB |
|
After Width: | Height: | Size: 391 KiB |
|
After Width: | Height: | Size: 547 KiB |
|
After Width: | Height: | Size: 263 KiB |
|
After Width: | Height: | Size: 1.3 MiB |
|
After Width: | Height: | Size: 134 KiB |
BIN
Events Data/Warrior TaeKwonDo League/Participants/Hassan.png
Normal file
|
After Width: | Height: | Size: 214 KiB |
|
After Width: | Height: | Size: 2.2 MiB |
|
After Width: | Height: | Size: 7.4 MiB |
BIN
Events Data/Warrior TaeKwonDo League/Participants/Kyle.png
Normal file
|
After Width: | Height: | Size: 127 KiB |
BIN
Events Data/Warrior TaeKwonDo League/Participants/Reno.png
Normal file
|
After Width: | Height: | Size: 169 KiB |
BIN
Events Data/Warrior TaeKwonDo League/Participants/Sarah.png
Normal file
|
After Width: | Height: | Size: 218 KiB |
|
After Width: | Height: | Size: 23 KiB |
|
After Width: | Height: | Size: 21 KiB |
|
After Width: | Height: | Size: 19 KiB |
22
Visual Studio Code/TAKEONE EMASS.sln
Normal file
@ -0,0 +1,22 @@
|
||||
|
||||
Microsoft Visual Studio Solution File, Format Version 12.00
|
||||
# Visual Studio 14
|
||||
VisualStudioVersion = 14.0.24720.0
|
||||
MinimumVisualStudioVersion = 10.0.40219.1
|
||||
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "TAKEONE EMASS", "Timer Library\TAKEONE EMASS.vbproj", "{8572539F-1758-4227-AE30-E25D75BD6BF4}"
|
||||
EndProject
|
||||
Global
|
||||
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
||||
Debug|Any CPU = Debug|Any CPU
|
||||
Release|Any CPU = Release|Any CPU
|
||||
EndGlobalSection
|
||||
GlobalSection(ProjectConfigurationPlatforms) = postSolution
|
||||
{8572539F-1758-4227-AE30-E25D75BD6BF4}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
|
||||
{8572539F-1758-4227-AE30-E25D75BD6BF4}.Debug|Any CPU.Build.0 = Debug|Any CPU
|
||||
{8572539F-1758-4227-AE30-E25D75BD6BF4}.Release|Any CPU.ActiveCfg = Release|Any CPU
|
||||
{8572539F-1758-4227-AE30-E25D75BD6BF4}.Release|Any CPU.Build.0 = Release|Any CPU
|
||||
EndGlobalSection
|
||||
GlobalSection(SolutionProperties) = preSolution
|
||||
HideSolutionNode = FALSE
|
||||
EndGlobalSection
|
||||
EndGlobal
|
||||
69
Visual Studio Code/Timer Library/App.config
Normal file
@ -0,0 +1,69 @@
|
||||
<?xml version="1.0" encoding="utf-8" ?>
|
||||
<configuration>
|
||||
<configSections>
|
||||
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
|
||||
<section name="TAKEONE_EMASS.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
|
||||
</sectionGroup>
|
||||
</configSections>
|
||||
<startup>
|
||||
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5.2" />
|
||||
</startup>
|
||||
<userSettings>
|
||||
<TAKEONE_EMASS.My.MySettings>
|
||||
<setting name="server" serializeAs="String">
|
||||
<value>localhost</value>
|
||||
</setting>
|
||||
<setting name="userid" serializeAs="String">
|
||||
<value>root</value>
|
||||
</setting>
|
||||
<setting name="password" serializeAs="String">
|
||||
<value />
|
||||
</setting>
|
||||
<setting name="database" serializeAs="String">
|
||||
<value>test</value>
|
||||
</setting>
|
||||
<setting name="port" serializeAs="String">
|
||||
<value>3306</value>
|
||||
</setting>
|
||||
<setting name="match_num" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
<setting name="match_rounds" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
<setting name="match_round_time_minutes" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
<setting name="match_round_time_seconds" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
<setting name="match_break_time_minutes" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
<setting name="match_break_time_seconds" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
<setting name="match_court_number" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
<setting name="match_enable_sudden_death" serializeAs="String">
|
||||
<value>False</value>
|
||||
</setting>
|
||||
<setting name="database_enable" serializeAs="String">
|
||||
<value>False</value>
|
||||
</setting>
|
||||
<setting name="video_capture_enable" serializeAs="String">
|
||||
<value>False</value>
|
||||
</setting>
|
||||
<setting name="video_intro_enable" serializeAs="String">
|
||||
<value>False</value>
|
||||
</setting>
|
||||
<setting name="video_intro_path" serializeAs="String">
|
||||
<value />
|
||||
</setting>
|
||||
<setting name="match_enable_max_difference" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
</TAKEONE_EMASS.My.MySettings>
|
||||
</userSettings>
|
||||
</configuration>
|
||||
38
Visual Studio Code/Timer Library/My Project/Application.Designer.vb
generated
Normal file
@ -0,0 +1,38 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.42000
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
'NOTE: This file is auto-generated; do not modify it directly. To make changes,
|
||||
' or if you encounter build errors in this file, go to the Project Designer
|
||||
' (go to Project Properties or double-click the My Project node in
|
||||
' Solution Explorer), and make changes on the Application tab.
|
||||
'
|
||||
Partial Friend Class MyApplication
|
||||
|
||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||
Public Sub New()
|
||||
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
|
||||
Me.IsSingleInstance = false
|
||||
Me.EnableVisualStyles = true
|
||||
Me.SaveMySettingsOnExit = true
|
||||
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||
Protected Overrides Sub OnCreateMainForm()
|
||||
Me.MainForm = Global.TAKEONE_EMASS.frm_main
|
||||
End Sub
|
||||
End Class
|
||||
End Namespace
|
||||
@ -0,0 +1,10 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
|
||||
<MySubMain>true</MySubMain>
|
||||
<MainForm>frm_main</MainForm>
|
||||
<SingleInstance>false</SingleInstance>
|
||||
<ShutdownMode>0</ShutdownMode>
|
||||
<EnableVisualStyles>true</EnableVisualStyles>
|
||||
<AuthenticationMode>0</AuthenticationMode>
|
||||
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||
</MyApplicationData>
|
||||
35
Visual Studio Code/Timer Library/My Project/AssemblyInfo.vb
Normal file
@ -0,0 +1,35 @@
|
||||
Imports System
|
||||
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("Timer Library")>
|
||||
<Assembly: AssemblyDescription("")>
|
||||
<Assembly: AssemblyCompany("")>
|
||||
<Assembly: AssemblyProduct("Timer Library")>
|
||||
<Assembly: AssemblyCopyright("Copyright © 2019")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
|
||||
<Assembly: ComVisible(False)>
|
||||
|
||||
'The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
<Assembly: Guid("bd28187e-db63-477a-a352-c8f09e1aff1a")>
|
||||
|
||||
' 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.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("1.0.0.0")>
|
||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||
83
Visual Studio Code/Timer Library/My Project/Resources.Designer.vb
generated
Normal file
@ -0,0 +1,83 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.42000
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
|
||||
Namespace My.Resources
|
||||
|
||||
'This class was auto-generated by the StronglyTypedResourceBuilder
|
||||
'class via a tool like ResGen or Visual Studio.
|
||||
'To add or remove a member, edit your .ResX file then rerun ResGen
|
||||
'with the /str option, or rebuild your VS project.
|
||||
'''<summary>
|
||||
''' A strongly-typed resource class, for looking up localized strings, etc.
|
||||
'''</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
|
||||
Friend Module Resources
|
||||
|
||||
Private resourceMan As Global.System.Resources.ResourceManager
|
||||
|
||||
Private resourceCulture As Global.System.Globalization.CultureInfo
|
||||
|
||||
'''<summary>
|
||||
''' Returns the cached ResourceManager instance used by this class.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
||||
Get
|
||||
If Object.ReferenceEquals(resourceMan, Nothing) Then
|
||||
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("TAKEONE_EMASS.Resources", GetType(Resources).Assembly)
|
||||
resourceMan = temp
|
||||
End If
|
||||
Return resourceMan
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Overrides the current thread's CurrentUICulture property for all
|
||||
''' resource lookups using this strongly typed resource class.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
||||
Get
|
||||
Return resourceCulture
|
||||
End Get
|
||||
Set
|
||||
resourceCulture = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property _8i6oer5KT() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("8i6oer5KT", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property user_group_icon() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("user-group-icon", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
127
Visual Studio Code/Timer Library/My Project/Resources.resx
Normal file
@ -0,0 +1,127 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="8i6oer5KT" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\8i6oer5KT.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="user-group-icon" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\user-group-icon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
</root>
|
||||
289
Visual Studio Code/Timer Library/My Project/Settings.Designer.vb
generated
Normal file
@ -0,0 +1,289 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.42000
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "14.0.0.0"), _
|
||||
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Partial Friend NotInheritable Class MySettings
|
||||
Inherits Global.System.Configuration.ApplicationSettingsBase
|
||||
|
||||
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
|
||||
|
||||
#Region "My.Settings Auto-Save Functionality"
|
||||
#If _MyType = "WindowsForms" Then
|
||||
Private Shared addedHandler As Boolean
|
||||
|
||||
Private Shared addedHandlerLockObject As New Object
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
|
||||
If My.Application.SaveMySettingsOnExit Then
|
||||
My.Settings.Save()
|
||||
End If
|
||||
End Sub
|
||||
#End If
|
||||
#End Region
|
||||
|
||||
Public Shared ReadOnly Property [Default]() As MySettings
|
||||
Get
|
||||
|
||||
#If _MyType = "WindowsForms" Then
|
||||
If Not addedHandler Then
|
||||
SyncLock addedHandlerLockObject
|
||||
If Not addedHandler Then
|
||||
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
|
||||
addedHandler = True
|
||||
End If
|
||||
End SyncLock
|
||||
End If
|
||||
#End If
|
||||
Return defaultInstance
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("localhost")> _
|
||||
Public Property server() As String
|
||||
Get
|
||||
Return CType(Me("server"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("server") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("root")> _
|
||||
Public Property userid() As String
|
||||
Get
|
||||
Return CType(Me("userid"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("userid") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("")> _
|
||||
Public Property password() As String
|
||||
Get
|
||||
Return CType(Me("password"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("password") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("test")> _
|
||||
Public Property database() As String
|
||||
Get
|
||||
Return CType(Me("database"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("database") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("3306")> _
|
||||
Public Property port() As Integer
|
||||
Get
|
||||
Return CType(Me("port"),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me("port") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
Public Property match_num() As Integer
|
||||
Get
|
||||
Return CType(Me("match_num"),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me("match_num") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
Public Property match_rounds() As Integer
|
||||
Get
|
||||
Return CType(Me("match_rounds"),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me("match_rounds") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
Public Property match_round_time_minutes() As Integer
|
||||
Get
|
||||
Return CType(Me("match_round_time_minutes"),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me("match_round_time_minutes") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
Public Property match_round_time_seconds() As Integer
|
||||
Get
|
||||
Return CType(Me("match_round_time_seconds"),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me("match_round_time_seconds") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
Public Property match_break_time_minutes() As Integer
|
||||
Get
|
||||
Return CType(Me("match_break_time_minutes"),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me("match_break_time_minutes") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
Public Property match_break_time_seconds() As Integer
|
||||
Get
|
||||
Return CType(Me("match_break_time_seconds"),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me("match_break_time_seconds") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
Public Property match_court_number() As Integer
|
||||
Get
|
||||
Return CType(Me("match_court_number"),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me("match_court_number") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
|
||||
Public Property match_enable_sudden_death() As Boolean
|
||||
Get
|
||||
Return CType(Me("match_enable_sudden_death"),Boolean)
|
||||
End Get
|
||||
Set
|
||||
Me("match_enable_sudden_death") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
|
||||
Public Property database_enable() As Boolean
|
||||
Get
|
||||
Return CType(Me("database_enable"),Boolean)
|
||||
End Get
|
||||
Set
|
||||
Me("database_enable") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
|
||||
Public Property video_capture_enable() As Boolean
|
||||
Get
|
||||
Return CType(Me("video_capture_enable"),Boolean)
|
||||
End Get
|
||||
Set
|
||||
Me("video_capture_enable") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
|
||||
Public Property video_intro_enable() As Boolean
|
||||
Get
|
||||
Return CType(Me("video_intro_enable"),Boolean)
|
||||
End Get
|
||||
Set
|
||||
Me("video_intro_enable") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("")> _
|
||||
Public Property video_intro_path() As String
|
||||
Get
|
||||
Return CType(Me("video_intro_path"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("video_intro_path") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
Public Property match_enable_max_difference() As Integer
|
||||
Get
|
||||
Return CType(Me("match_enable_max_difference"),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me("match_enable_max_difference") = value
|
||||
End Set
|
||||
End Property
|
||||
End Class
|
||||
End Namespace
|
||||
|
||||
Namespace My
|
||||
|
||||
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
|
||||
Friend Module MySettingsProperty
|
||||
|
||||
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
|
||||
Friend ReadOnly Property Settings() As Global.TAKEONE_EMASS.My.MySettings
|
||||
Get
|
||||
Return Global.TAKEONE_EMASS.My.MySettings.Default
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
@ -0,0 +1,60 @@
|
||||
<?xml version='1.0' encoding='utf-8'?>
|
||||
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
|
||||
<Profiles />
|
||||
<Settings>
|
||||
<Setting Name="server" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">localhost</Value>
|
||||
</Setting>
|
||||
<Setting Name="userid" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">root</Value>
|
||||
</Setting>
|
||||
<Setting Name="password" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)" />
|
||||
</Setting>
|
||||
<Setting Name="database" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">test</Value>
|
||||
</Setting>
|
||||
<Setting Name="port" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">3306</Value>
|
||||
</Setting>
|
||||
<Setting Name="match_num" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
<Setting Name="match_rounds" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
<Setting Name="match_round_time_minutes" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
<Setting Name="match_round_time_seconds" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
<Setting Name="match_break_time_minutes" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
<Setting Name="match_break_time_seconds" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
<Setting Name="match_court_number" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
<Setting Name="match_enable_sudden_death" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">False</Value>
|
||||
</Setting>
|
||||
<Setting Name="database_enable" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">False</Value>
|
||||
</Setting>
|
||||
<Setting Name="video_capture_enable" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">False</Value>
|
||||
</Setting>
|
||||
<Setting Name="video_intro_enable" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">False</Value>
|
||||
</Setting>
|
||||
<Setting Name="video_intro_path" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)" />
|
||||
</Setting>
|
||||
<Setting Name="match_enable_max_difference" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
</Settings>
|
||||
</SettingsFile>
|
||||
BIN
Visual Studio Code/Timer Library/Resources/8i6oer5KT.png
Normal file
|
After Width: | Height: | Size: 63 KiB |
BIN
Visual Studio Code/Timer Library/Resources/user-group-icon.png
Normal file
|
After Width: | Height: | Size: 12 KiB |
292
Visual Studio Code/Timer Library/TAKEONE EMASS.vbproj
Normal file
@ -0,0 +1,292 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="14.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<ProjectGuid>{8572539F-1758-4227-AE30-E25D75BD6BF4}</ProjectGuid>
|
||||
<OutputType>WinExe</OutputType>
|
||||
<StartupObject>TAKEONE_EMASS.My.MyApplication</StartupObject>
|
||||
<RootNamespace>TAKEONE_EMASS</RootNamespace>
|
||||
<AssemblyName>TAKEONE EMASS</AssemblyName>
|
||||
<FileAlignment>512</FileAlignment>
|
||||
<MyType>WindowsForms</MyType>
|
||||
<TargetFrameworkVersion>v4.5.2</TargetFrameworkVersion>
|
||||
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<DebugType>full</DebugType>
|
||||
<DefineDebug>true</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<OutputPath>bin\Debug\</OutputPath>
|
||||
<DocumentationFile>TAKEONE EMASS.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<DefineDebug>false</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<Optimize>true</Optimize>
|
||||
<OutputPath>bin\Release\</OutputPath>
|
||||
<DocumentationFile>TAKEONE EMASS.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionExplicit>On</OptionExplicit>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionCompare>Binary</OptionCompare>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionStrict>Off</OptionStrict>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionInfer>On</OptionInfer>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<Reference Include="MySql.Data, Version=8.0.17.0, Culture=neutral, PublicKeyToken=c5687fc88969c44d, processorArchitecture=MSIL" />
|
||||
<Reference Include="Newtonsoft.Json, Version=12.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
|
||||
<HintPath>..\packages\Newtonsoft.Json.12.0.2\lib\net45\Newtonsoft.Json.dll</HintPath>
|
||||
<Private>True</Private>
|
||||
</Reference>
|
||||
<Reference Include="System" />
|
||||
<Reference Include="System.Data" />
|
||||
<Reference Include="System.Deployment" />
|
||||
<Reference Include="System.Drawing" />
|
||||
<Reference Include="System.Windows.Forms" />
|
||||
<Reference Include="System.Xml" />
|
||||
<Reference Include="System.Core" />
|
||||
<Reference Include="System.Xml.Linq" />
|
||||
<Reference Include="System.Data.DataSetExtensions" />
|
||||
<Reference Include="System.Net.Http" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Import Include="Microsoft.VisualBasic" />
|
||||
<Import Include="System" />
|
||||
<Import Include="System.Collections" />
|
||||
<Import Include="System.Collections.Generic" />
|
||||
<Import Include="System.Data" />
|
||||
<Import Include="System.Drawing" />
|
||||
<Import Include="System.Diagnostics" />
|
||||
<Import Include="System.Windows.Forms" />
|
||||
<Import Include="System.Linq" />
|
||||
<Import Include="System.Xml.Linq" />
|
||||
<Import Include="System.Threading.Tasks" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="forms\entities\classes\age.vb" />
|
||||
<Compile Include="forms\entities\classes\club.vb" />
|
||||
<Compile Include="forms\entities\classes\country.vb" />
|
||||
<Compile Include="forms\entities\classes\location.vb" />
|
||||
<Compile Include="forms\entities\classes\weight.vb" />
|
||||
<Compile Include="forms\event\classes\match.vb" />
|
||||
<Compile Include="forms\event\classes\platformevent.vb" />
|
||||
<Compile Include="forms\entities\classes\referee.vb" />
|
||||
<Compile Include="forms\entities\classes\person.vb" />
|
||||
<Compile Include="forms\event\frm_add_participants.Designer.vb">
|
||||
<DependentUpon>frm_add_participants.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_add_participants.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_arrange_matches.Designer.vb">
|
||||
<DependentUpon>frm_arrange_matches.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_arrange_matches.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\friendly\classes\friendly_fighter.vb" />
|
||||
<Compile Include="forms\friendly\frm_friendly_match.designer.vb">
|
||||
<DependentUpon>frm_friendly_match.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\friendly\frm_friendly_match.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_ranking.Designer.vb">
|
||||
<DependentUpon>frm_ranking.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_ranking.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_scoreboard.Designer.vb">
|
||||
<DependentUpon>frm_scoreboard.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_scoreboard.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\friendly\frm_friendly_scorecontrol.Designer.vb">
|
||||
<DependentUpon>frm_friendly_scorecontrol.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\friendly\frm_friendly_scorecontrol.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="includes\modules\functions.vb" />
|
||||
<Compile Include="includes\modules\mysql.vb" />
|
||||
<Compile Include="includes\classes\dataset.vb" />
|
||||
<Compile Include="forms\entities\person\frm_add_person.designer.vb">
|
||||
<DependentUpon>frm_add_person.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\entities\person\frm_add_person.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_event_control.designer.vb">
|
||||
<DependentUpon>frm_event_control.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_event_control.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\main\frm_main.designer.vb">
|
||||
<DependentUpon>frm_main.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\main\frm_main.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_fighter_statistics.designer.vb">
|
||||
<DependentUpon>frm_fighter_statistics.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_fighter_statistics.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_match_fighters.Designer.vb">
|
||||
<DependentUpon>frm_match_fighters.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_match_fighters.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_create_event.designer.vb">
|
||||
<DependentUpon>frm_create_event.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_create_event.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\main\frm_settings.designer.vb">
|
||||
<DependentUpon>frm_settings.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\main\frm_settings.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\entities\country\frm_update_flag.designer.vb">
|
||||
<DependentUpon>frm_update_flag.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\entities\country\frm_update_flag.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_scorecontrol.designer.vb">
|
||||
<DependentUpon>frm_scorecontrol.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\event\frm_scorecontrol.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="forms\friendly\classes\friendly_match.vb" />
|
||||
<Compile Include="forms\entities\club\frm_update_logo.Designer.vb">
|
||||
<DependentUpon>frm_update_logo.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\entities\club\frm_update_logo.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="includes\modules\platform.vb" />
|
||||
<Compile Include="My Project\AssemblyInfo.vb" />
|
||||
<Compile Include="My Project\Application.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Application.myapp</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="My Project\Resources.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DesignTime>True</DesignTime>
|
||||
<DependentUpon>Resources.resx</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="My Project\Settings.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Settings.settings</DependentUpon>
|
||||
<DesignTimeSharedInput>True</DesignTimeSharedInput>
|
||||
</Compile>
|
||||
<Compile Include="includes\classes\match_timer.vb" />
|
||||
<Compile Include="forms\event\classes\fighter.vb" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<EmbeddedResource Include="forms\entities\person\frm_add_person.resx">
|
||||
<DependentUpon>frm_add_person.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\event\frm_add_participants.resx">
|
||||
<DependentUpon>frm_add_participants.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\event\frm_arrange_matches.resx">
|
||||
<DependentUpon>frm_arrange_matches.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\friendly\frm_friendly_match.resx">
|
||||
<DependentUpon>frm_friendly_match.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\event\frm_event_control.resx">
|
||||
<DependentUpon>frm_event_control.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\main\frm_main.resx">
|
||||
<DependentUpon>frm_main.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\event\frm_fighter_statistics.resx">
|
||||
<DependentUpon>frm_fighter_statistics.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\event\frm_match_fighters.resx">
|
||||
<DependentUpon>frm_match_fighters.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\event\frm_create_event.resx">
|
||||
<DependentUpon>frm_create_event.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\event\frm_ranking.resx">
|
||||
<DependentUpon>frm_ranking.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\main\frm_settings.resx">
|
||||
<DependentUpon>frm_settings.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\entities\country\frm_update_flag.resx">
|
||||
<DependentUpon>frm_update_flag.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\event\frm_scoreboard.resx">
|
||||
<DependentUpon>frm_scoreboard.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\event\frm_scorecontrol.resx">
|
||||
<DependentUpon>frm_scorecontrol.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\entities\club\frm_update_logo.resx">
|
||||
<DependentUpon>frm_update_logo.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="forms\friendly\frm_friendly_scorecontrol.resx">
|
||||
<DependentUpon>frm_friendly_scorecontrol.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="My Project\Resources.resx">
|
||||
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
|
||||
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
|
||||
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="My Project\Application.myapp">
|
||||
<Generator>MyApplicationCodeGenerator</Generator>
|
||||
<LastGenOutput>Application.Designer.vb</LastGenOutput>
|
||||
</None>
|
||||
<None Include="My Project\Settings.settings">
|
||||
<Generator>SettingsSingleFileGenerator</Generator>
|
||||
<CustomToolNamespace>My</CustomToolNamespace>
|
||||
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
|
||||
</None>
|
||||
<None Include="App.config" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="packages.config" />
|
||||
<None Include="Resources\8i6oer5KT.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\user-group-icon.png" />
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||
Other similar extension points exist, see Microsoft.Common.targets.
|
||||
<Target Name="BeforeBuild">
|
||||
</Target>
|
||||
<Target Name="AfterBuild">
|
||||
</Target>
|
||||
-->
|
||||
</Project>
|
||||
134
Visual Studio Code/Timer Library/Timer Library.vbproj
Normal file
@ -0,0 +1,134 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="14.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<ProjectGuid>{8572539F-1758-4227-AE30-E25D75BD6BF4}</ProjectGuid>
|
||||
<OutputType>WinExe</OutputType>
|
||||
<StartupObject>Timer_Library.My.MyApplication</StartupObject>
|
||||
<RootNamespace>Timer_Library</RootNamespace>
|
||||
<AssemblyName>Timer Library</AssemblyName>
|
||||
<FileAlignment>512</FileAlignment>
|
||||
<MyType>WindowsForms</MyType>
|
||||
<TargetFrameworkVersion>v4.5.2</TargetFrameworkVersion>
|
||||
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<DebugType>full</DebugType>
|
||||
<DefineDebug>true</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<OutputPath>bin\Debug\</OutputPath>
|
||||
<DocumentationFile>Timer Library.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<DefineDebug>false</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<Optimize>true</Optimize>
|
||||
<OutputPath>bin\Release\</OutputPath>
|
||||
<DocumentationFile>Timer Library.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionExplicit>On</OptionExplicit>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionCompare>Binary</OptionCompare>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionStrict>Off</OptionStrict>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionInfer>On</OptionInfer>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<Reference Include="MySql.Data, Version=8.0.17.0, Culture=neutral, PublicKeyToken=c5687fc88969c44d, processorArchitecture=MSIL" />
|
||||
<Reference Include="System" />
|
||||
<Reference Include="System.Data" />
|
||||
<Reference Include="System.Deployment" />
|
||||
<Reference Include="System.Drawing" />
|
||||
<Reference Include="System.Windows.Forms" />
|
||||
<Reference Include="System.Xml" />
|
||||
<Reference Include="System.Core" />
|
||||
<Reference Include="System.Xml.Linq" />
|
||||
<Reference Include="System.Data.DataSetExtensions" />
|
||||
<Reference Include="System.Net.Http" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Import Include="Microsoft.VisualBasic" />
|
||||
<Import Include="System" />
|
||||
<Import Include="System.Collections" />
|
||||
<Import Include="System.Collections.Generic" />
|
||||
<Import Include="System.Data" />
|
||||
<Import Include="System.Drawing" />
|
||||
<Import Include="System.Diagnostics" />
|
||||
<Import Include="System.Windows.Forms" />
|
||||
<Import Include="System.Linq" />
|
||||
<Import Include="System.Xml.Linq" />
|
||||
<Import Include="System.Threading.Tasks" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="classes\fighter.vb" />
|
||||
<Compile Include="classes\mysql.vb" />
|
||||
<Compile Include="forms\frm_scorecontrol.designer.vb">
|
||||
<DependentUpon>frm_scorecontrol.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="forms\frm_scorecontrol.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="classes\match.vb" />
|
||||
<Compile Include="My Project\AssemblyInfo.vb" />
|
||||
<Compile Include="My Project\Application.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Application.myapp</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="My Project\Resources.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DesignTime>True</DesignTime>
|
||||
<DependentUpon>Resources.resx</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="My Project\Settings.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Settings.settings</DependentUpon>
|
||||
<DesignTimeSharedInput>True</DesignTimeSharedInput>
|
||||
</Compile>
|
||||
<Compile Include="classes\timer.vb" />
|
||||
<Compile Include="classes\scores.vb" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<EmbeddedResource Include="forms\frm_scorecontrol.resx">
|
||||
<DependentUpon>frm_scorecontrol.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="My Project\Resources.resx">
|
||||
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
|
||||
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
|
||||
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="My Project\Application.myapp">
|
||||
<Generator>MyApplicationCodeGenerator</Generator>
|
||||
<LastGenOutput>Application.Designer.vb</LastGenOutput>
|
||||
</None>
|
||||
<None Include="My Project\Settings.settings">
|
||||
<Generator>SettingsSingleFileGenerator</Generator>
|
||||
<CustomToolNamespace>My</CustomToolNamespace>
|
||||
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
|
||||
</None>
|
||||
<None Include="App.config" />
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||
Other similar extension points exist, see Microsoft.Common.targets.
|
||||
<Target Name="BeforeBuild">
|
||||
</Target>
|
||||
<Target Name="AfterBuild">
|
||||
</Target>
|
||||
-->
|
||||
</Project>
|
||||
@ -0,0 +1,53 @@
|
||||
' Age Class To Generate Age From Date Of Birth
|
||||
Public Class age
|
||||
|
||||
Private _days As Integer
|
||||
Private _monthes As Integer
|
||||
Private _years As Integer
|
||||
Private _birthdate As Date
|
||||
|
||||
Public Sub New(Birthdate As Date)
|
||||
_birthdate = Birthdate
|
||||
Calculate(Birthdate)
|
||||
End Sub
|
||||
|
||||
ReadOnly Property Birthdate As Date
|
||||
Get
|
||||
Return _birthdate
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Years As Integer
|
||||
Get
|
||||
Return _years
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Monthes As Integer
|
||||
Get
|
||||
Return _monthes
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Days As Integer
|
||||
Get
|
||||
Return _days
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Printable As String
|
||||
Get
|
||||
Return "You Are " & _years & " Years " & _monthes & " Monthes " & _days & " Old"
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Private Sub Calculate(Birthdate As Date)
|
||||
|
||||
' Breaking Down The Date Difference Into Year, Monthes and Days
|
||||
_years = DateDiff(DateInterval.Year, Birthdate, Now)
|
||||
_monthes = DateDiff(DateInterval.Month, Birthdate, Now) Mod 12
|
||||
_days = DateDiff(DateInterval.Day, Birthdate, Now) Mod 30 - 10
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
139
Visual Studio Code/Timer Library/forms/entities/classes/club.vb
Normal file
@ -0,0 +1,139 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class club
|
||||
|
||||
Private _id As Integer
|
||||
Private _title As String
|
||||
Private _owner As person
|
||||
Private _country As country
|
||||
Private _address As String
|
||||
Private _location As String
|
||||
Private _logo As MemoryStream
|
||||
|
||||
Public Sub New(ID As Integer)
|
||||
GetClubData(ID)
|
||||
End Sub
|
||||
|
||||
ReadOnly Property ID As Integer
|
||||
Get
|
||||
Return _id
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Title As String
|
||||
Get
|
||||
Return _title
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Country As country
|
||||
Get
|
||||
Return _country
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Location As String
|
||||
Get
|
||||
Return _location
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Logo As MemoryStream
|
||||
Get
|
||||
Return _logo
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public Sub GetClubData(ID As Integer)
|
||||
|
||||
Dim QRY As String = "select * from clubs where id = " & ID & " limit 1"
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
|
||||
Try
|
||||
_id = Int(RDR("id"))
|
||||
Catch ex As Exception
|
||||
_id = 0
|
||||
End Try
|
||||
|
||||
Try
|
||||
_title = RDR("title")
|
||||
Catch ex As Exception
|
||||
_title = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_country = New country(Int(RDR("country")))
|
||||
Catch ex As Exception
|
||||
_country = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_location = RDR("location")
|
||||
Catch ex As Exception
|
||||
_location = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Club Logo -----------------------------------------
|
||||
Dim data As Byte() = DirectCast(RDR("logo"), Byte())
|
||||
_logo = New System.IO.MemoryStream(data)
|
||||
Catch ex As Exception
|
||||
_logo = Nothing
|
||||
End Try
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub Create(Title As String, Country As country, Location As String, Logo As MemoryStream)
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub UpdateLogo(LogoPictureBox As PictureBox)
|
||||
|
||||
' To Avoid Wrong Execution Of Code
|
||||
If _id = 0 Then Exit Sub
|
||||
|
||||
' Query To Update
|
||||
Dim QRY As String = "update clubs set logo = @logo where id=" & _id
|
||||
|
||||
' Connection
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
' Preparing The Image
|
||||
Dim Picture As New MemoryStream
|
||||
LogoPictureBox.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
Picture.Close()
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.Parameters.AddWithValue("@logo", arrImage)
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
@ -0,0 +1,228 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class country
|
||||
|
||||
Private _id As Integer
|
||||
Private _name As String
|
||||
Private _flag As MemoryStream
|
||||
Private _flat_flag As String
|
||||
Private _shiny_flag As String
|
||||
Private _iso As String
|
||||
Private _iso3 As String
|
||||
Private _num_code As Integer
|
||||
Private _call_code As Integer
|
||||
Private _currency As String
|
||||
|
||||
Public Sub New()
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub New(id As Integer)
|
||||
GetCountryData(id)
|
||||
End Sub
|
||||
|
||||
ReadOnly Property ID As Integer
|
||||
Get
|
||||
Return _id
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Name As String
|
||||
Get
|
||||
Return _name
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Flag As MemoryStream
|
||||
Get
|
||||
Return _flag
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property FlatFlag As String
|
||||
Get
|
||||
Return _flat_flag
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ShinyFlag As String
|
||||
Get
|
||||
Return _shiny_flag
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ISO As String
|
||||
Get
|
||||
Return _iso
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ISO3 As String
|
||||
Get
|
||||
Return _iso3
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property NumCode As Integer
|
||||
Get
|
||||
Return _num_code
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property CallCode As Integer
|
||||
Get
|
||||
Return _call_code
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Currency As String
|
||||
Get
|
||||
Return _currency
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Private Sub GetCountryData(ID As Integer)
|
||||
|
||||
Dim QRY As String = ("select * from countries where id = " & ID & " limit 1")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
|
||||
While RDR.Read
|
||||
|
||||
Try ' ID
|
||||
_id = RDR("id")
|
||||
Catch ex As Exception
|
||||
_id = 0
|
||||
End Try
|
||||
|
||||
Try ' First Name
|
||||
_name = RDR("name")
|
||||
Catch ex As Exception
|
||||
_name = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Middle Name
|
||||
_flat_flag = RDR("flatFlag")
|
||||
Catch ex As Exception
|
||||
_flat_flag = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Last Name
|
||||
_shiny_flag = RDR("shinyFlag")
|
||||
Catch ex As Exception
|
||||
_shiny_flag = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Gender
|
||||
_iso = RDR("iso")
|
||||
Catch ex As Exception
|
||||
_iso = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Birthday
|
||||
_iso3 = RDR("iso3")
|
||||
Catch ex As Exception
|
||||
_iso3 = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Age
|
||||
_num_code = RDR("numcode")
|
||||
Catch ex As Exception
|
||||
_num_code = 0
|
||||
End Try
|
||||
|
||||
Try ' Weight
|
||||
_call_code = RDR("callcode")
|
||||
Catch ex As Exception
|
||||
_call_code = 0
|
||||
End Try
|
||||
|
||||
Try ' Category
|
||||
_currency = RDR("currency")
|
||||
Catch ex As Exception
|
||||
_currency = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Country Flag --------------------------------------
|
||||
Dim data As Byte() = DirectCast(RDR("flag"), Byte())
|
||||
_flag = New System.IO.MemoryStream(data)
|
||||
Catch ex As Exception
|
||||
_flag = Nothing
|
||||
End Try
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub UpdateFlag(FlagPictureBox As PictureBox)
|
||||
|
||||
' To Avoid Wrong Execution Of Code
|
||||
If _id = 0 Then Exit Sub
|
||||
|
||||
' Query To Update
|
||||
Dim QRY As String = "update countries set flag = @flag where id=" & _id
|
||||
|
||||
' Connection
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
' Preparing The Image
|
||||
Dim Picture As New MemoryStream
|
||||
FlagPictureBox.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
Picture.Close()
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.Parameters.AddWithValue("@flag", arrImage)
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Function GetCountryList() As List(Of country)
|
||||
|
||||
Dim QRY As String = "select * from countries order by name asc"
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of country)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New country(RDR("id")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return LST
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@ -0,0 +1,41 @@
|
||||
Imports Newtonsoft.Json
|
||||
|
||||
Public Class location
|
||||
|
||||
Private _latitude As Double
|
||||
Private _longitude As Double
|
||||
Private _altitude As Double
|
||||
Private product As Object
|
||||
|
||||
Public Sub New(latitude, longitude)
|
||||
_latitude = latitude
|
||||
_longitude = longitude
|
||||
End Sub
|
||||
|
||||
Public Sub New(latitude, longitude, altitude)
|
||||
|
||||
_latitude = latitude
|
||||
_longitude = longitude
|
||||
_altitude = altitude
|
||||
|
||||
End Sub
|
||||
|
||||
ReadOnly Property Latitude As Double
|
||||
Get
|
||||
Return _latitude
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Longitude As Double
|
||||
Get
|
||||
Return _longitude
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Altitude As Double
|
||||
Get
|
||||
Return _altitude
|
||||
End Get
|
||||
End Property
|
||||
|
||||
End Class
|
||||
@ -0,0 +1,371 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class person
|
||||
|
||||
' Person Data Variables
|
||||
Private _id As Integer ' Member ID
|
||||
Private _first_name As String ' First Name
|
||||
Private _middle_name As String ' Middle Name
|
||||
Private _last_name As String ' Last Name
|
||||
Private _gender As String ' Gender
|
||||
Private _birthday As Date ' Date Of Birth
|
||||
Private _age As age ' Calculated From Birthday
|
||||
Private _weight As weight ' Weight
|
||||
Private _picture As MemoryStream ' Picture
|
||||
|
||||
' Person Country
|
||||
Private _nationality As country ' Country Object
|
||||
|
||||
' Person Team / Club
|
||||
Private _team As club ' Club Object
|
||||
|
||||
'--------------------------------------------------------------------------------------
|
||||
' CONSTRUCTORS
|
||||
'--------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub New(Fname As String, Sname As String, Lname As String, DateOfBirth As String, Gender As String, Weight As String, CPR As String, Country As Integer, Mobile As String, Email As String, Address As String, Club As Integer, PictureBox As PictureBox)
|
||||
|
||||
' Create A New Person
|
||||
CREATE(Fname, Sname, Lname, DateOfBirth, Gender, Weight, CPR, Country, Mobile, Email, Address, Club, PictureBox)
|
||||
|
||||
' Get Person Data From Returned ID
|
||||
GetPersonData(_id)
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub New(ID As Integer)
|
||||
|
||||
If ID = 0 Then
|
||||
ZeroID()
|
||||
Else
|
||||
GetPersonData(ID)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
'--------------------------------------------------------------------------------------
|
||||
' PROPERTIES
|
||||
'--------------------------------------------------------------------------------------
|
||||
|
||||
Public Property ID As Integer
|
||||
Get
|
||||
Return _id
|
||||
End Get
|
||||
Set(value As Integer)
|
||||
_id = value
|
||||
GetPersonData(_id)
|
||||
End Set
|
||||
End Property
|
||||
|
||||
ReadOnly Property FirstName As String
|
||||
Get
|
||||
Return _first_name
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property LastName As String
|
||||
Get
|
||||
Return _last_name
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property MiddleName As String
|
||||
Get
|
||||
Return _first_name + " " + _last_name
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ShortName As String
|
||||
Get
|
||||
Return _first_name + " " + _last_name
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property FullName As String
|
||||
Get
|
||||
Return _first_name + " " + _middle_name + " " + _last_name
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Age As age
|
||||
Get
|
||||
Return _age
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Birthday As Date
|
||||
Get
|
||||
Return _birthday
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Weight As weight
|
||||
Get
|
||||
Return _weight
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Gender As String
|
||||
Get
|
||||
Return _gender
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Team As club
|
||||
Get
|
||||
Return _team
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Nationality As country
|
||||
Get
|
||||
Return _nationality
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Picture As MemoryStream
|
||||
Get
|
||||
Return _picture
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'--------------------------------------------------------------------------------------
|
||||
' Create Section
|
||||
'--------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub CREATE(Fname As String, Sname As String, Lname As String, DateOfBirth As String, Gender As String, Weight As String, CPR As String, Country As Integer, Mobile As String, Email As String, Address As String, Club As Integer, PictureBox As PictureBox)
|
||||
|
||||
Dim QRY As String = ("
|
||||
insert into
|
||||
person (fname, mname, lname, country, gender, date_of_birth, weight, cpr, mobile, email, address, club, picture)
|
||||
values ('" & Fname & "', '" & Sname & "', '" & Lname & "', " & Country & ", '" & Gender & "', '" & DateOfBirth & "', '" & Weight & "', '" & CPR & "', '" & Mobile & "', '" & Email & "', '" & Address & "', " & Club & ", @picture);
|
||||
|
||||
select last_insert_id() as 'id';
|
||||
")
|
||||
|
||||
' Generate Weight Object
|
||||
_weight = New weight(ReadMySQLDate(DateOfBirth), Gender, CDbl(Val(Weight)))
|
||||
|
||||
' Connection
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
Dim Picture As New MemoryStream
|
||||
PictureBox.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
Picture.Close()
|
||||
|
||||
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.Parameters.AddWithValue("@picture", arrImage)
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
|
||||
While RDR.Read
|
||||
|
||||
Try ' ID
|
||||
_id = RDR("id")
|
||||
Catch ex As Exception
|
||||
_id = 0
|
||||
End Try
|
||||
|
||||
End While
|
||||
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
' Updating Weight
|
||||
UpdateWeight(CDbl(Val(Weight)))
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
'--------------------------------------------------------------------------------------
|
||||
' Update Section
|
||||
'--------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub UpdatePicture(PictureBox As PictureBox)
|
||||
|
||||
' Query To Update
|
||||
Dim QRY As String = "update person set picture = @picture where id=" & _id
|
||||
|
||||
' Connection
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
' Preparing The Image
|
||||
Dim Picture As New MemoryStream
|
||||
PictureBox.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
Picture.Close()
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.Parameters.AddWithValue("@picture", arrImage)
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
'--------------------------------------------------------------------------------------
|
||||
' SUBROUTINES
|
||||
'--------------------------------------------------------------------------------------
|
||||
|
||||
Private Sub GetPersonData(FighterID As Integer)
|
||||
|
||||
Dim QRY As String =
|
||||
("
|
||||
select
|
||||
person.id as 'pid',
|
||||
person.fname,
|
||||
person.mname,
|
||||
person.lname,
|
||||
TIMESTAMPDIFF(YEAR, person.date_of_birth, CURDATE()) as 'age',
|
||||
person.date_of_birth,
|
||||
person.weight,
|
||||
person.gender,
|
||||
person.country as 'country',
|
||||
clubs.id as 'club',
|
||||
person.picture as 'picture'
|
||||
FROM
|
||||
person
|
||||
left join
|
||||
clubs on person.club = clubs.id
|
||||
left join
|
||||
countries on clubs.country = countries.id
|
||||
where
|
||||
person.id=" + FighterID.ToString
|
||||
)
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
|
||||
While RDR.Read
|
||||
|
||||
Try ' ID
|
||||
_id = RDR("pid")
|
||||
Catch ex As Exception
|
||||
_id = 0
|
||||
End Try
|
||||
|
||||
Try ' First Name
|
||||
_first_name = RDR("fname")
|
||||
Catch ex As Exception
|
||||
_first_name = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Middle Name
|
||||
_middle_name = RDR("mname")
|
||||
Catch ex As Exception
|
||||
_middle_name = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Last Name
|
||||
_last_name = RDR("lname")
|
||||
Catch ex As Exception
|
||||
_last_name = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Gender
|
||||
_gender = RDR("gender")
|
||||
Catch ex As Exception
|
||||
_gender = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Birthday
|
||||
_birthday = CDate(RDR("date_of_birth"))
|
||||
Catch ex As Exception
|
||||
_birthday = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Age
|
||||
_age = New age(_birthday)
|
||||
Catch ex As Exception
|
||||
_age = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Weight
|
||||
_weight = New weight(_birthday, _gender, RDR("weight"))
|
||||
Catch ex As Exception
|
||||
_weight = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Team Name
|
||||
_team = New club(RDR("club"))
|
||||
Catch ex As Exception
|
||||
_team = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Country
|
||||
_nationality = New country(RDR("country"))
|
||||
Catch ex As Exception
|
||||
_nationality = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Fighter Picture -------------------------------------------
|
||||
Dim data As Byte() = DirectCast(RDR("picture"), Byte())
|
||||
_picture = New System.IO.MemoryStream(data)
|
||||
Catch ex As Exception
|
||||
_picture = Nothing
|
||||
End Try
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
'--------------------------------------------------------------------------------------
|
||||
' FUNCTIONS
|
||||
'--------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub UpdateWeight(Weight As Double)
|
||||
|
||||
' This Updates The Weight Of The Person
|
||||
_weight.UpdateWeight(Me._id, Weight)
|
||||
|
||||
End Sub
|
||||
|
||||
'--------------------------------------------------------------------------------------
|
||||
' Zero ID Person
|
||||
'--------------------------------------------------------------------------------------
|
||||
|
||||
Private Sub ZeroID()
|
||||
|
||||
_id = 0
|
||||
_first_name = "B"
|
||||
_middle_name = "Y"
|
||||
_last_name = "E"
|
||||
_gender = "EXGEN"
|
||||
_birthday = ""
|
||||
_age = Nothing
|
||||
_weight = Nothing
|
||||
_picture = Nothing
|
||||
_team = Nothing
|
||||
_nationality = Nothing
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
@ -0,0 +1,209 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class referee
|
||||
|
||||
' Referee Data Variables
|
||||
Private _id As Integer ' Member ID
|
||||
Private _first_name As String ' First Name
|
||||
Private _middle_name As String ' Middle Name
|
||||
Private _last_name As String ' Last Name
|
||||
Private _gender As String ' Gender
|
||||
Private _birthday As Date ' Date Of Birth
|
||||
Private _age As Integer ' Calculated From Birthday
|
||||
Private _picture As MemoryStream ' Picture
|
||||
|
||||
' Referee Team / Club
|
||||
Private _team As club ' Team Within Country
|
||||
|
||||
' Referee Country
|
||||
Private _nationality As country ' Country Name
|
||||
|
||||
'--------------------------------------------------------------------------------------
|
||||
' CONSTRUCTORS
|
||||
'--------------------------------------------------------------------------------------
|
||||
|
||||
' With Initial Parameter
|
||||
Public Sub New(ID As Integer)
|
||||
GetRefereeData(ID)
|
||||
End Sub
|
||||
|
||||
'--------------------------------------------------------------------------------------
|
||||
' PROPERTIES
|
||||
'--------------------------------------------------------------------------------------
|
||||
|
||||
Public Property ID As Integer
|
||||
Get
|
||||
Return _id
|
||||
End Get
|
||||
Set(value As Integer)
|
||||
_id = value
|
||||
GetRefereeData(_id)
|
||||
End Set
|
||||
End Property
|
||||
|
||||
ReadOnly Property FirstNAME As String
|
||||
Get
|
||||
Return _first_name
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property LastNAME As String
|
||||
Get
|
||||
Return _last_name
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property MiddleNAME As String
|
||||
Get
|
||||
Return _first_name + " " + _last_name
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ShortName As String
|
||||
Get
|
||||
Return _first_name + " " + _last_name
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property FullName As String
|
||||
Get
|
||||
Return _first_name + " " + _middle_name + " " + _last_name
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Age As Integer
|
||||
Get
|
||||
Return _age
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Birthday As Date
|
||||
Get
|
||||
Return _birthday
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Country As country
|
||||
Get
|
||||
Return _nationality
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Team As club
|
||||
Get
|
||||
Return _team
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Picture As MemoryStream
|
||||
Get
|
||||
Return _picture
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'--------------------------------------------------------------------------------------
|
||||
' SUBROUTINES
|
||||
'--------------------------------------------------------------------------------------
|
||||
Private Sub GetRefereeData(FighterID As Integer)
|
||||
|
||||
Dim QRY As String =
|
||||
("
|
||||
select
|
||||
person.id as 'pid',
|
||||
person.fname,
|
||||
person.mname,
|
||||
person.lname,
|
||||
TIMESTAMPDIFF(YEAR, person.date_of_birth, CURDATE()) as 'age',
|
||||
person.date_of_birth,
|
||||
person.gender,
|
||||
person.club as 'club',
|
||||
person.country as 'country',
|
||||
person.picture
|
||||
FROM
|
||||
person
|
||||
where
|
||||
person.id=" + FighterID.ToString
|
||||
)
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
|
||||
Try
|
||||
_id = RDR("pid")
|
||||
Catch ex As Exception
|
||||
_id = 0
|
||||
End Try
|
||||
|
||||
Try
|
||||
_first_name = RDR("fname")
|
||||
Catch ex As Exception
|
||||
_first_name = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_middle_name = RDR("mname")
|
||||
Catch ex As Exception
|
||||
_middle_name = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_last_name = RDR("lname")
|
||||
Catch ex As Exception
|
||||
_last_name = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_gender = RDR("gender")
|
||||
Catch ex As Exception
|
||||
_gender = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_birthday = CDate(RDR("date_of_birth"))
|
||||
Catch ex As Exception
|
||||
_birthday = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_age = RDR("age")
|
||||
Catch ex As Exception
|
||||
_age = 0
|
||||
End Try
|
||||
|
||||
Try
|
||||
_team = New club(Int(RDR("club")))
|
||||
Catch ex As Exception
|
||||
_team = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_nationality = New country(Int(RDR("country")))
|
||||
Catch ex As Exception
|
||||
_nationality = Nothing
|
||||
End Try
|
||||
|
||||
Try ' Fighter Personal Picture ----------------------------------
|
||||
Dim arrImage() As Byte = DirectCast(RDR("picture"), Byte())
|
||||
_picture = New MemoryStream(arrImage)
|
||||
Catch ex As Exception
|
||||
_picture = Nothing
|
||||
End Try '--------------------------------------------------------
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
@ -0,0 +1,205 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
' Weight Class To Generate Weight (Category, Class) From Gender, Weight, Date Of Birth.
|
||||
Public Class weight
|
||||
|
||||
Private _id As Integer ' Weight Profile ID
|
||||
Private _age As age ' Age Object (years, monthes, days)
|
||||
Private _gender As String ' Weight Filter Gender
|
||||
Private _weight As Double ' Weight In KG
|
||||
Private _weight_class As String ' Weight Class Name
|
||||
Private _weight_category As String ' Weight Category Name
|
||||
|
||||
Public Sub New(Birthdate As Date, Gender As String, Weight As Double)
|
||||
|
||||
_age = New age(Birthdate)
|
||||
_gender = Gender
|
||||
_weight = Weight
|
||||
|
||||
' Weight Filter That Gets
|
||||
WeightFilter(_age.Years, Weight, Gender)
|
||||
|
||||
End Sub
|
||||
|
||||
ReadOnly Property WeightFilterID As Integer
|
||||
Get
|
||||
Return _id
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Weight As String
|
||||
Get
|
||||
Return Math.Round(_weight, 1).ToString
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property WeightClass As String
|
||||
Get
|
||||
Return _weight_class
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property WeightCategory As String
|
||||
Get
|
||||
Return _weight_category
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Private Sub WeightFilter(Age As Integer, Weight As String, Gender As String)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
SELECT
|
||||
id,
|
||||
Category,
|
||||
ClassName
|
||||
FROM
|
||||
weight_divisions
|
||||
WHERE
|
||||
('" & Age & "' BETWEEN weight_divisions.minAge AND weight_divisions.maxAge)
|
||||
AND
|
||||
(weight_divisions.gender = '" & Gender & "')
|
||||
AND
|
||||
('" & Weight & "' > weight_divisions.minWeight AND '" & Weight & "' <= weight_divisions.maxWeight)
|
||||
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
_id = RDR("id")
|
||||
_weight_category = RDR("Category")
|
||||
_weight_class = RDR("ClassName")
|
||||
End While
|
||||
End If
|
||||
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
_weight_category = Nothing
|
||||
_weight_class = Nothing
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub GetPersonWeight(PersonID As Integer)
|
||||
|
||||
Dim QRY As String =
|
||||
("
|
||||
select
|
||||
person.weight,
|
||||
person.gender,
|
||||
person.date_of_birth,
|
||||
FROM
|
||||
person
|
||||
where
|
||||
person.id=" + PersonID.ToString
|
||||
)
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
|
||||
While RDR.Read
|
||||
|
||||
Try
|
||||
_age = New age(RDR("date_of_birth"))
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Try
|
||||
_weight = RDR("weight")
|
||||
Catch ex As Exception
|
||||
_weight = 0
|
||||
End Try
|
||||
|
||||
Try
|
||||
_gender = RDR("gender")
|
||||
Catch ex As Exception
|
||||
_gender = Nothing
|
||||
End Try
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub UpdateWeight(PersonID As Integer, NewWeight As Double)
|
||||
|
||||
' If Person ID = 0 Just Dont Do any Thing
|
||||
If PersonID = 0 Then Exit Sub
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
/* Take The New Reading */
|
||||
|
||||
SET @pid = " & PersonID.ToString & "; /* Person ID */
|
||||
SET @weight = " & NewWeight.ToString & "; /* New Weight Reading */
|
||||
SET SQL_SAFE_UPDATES = 0; /* Disable Safe Mode For Updates */
|
||||
|
||||
/* Update Person Weight */
|
||||
|
||||
UPDATE person SET weight = @weight WHERE id = @pid;
|
||||
|
||||
/* Update Participants Weight Classes */
|
||||
|
||||
UPDATE
|
||||
person
|
||||
LEFT JOIN
|
||||
weight_divisions
|
||||
ON
|
||||
(YEAR(CURDATE()) - YEAR(person.date_of_birth) BETWEEN weight_divisions.minAge AND weight_divisions.maxAge) AND
|
||||
(weight_divisions.gender = person.gender) AND
|
||||
(person.weight > weight_divisions.minWeight AND person.weight <= weight_divisions.maxWeight)
|
||||
SET
|
||||
person.wp = weight_divisions.id,
|
||||
person.category = weight_divisions.category,
|
||||
person.weight_Class = weight_divisions.className
|
||||
WHERE
|
||||
person.id = @pid;
|
||||
|
||||
/* Take Snap Shot Copy Current Weight To Person Body As A History */
|
||||
|
||||
INSERT INTO person_body (pid, weight, category, weight_class) SELECT id, weight, category, weight_class FROM person WHERE id = @pid;
|
||||
|
||||
/* Enable Safe Mode For Updates */
|
||||
|
||||
SET SQL_SAFE_UPDATES = 1;
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
104
Visual Studio Code/Timer Library/forms/entities/club/frm_update_logo.Designer.vb
generated
Normal file
@ -0,0 +1,104 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_update_logo
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.cbo_clubs = New System.Windows.Forms.ComboBox()
|
||||
Me.btn_save = New System.Windows.Forms.Button()
|
||||
Me.btn_open = New System.Windows.Forms.Button()
|
||||
Me.pb_logo = New System.Windows.Forms.PictureBox()
|
||||
CType(Me.pb_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'cbo_clubs
|
||||
'
|
||||
Me.cbo_clubs.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.cbo_clubs.DropDownHeight = 100
|
||||
Me.cbo_clubs.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.cbo_clubs.ForeColor = System.Drawing.Color.White
|
||||
Me.cbo_clubs.FormattingEnabled = True
|
||||
Me.cbo_clubs.IntegralHeight = False
|
||||
Me.cbo_clubs.Location = New System.Drawing.Point(5, 335)
|
||||
Me.cbo_clubs.Name = "cbo_clubs"
|
||||
Me.cbo_clubs.Size = New System.Drawing.Size(325, 30)
|
||||
Me.cbo_clubs.TabIndex = 9
|
||||
'
|
||||
'btn_save
|
||||
'
|
||||
Me.btn_save.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_save.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_save.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_save.Location = New System.Drawing.Point(170, 370)
|
||||
Me.btn_save.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
||||
Me.btn_save.Name = "btn_save"
|
||||
Me.btn_save.Size = New System.Drawing.Size(160, 45)
|
||||
Me.btn_save.TabIndex = 8
|
||||
Me.btn_save.Text = "Save"
|
||||
Me.btn_save.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_open
|
||||
'
|
||||
Me.btn_open.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_open.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_open.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_open.Location = New System.Drawing.Point(5, 370)
|
||||
Me.btn_open.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
||||
Me.btn_open.Name = "btn_open"
|
||||
Me.btn_open.Size = New System.Drawing.Size(160, 45)
|
||||
Me.btn_open.TabIndex = 7
|
||||
Me.btn_open.Text = "Open"
|
||||
Me.btn_open.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pb_logo
|
||||
'
|
||||
Me.pb_logo.Location = New System.Drawing.Point(5, 5)
|
||||
Me.pb_logo.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
||||
Me.pb_logo.Name = "pb_logo"
|
||||
Me.pb_logo.Size = New System.Drawing.Size(325, 325)
|
||||
Me.pb_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_logo.TabIndex = 6
|
||||
Me.pb_logo.TabStop = False
|
||||
'
|
||||
'frm_update_logo
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(336, 421)
|
||||
Me.Controls.Add(Me.cbo_clubs)
|
||||
Me.Controls.Add(Me.btn_save)
|
||||
Me.Controls.Add(Me.btn_open)
|
||||
Me.Controls.Add(Me.pb_logo)
|
||||
Me.ForeColor = System.Drawing.Color.White
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
|
||||
Me.Name = "frm_update_logo"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Update Club Logo"
|
||||
CType(Me.pb_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents cbo_clubs As ComboBox
|
||||
Friend WithEvents btn_save As Button
|
||||
Friend WithEvents btn_open As Button
|
||||
Friend WithEvents pb_logo As PictureBox
|
||||
End Class
|
||||
@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@ -0,0 +1,54 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class frm_update_logo
|
||||
|
||||
|
||||
Private Sub btn_open_Click(sender As Object, e As EventArgs) Handles btn_open.Click
|
||||
|
||||
If IsNothing(pb_logo.Image) Then
|
||||
|
||||
' Loads And Image And Resize It In PNG Format
|
||||
ResizePicture(pb_logo, 500, 500)
|
||||
|
||||
ElseIf Not IsNothing(pb_logo.Image) Then
|
||||
|
||||
Dim iPictureUpdate As DialogResult = MessageBox.Show("Would You Like To Update The Club Logo ?", "Club Logo Update", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
|
||||
If iPictureUpdate = DialogResult.Yes Then
|
||||
|
||||
' Loads And Image And Resize It In PNG Format
|
||||
ResizePicture(pb_logo, 500, 500)
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
' List Down Clubs
|
||||
GetClubsList(cbo_clubs)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_save_Click(sender As Object, e As EventArgs) Handles btn_save.Click
|
||||
|
||||
' Updates A Club Logo
|
||||
UpdateClubLogo(pb_logo, cbo_clubs.SelectedValue)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_clubs_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_clubs.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
' Displays Clubs Logo
|
||||
GetClubLogo(pb_logo, cbo_clubs.SelectedValue)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
105
Visual Studio Code/Timer Library/forms/entities/country/frm_update_flag.designer.vb
generated
Normal file
@ -0,0 +1,105 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class frm_update_flag
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.pb_country_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.btn_open = New System.Windows.Forms.Button()
|
||||
Me.btn_save = New System.Windows.Forms.Button()
|
||||
Me.cbo_countries = New System.Windows.Forms.ComboBox()
|
||||
CType(Me.pb_country_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'pb_country_flag
|
||||
'
|
||||
Me.pb_country_flag.Location = New System.Drawing.Point(5, 5)
|
||||
Me.pb_country_flag.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
||||
Me.pb_country_flag.Name = "pb_country_flag"
|
||||
Me.pb_country_flag.Size = New System.Drawing.Size(325, 205)
|
||||
Me.pb_country_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_country_flag.TabIndex = 0
|
||||
Me.pb_country_flag.TabStop = False
|
||||
'
|
||||
'btn_open
|
||||
'
|
||||
Me.btn_open.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_open.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_open.Location = New System.Drawing.Point(5, 250)
|
||||
Me.btn_open.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
||||
Me.btn_open.Name = "btn_open"
|
||||
Me.btn_open.Size = New System.Drawing.Size(160, 45)
|
||||
Me.btn_open.TabIndex = 1
|
||||
Me.btn_open.Text = "Open"
|
||||
Me.btn_open.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_save
|
||||
'
|
||||
Me.btn_save.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_save.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_save.Location = New System.Drawing.Point(170, 250)
|
||||
Me.btn_save.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
||||
Me.btn_save.Name = "btn_save"
|
||||
Me.btn_save.Size = New System.Drawing.Size(160, 45)
|
||||
Me.btn_save.TabIndex = 2
|
||||
Me.btn_save.Text = "Save"
|
||||
Me.btn_save.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cbo_countries
|
||||
'
|
||||
Me.cbo_countries.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.cbo_countries.DropDownHeight = 100
|
||||
Me.cbo_countries.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.cbo_countries.ForeColor = System.Drawing.Color.White
|
||||
Me.cbo_countries.FormattingEnabled = True
|
||||
Me.cbo_countries.IntegralHeight = False
|
||||
Me.cbo_countries.Location = New System.Drawing.Point(5, 215)
|
||||
Me.cbo_countries.Name = "cbo_countries"
|
||||
Me.cbo_countries.Size = New System.Drawing.Size(325, 30)
|
||||
Me.cbo_countries.TabIndex = 3
|
||||
'
|
||||
'frm_update_flag
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(9.0!, 20.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(336, 301)
|
||||
Me.Controls.Add(Me.cbo_countries)
|
||||
Me.Controls.Add(Me.btn_save)
|
||||
Me.Controls.Add(Me.btn_open)
|
||||
Me.Controls.Add(Me.pb_country_flag)
|
||||
Me.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ForeColor = System.Drawing.Color.White
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
|
||||
Me.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
||||
Me.Name = "frm_update_flag"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Update Flag"
|
||||
CType(Me.pb_country_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents pb_country_flag As PictureBox
|
||||
Friend WithEvents btn_open As Button
|
||||
Friend WithEvents btn_save As Button
|
||||
Friend WithEvents cbo_countries As ComboBox
|
||||
End Class
|
||||
@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@ -0,0 +1,78 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class frm_update_flag
|
||||
|
||||
Private Country As country
|
||||
|
||||
Private Sub btn_open_Click(sender As Object, e As EventArgs) Handles btn_open.Click
|
||||
|
||||
If IsNothing(pb_country_flag.Image) Then
|
||||
|
||||
' Open Picture File
|
||||
ResizePicture(pb_country_flag, 236, 156)
|
||||
|
||||
' Making Sure The Isntance Is Ready
|
||||
Country = New country(cbo_countries.SelectedValue)
|
||||
|
||||
' Store The Picture
|
||||
Country.UpdateFlag(pb_country_flag)
|
||||
|
||||
ElseIf Not IsNothing(pb_country_flag.Image) Then
|
||||
|
||||
Dim iPictureUpdate As DialogResult = MessageBox.Show("Would You Like To Update The Country Flag ?", "Country Flag Update", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
|
||||
If iPictureUpdate = DialogResult.Yes Then
|
||||
|
||||
' Open Picture File
|
||||
ResizePicture(pb_country_flag, 236, 156)
|
||||
|
||||
' Making Sure The Isntance Is Ready
|
||||
Country = New country(cbo_countries.SelectedValue)
|
||||
|
||||
' Store The Picture
|
||||
Country.UpdateFlag(pb_country_flag)
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
Try
|
||||
' Read All Countries To ComboBox
|
||||
GetCountryList(cbo_countries)
|
||||
Catch ex As Exception
|
||||
cbo_countries.Items.Clear()
|
||||
cbo_countries.DataSource = Nothing
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_save_Click(sender As Object, e As EventArgs) Handles btn_save.Click
|
||||
|
||||
Try
|
||||
' Read Created Function To Update Country Flag In Functions Module
|
||||
Country = New country(cbo_countries.SelectedValue)
|
||||
Country.UpdateFlag(pb_country_flag)
|
||||
Catch ex As Exception
|
||||
pb_country_flag.Image = Nothing
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_countries_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_countries.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
' Read Country Flag Image From Database To Picture Box
|
||||
Country = New country(cbo_countries.SelectedValue)
|
||||
pb_country_flag.Image = Image.FromStream(Country.Flag)
|
||||
Catch ex As Exception
|
||||
pb_country_flag.Image = Nothing
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
473
Visual Studio Code/Timer Library/forms/entities/person/frm_add_person.designer.vb
generated
Normal file
@ -0,0 +1,473 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_add_person
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.txt_fname = New System.Windows.Forms.TextBox()
|
||||
Me.txt_mname = New System.Windows.Forms.TextBox()
|
||||
Me.date_birthday = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.txt_lname = New System.Windows.Forms.TextBox()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.cbo_gender = New System.Windows.Forms.ComboBox()
|
||||
Me.txt_mobile = New System.Windows.Forms.TextBox()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.txt_cpr = New System.Windows.Forms.TextBox()
|
||||
Me.txt_weight = New System.Windows.Forms.TextBox()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.txt_address = New System.Windows.Forms.TextBox()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.cbo_club = New System.Windows.Forms.ComboBox()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.btn_add_person = New System.Windows.Forms.Button()
|
||||
Me.pb_person_picture = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_picture = New System.Windows.Forms.Label()
|
||||
Me.cbo_country = New System.Windows.Forms.ComboBox()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.txt_email = New System.Windows.Forms.TextBox()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.pb_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_club = New System.Windows.Forms.PictureBox()
|
||||
CType(Me.pb_person_picture, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_club, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label1.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.ForeColor = System.Drawing.Color.White
|
||||
Me.Label1.Location = New System.Drawing.Point(235, 10)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label1.TabIndex = 2
|
||||
Me.Label1.Text = "First Name"
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label2.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.ForeColor = System.Drawing.Color.White
|
||||
Me.Label2.Location = New System.Drawing.Point(235, 45)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label2.TabIndex = 3
|
||||
Me.Label2.Text = "Middle Name"
|
||||
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_fname
|
||||
'
|
||||
Me.txt_fname.BackColor = System.Drawing.Color.White
|
||||
Me.txt_fname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.txt_fname.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txt_fname.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_fname.Location = New System.Drawing.Point(390, 10)
|
||||
Me.txt_fname.Name = "txt_fname"
|
||||
Me.txt_fname.Size = New System.Drawing.Size(339, 29)
|
||||
Me.txt_fname.TabIndex = 5
|
||||
'
|
||||
'txt_mname
|
||||
'
|
||||
Me.txt_mname.BackColor = System.Drawing.Color.White
|
||||
Me.txt_mname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.txt_mname.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txt_mname.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_mname.Location = New System.Drawing.Point(390, 45)
|
||||
Me.txt_mname.Name = "txt_mname"
|
||||
Me.txt_mname.Size = New System.Drawing.Size(340, 29)
|
||||
Me.txt_mname.TabIndex = 6
|
||||
'
|
||||
'date_birthday
|
||||
'
|
||||
Me.date_birthday.CustomFormat = "yyyy-MM-dd"
|
||||
Me.date_birthday.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.date_birthday.Format = System.Windows.Forms.DateTimePickerFormat.Custom
|
||||
Me.date_birthday.Location = New System.Drawing.Point(390, 185)
|
||||
Me.date_birthday.Name = "date_birthday"
|
||||
Me.date_birthday.Size = New System.Drawing.Size(340, 29)
|
||||
Me.date_birthday.TabIndex = 8
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label4.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.ForeColor = System.Drawing.Color.White
|
||||
Me.Label4.Location = New System.Drawing.Point(235, 185)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label4.TabIndex = 9
|
||||
Me.Label4.Text = "Birthdate"
|
||||
Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_lname
|
||||
'
|
||||
Me.txt_lname.BackColor = System.Drawing.Color.White
|
||||
Me.txt_lname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.txt_lname.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txt_lname.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_lname.Location = New System.Drawing.Point(390, 80)
|
||||
Me.txt_lname.Name = "txt_lname"
|
||||
Me.txt_lname.Size = New System.Drawing.Size(340, 29)
|
||||
Me.txt_lname.TabIndex = 11
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label3.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.ForeColor = System.Drawing.Color.White
|
||||
Me.Label3.Location = New System.Drawing.Point(235, 80)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label3.TabIndex = 10
|
||||
Me.Label3.Text = "Last Name"
|
||||
Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label5.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.ForeColor = System.Drawing.Color.White
|
||||
Me.Label5.Location = New System.Drawing.Point(235, 150)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label5.TabIndex = 12
|
||||
Me.Label5.Text = "Gender"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'cbo_gender
|
||||
'
|
||||
Me.cbo_gender.BackColor = System.Drawing.Color.White
|
||||
Me.cbo_gender.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cbo_gender.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cbo_gender.ForeColor = System.Drawing.Color.Black
|
||||
Me.cbo_gender.FormattingEnabled = True
|
||||
Me.cbo_gender.Items.AddRange(New Object() {"MALE", "FEMALE"})
|
||||
Me.cbo_gender.Location = New System.Drawing.Point(390, 150)
|
||||
Me.cbo_gender.Name = "cbo_gender"
|
||||
Me.cbo_gender.Size = New System.Drawing.Size(340, 30)
|
||||
Me.cbo_gender.TabIndex = 13
|
||||
Me.cbo_gender.Text = "MALE"
|
||||
'
|
||||
'txt_mobile
|
||||
'
|
||||
Me.txt_mobile.BackColor = System.Drawing.Color.White
|
||||
Me.txt_mobile.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.txt_mobile.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txt_mobile.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_mobile.Location = New System.Drawing.Point(390, 290)
|
||||
Me.txt_mobile.Name = "txt_mobile"
|
||||
Me.txt_mobile.Size = New System.Drawing.Size(340, 29)
|
||||
Me.txt_mobile.TabIndex = 19
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label6.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label6.ForeColor = System.Drawing.Color.White
|
||||
Me.Label6.Location = New System.Drawing.Point(235, 290)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label6.TabIndex = 18
|
||||
Me.Label6.Text = "Mobile"
|
||||
Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_cpr
|
||||
'
|
||||
Me.txt_cpr.BackColor = System.Drawing.Color.White
|
||||
Me.txt_cpr.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.txt_cpr.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txt_cpr.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_cpr.Location = New System.Drawing.Point(390, 255)
|
||||
Me.txt_cpr.MaxLength = 9
|
||||
Me.txt_cpr.Name = "txt_cpr"
|
||||
Me.txt_cpr.Size = New System.Drawing.Size(340, 29)
|
||||
Me.txt_cpr.TabIndex = 17
|
||||
'
|
||||
'txt_weight
|
||||
'
|
||||
Me.txt_weight.BackColor = System.Drawing.Color.White
|
||||
Me.txt_weight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.txt_weight.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txt_weight.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_weight.Location = New System.Drawing.Point(390, 220)
|
||||
Me.txt_weight.Name = "txt_weight"
|
||||
Me.txt_weight.Size = New System.Drawing.Size(340, 29)
|
||||
Me.txt_weight.TabIndex = 16
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label7.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label7.ForeColor = System.Drawing.Color.White
|
||||
Me.Label7.Location = New System.Drawing.Point(235, 255)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label7.TabIndex = 15
|
||||
Me.Label7.Text = "CPR"
|
||||
Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label8.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.Color.White
|
||||
Me.Label8.Location = New System.Drawing.Point(235, 220)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label8.TabIndex = 14
|
||||
Me.Label8.Text = "Weight"
|
||||
Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_address
|
||||
'
|
||||
Me.txt_address.BackColor = System.Drawing.Color.White
|
||||
Me.txt_address.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.txt_address.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txt_address.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_address.Location = New System.Drawing.Point(390, 360)
|
||||
Me.txt_address.Name = "txt_address"
|
||||
Me.txt_address.Size = New System.Drawing.Size(340, 29)
|
||||
Me.txt_address.TabIndex = 23
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label10.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label10.ForeColor = System.Drawing.Color.White
|
||||
Me.Label10.Location = New System.Drawing.Point(235, 360)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label10.TabIndex = 22
|
||||
Me.Label10.Text = "Address"
|
||||
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'cbo_club
|
||||
'
|
||||
Me.cbo_club.BackColor = System.Drawing.Color.White
|
||||
Me.cbo_club.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cbo_club.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cbo_club.ForeColor = System.Drawing.Color.Black
|
||||
Me.cbo_club.FormattingEnabled = True
|
||||
Me.cbo_club.Items.AddRange(New Object() {"ACES", "WARRIOR TAEKWONDO ACADEMY", "BAHRAIN TAEKWONDO SCHOOL"})
|
||||
Me.cbo_club.Location = New System.Drawing.Point(390, 395)
|
||||
Me.cbo_club.Name = "cbo_club"
|
||||
Me.cbo_club.Size = New System.Drawing.Size(340, 30)
|
||||
Me.cbo_club.TabIndex = 25
|
||||
Me.cbo_club.Text = "Select Participant Club"
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label11.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label11.ForeColor = System.Drawing.Color.White
|
||||
Me.Label11.Location = New System.Drawing.Point(235, 395)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label11.TabIndex = 24
|
||||
Me.Label11.Text = "Club"
|
||||
Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'btn_add_person
|
||||
'
|
||||
Me.btn_add_person.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_add_person.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_add_person.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_add_person.Location = New System.Drawing.Point(10, 360)
|
||||
Me.btn_add_person.Name = "btn_add_person"
|
||||
Me.btn_add_person.Size = New System.Drawing.Size(215, 65)
|
||||
Me.btn_add_person.TabIndex = 26
|
||||
Me.btn_add_person.Text = "ADD PERSON"
|
||||
Me.btn_add_person.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pb_person_picture
|
||||
'
|
||||
Me.pb_person_picture.Image = Global.TAKEONE_EMASS.My.Resources.Resources._8i6oer5KT
|
||||
Me.pb_person_picture.Location = New System.Drawing.Point(10, 45)
|
||||
Me.pb_person_picture.Name = "pb_person_picture"
|
||||
Me.pb_person_picture.Size = New System.Drawing.Size(215, 235)
|
||||
Me.pb_person_picture.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_person_picture.TabIndex = 27
|
||||
Me.pb_person_picture.TabStop = False
|
||||
'
|
||||
'lbl_picture
|
||||
'
|
||||
Me.lbl_picture.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_picture.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_picture.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_picture.Location = New System.Drawing.Point(10, 10)
|
||||
Me.lbl_picture.Name = "lbl_picture"
|
||||
Me.lbl_picture.Size = New System.Drawing.Size(215, 30)
|
||||
Me.lbl_picture.TabIndex = 28
|
||||
Me.lbl_picture.Text = "Person Picture"
|
||||
Me.lbl_picture.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'cbo_country
|
||||
'
|
||||
Me.cbo_country.BackColor = System.Drawing.Color.White
|
||||
Me.cbo_country.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cbo_country.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cbo_country.ForeColor = System.Drawing.Color.Black
|
||||
Me.cbo_country.FormattingEnabled = True
|
||||
Me.cbo_country.Items.AddRange(New Object() {"WHITE", "YELLOW", "GREEN", "BLUE", "RED", "POOM", "BLACK DAN 1", "BLACK DAN 2", "BLACK DAN 3", "BLACK DAN 4", "BLACK DAN 5", "BLACK DAN 6", "BLACK DAN 7", "BLACK DAN 8", "BLACK DAN 9", "BLACK DAN 10"})
|
||||
Me.cbo_country.Location = New System.Drawing.Point(390, 115)
|
||||
Me.cbo_country.Name = "cbo_country"
|
||||
Me.cbo_country.Size = New System.Drawing.Size(340, 30)
|
||||
Me.cbo_country.TabIndex = 30
|
||||
Me.cbo_country.Text = "Select Your Nationality"
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label12.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label12.ForeColor = System.Drawing.Color.White
|
||||
Me.Label12.Location = New System.Drawing.Point(235, 115)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label12.TabIndex = 29
|
||||
Me.Label12.Text = "Nationality"
|
||||
Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_email
|
||||
'
|
||||
Me.txt_email.BackColor = System.Drawing.Color.White
|
||||
Me.txt_email.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.txt_email.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txt_email.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_email.Location = New System.Drawing.Point(390, 325)
|
||||
Me.txt_email.Name = "txt_email"
|
||||
Me.txt_email.Size = New System.Drawing.Size(340, 29)
|
||||
Me.txt_email.TabIndex = 32
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label9.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label9.ForeColor = System.Drawing.Color.White
|
||||
Me.Label9.Location = New System.Drawing.Point(235, 325)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(145, 30)
|
||||
Me.Label9.TabIndex = 31
|
||||
Me.Label9.Text = "Em@il"
|
||||
Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'pb_flag
|
||||
'
|
||||
Me.pb_flag.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.pb_flag.Location = New System.Drawing.Point(110, 290)
|
||||
Me.pb_flag.Name = "pb_flag"
|
||||
Me.pb_flag.Size = New System.Drawing.Size(100, 60)
|
||||
Me.pb_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_flag.TabIndex = 37
|
||||
Me.pb_flag.TabStop = False
|
||||
'
|
||||
'pb_club
|
||||
'
|
||||
Me.pb_club.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_club.Location = New System.Drawing.Point(20, 285)
|
||||
Me.pb_club.Name = "pb_club"
|
||||
Me.pb_club.Size = New System.Drawing.Size(70, 70)
|
||||
Me.pb_club.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_club.TabIndex = 38
|
||||
Me.pb_club.TabStop = False
|
||||
'
|
||||
'frm_add_person
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(740, 436)
|
||||
Me.Controls.Add(Me.pb_club)
|
||||
Me.Controls.Add(Me.pb_flag)
|
||||
Me.Controls.Add(Me.txt_email)
|
||||
Me.Controls.Add(Me.Label9)
|
||||
Me.Controls.Add(Me.cbo_country)
|
||||
Me.Controls.Add(Me.Label12)
|
||||
Me.Controls.Add(Me.lbl_picture)
|
||||
Me.Controls.Add(Me.btn_add_person)
|
||||
Me.Controls.Add(Me.cbo_club)
|
||||
Me.Controls.Add(Me.Label11)
|
||||
Me.Controls.Add(Me.txt_address)
|
||||
Me.Controls.Add(Me.Label10)
|
||||
Me.Controls.Add(Me.txt_mobile)
|
||||
Me.Controls.Add(Me.Label6)
|
||||
Me.Controls.Add(Me.txt_cpr)
|
||||
Me.Controls.Add(Me.txt_weight)
|
||||
Me.Controls.Add(Me.Label7)
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.cbo_gender)
|
||||
Me.Controls.Add(Me.Label5)
|
||||
Me.Controls.Add(Me.txt_lname)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.Label4)
|
||||
Me.Controls.Add(Me.date_birthday)
|
||||
Me.Controls.Add(Me.txt_mname)
|
||||
Me.Controls.Add(Me.txt_fname)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.pb_person_picture)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
|
||||
Me.Name = "frm_add_person"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Add New Person"
|
||||
CType(Me.pb_person_picture, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_club, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents txt_fname As TextBox
|
||||
Friend WithEvents txt_mname As TextBox
|
||||
Friend WithEvents date_birthday As DateTimePicker
|
||||
Friend WithEvents Label4 As Label
|
||||
Friend WithEvents txt_lname As TextBox
|
||||
Friend WithEvents Label3 As Label
|
||||
Friend WithEvents Label5 As Label
|
||||
Friend WithEvents cbo_gender As ComboBox
|
||||
Friend WithEvents txt_mobile As TextBox
|
||||
Friend WithEvents Label6 As Label
|
||||
Friend WithEvents txt_cpr As TextBox
|
||||
Friend WithEvents txt_weight As TextBox
|
||||
Friend WithEvents Label7 As Label
|
||||
Friend WithEvents Label8 As Label
|
||||
Friend WithEvents txt_address As TextBox
|
||||
Friend WithEvents Label10 As Label
|
||||
Friend WithEvents cbo_club As ComboBox
|
||||
Friend WithEvents Label11 As Label
|
||||
Friend WithEvents btn_add_person As Button
|
||||
Friend WithEvents pb_person_picture As PictureBox
|
||||
Friend WithEvents lbl_picture As Label
|
||||
Friend WithEvents cbo_country As ComboBox
|
||||
Friend WithEvents Label12 As Label
|
||||
Friend WithEvents txt_email As TextBox
|
||||
Friend WithEvents Label9 As Label
|
||||
Friend WithEvents pb_flag As PictureBox
|
||||
Friend WithEvents pb_club As PictureBox
|
||||
End Class
|
||||
@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@ -0,0 +1,139 @@
|
||||
Imports System.ComponentModel
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class frm_add_person
|
||||
|
||||
Private Sub add_person()
|
||||
|
||||
Dim person As New person(txt_fname.Text, txt_mname.Text, txt_lname.Text, date_birthday.Text, cbo_gender.Text, txt_weight.Text, txt_cpr.Text, cbo_country.SelectedValue, txt_mobile.Text, txt_email.Text, txt_address.Text, cbo_club.SelectedValue, pb_person_picture)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Load_Picture()
|
||||
|
||||
'Creating A New Dialog
|
||||
Dim OpenPictureFile As New OpenFileDialog
|
||||
|
||||
'Filtering The Types
|
||||
OpenPictureFile.Filter = "Image Files | *.jpg; *.jpeg; *.bmp; *.png; *.gif;"
|
||||
|
||||
'Openning The File
|
||||
If OpenPictureFile.ShowDialog = System.Windows.Forms.DialogResult.OK Then
|
||||
|
||||
Try
|
||||
' Getting File Path
|
||||
Dim FilePath As String = OpenPictureFile.FileName()
|
||||
Dim FileName As String = System.IO.Path.GetFileName(OpenPictureFile.FileName)
|
||||
|
||||
' Picture File
|
||||
Dim Picture As New MemoryStream
|
||||
|
||||
' Define New Image Size
|
||||
Dim LogoSize As New Size(385, 500)
|
||||
|
||||
' Resizing The Image
|
||||
Dim ResizedImage = New Bitmap(Image.FromFile(FilePath), LogoSize)
|
||||
|
||||
' Display The Image
|
||||
pb_person_picture.Image = ResizedImage
|
||||
|
||||
' Saving The Image As PNG Format
|
||||
pb_person_picture.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
|
||||
' Read The Image As Bytes
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
|
||||
' Closing The Picture
|
||||
Picture.Close()
|
||||
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_add_person_Click(sender As Object, e As EventArgs) Handles btn_add_person.Click
|
||||
|
||||
add_person()
|
||||
Me.Close()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_add_person_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
|
||||
Try
|
||||
' List Down The Countries
|
||||
GetCountryList(cbo_country)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Try
|
||||
' List Down Clubs
|
||||
GetClubsList(cbo_club)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_country_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_country.SelectedIndexChanged
|
||||
|
||||
Dim QRY As String
|
||||
|
||||
Try
|
||||
QRY = "select flag from countries where id=" & cbo_country.SelectedValue
|
||||
Catch ex As Exception
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
Try
|
||||
Dim data As Byte() = DirectCast(RDR("flag"), Byte())
|
||||
Dim flag As New System.IO.MemoryStream(data)
|
||||
pb_flag.Image = Image.FromStream(flag)
|
||||
Catch ex As Exception
|
||||
pb_flag.Image = Nothing
|
||||
Exit Sub
|
||||
End Try
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub pb_person_picture_Click(sender As Object, e As EventArgs) Handles pb_person_picture.Click
|
||||
|
||||
'Load_Picture()
|
||||
ResizePicture(pb_person_picture, 385, 500)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_club_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_club.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
GetClubLogo(pb_club, cbo_club.SelectedValue)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
187
Visual Studio Code/Timer Library/forms/event/classes/fighter.vb
Normal file
@ -0,0 +1,187 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class fighter
|
||||
|
||||
' Scoring Information
|
||||
Private _event As Integer ' Event Number
|
||||
Private _match As Integer ' Match Number
|
||||
Private _person As person ' Fighter ID
|
||||
Private _score As Integer ' Total Score
|
||||
Private _gamjum As Integer ' Total Gamgum Foul
|
||||
Private _tranfer As Integer ' Transfered Point From Opponent Gam Jum
|
||||
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
' Properties
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub New(FighterID As Integer, EventID As Integer, MatchID As Integer)
|
||||
_person = New person(FighterID)
|
||||
_event = EventID
|
||||
_match = MatchID
|
||||
_score = 0
|
||||
_gamjum = 0
|
||||
End Sub
|
||||
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
' Properties
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
|
||||
ReadOnly Property Person As person
|
||||
Get
|
||||
Return _person
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Score As Integer
|
||||
Get
|
||||
Return _score
|
||||
End Get
|
||||
End Property
|
||||
|
||||
|
||||
ReadOnly Property Gamjum As Integer
|
||||
Get
|
||||
Return _gamjum
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
' Subroutines
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub AdjustScore(Amount As Integer)
|
||||
|
||||
_score += Amount
|
||||
RegisterScore(Amount, 0)
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub AdjustGamjum(Amount As Integer)
|
||||
|
||||
_gamjum += Amount
|
||||
RegisterScore(0, Amount)
|
||||
|
||||
End Sub
|
||||
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
' Subroutines
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub RegisterScore(Score As Integer, Gamjum As Integer)
|
||||
|
||||
Dim QRY As String = ("
|
||||
insert into event_matches_scores (eid, mid, pid, score, gamjum) values (" & _event & ", " & _match & ", " & _person.ID & ", " & Score & ", " & Gamjum & ");
|
||||
select sum(score) as 'score', sum(gamjum) as 'gamjum' from event_matches_scores where eid = " & _event & " and mid = " & _match & " and pid = " & _person.ID & ";
|
||||
")
|
||||
|
||||
' Connection
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
|
||||
While RDR.Read
|
||||
|
||||
Try ' Score
|
||||
_score = RDR("score")
|
||||
Catch ex As Exception
|
||||
_score = 0
|
||||
End Try
|
||||
|
||||
Try ' Gamjum
|
||||
_gamjum = RDR("gamjum")
|
||||
Catch ex As Exception
|
||||
_gamjum = 0
|
||||
End Try
|
||||
|
||||
End While
|
||||
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub GetMatchScores()
|
||||
|
||||
Dim QRY As String = ("select sum(score) as 'score', sum(gamjum) as 'gamjum' from event_matches_scores where eid = " & _event & " and mid = " & _match & " and pid = " & _person.ID & ";")
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
|
||||
While RDR.Read
|
||||
|
||||
Try ' Score
|
||||
_score = RDR("score")
|
||||
Catch ex As Exception
|
||||
_score = 0
|
||||
End Try
|
||||
|
||||
Try ' Gamjum
|
||||
_gamjum = RDR("gamjum")
|
||||
Catch ex As Exception
|
||||
_gamjum = 0
|
||||
End Try
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Function GetPointsList() As List(Of country)
|
||||
|
||||
Dim QRY As String = ("
|
||||
select
|
||||
score,
|
||||
gamjum
|
||||
from
|
||||
event_matches_scores
|
||||
where
|
||||
eid = " & _event & " and mid = " & _match & " and pid = " & _person.ID & "
|
||||
order by
|
||||
eid,
|
||||
mid
|
||||
desc;
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of country)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New country(RDR("id")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return LST
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
409
Visual Studio Code/Timer Library/forms/event/classes/match.vb
Normal file
@ -0,0 +1,409 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class match
|
||||
|
||||
'--[MATCH FIGHTERS]---------------
|
||||
|
||||
Public BlueFighter As fighter ' Blue Fighter Information
|
||||
Public RedFighter As fighter ' Red Fighter Information
|
||||
|
||||
'--[MATCH REFEREE]----------------
|
||||
|
||||
Public Referee As person ' Referee Information
|
||||
|
||||
'--[MATCH RECORD NUMBER]----------
|
||||
|
||||
Private _eventID As Integer ' Event Record Number & Also The Event Number
|
||||
Private _courtID As Integer ' Court Record Number
|
||||
Private _matchID As Integer ' Match Record Number
|
||||
|
||||
'--[EVENT MATCH NUMBERS]----------
|
||||
|
||||
Private _eventRound As Integer ' Event Phase Number (Which Phase Is The Event Matches)
|
||||
Private _matchNumber As Integer ' Match Event Round Match Number
|
||||
Private _courtNumber As Integer ' Match Court Number
|
||||
|
||||
'--[MATCH SETTINGS]---------------
|
||||
|
||||
Private _maxRound As Integer ' Max Number Of Rounds
|
||||
Private _maxRoundMin As Integer ' Max Round Minutes
|
||||
Private _maxRoundSec As Integer ' Max Round Sec
|
||||
Private _maxBreakMin As Integer ' Max Break Minutes
|
||||
Private _maxBreakSec As Integer ' Max Break Seconds
|
||||
Private _maxScoreDif As Integer ' Max Score Difference
|
||||
Private _enaMaxSdiff As Boolean ' End Match When Difference Reached
|
||||
Private _enaSudenDth As Boolean ' Enable Forth Round When Score Are Equal
|
||||
|
||||
'--[Display Numbers]--------------
|
||||
|
||||
Private _RoundNum As Integer = 1 ' Round Number
|
||||
Private _RoundMin As Integer ' Round Minutes
|
||||
Private _RoundSec As Integer ' Round Seconds
|
||||
Private _BreakMin As Integer ' Break Minutes
|
||||
Private _BreakSec As Integer ' Break Seconds
|
||||
|
||||
'--[CONSTRUCTORS]-------------------------------------------------
|
||||
|
||||
ReadOnly Property ID As Integer
|
||||
Get
|
||||
Return _matchID
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property COURT As Integer
|
||||
Get
|
||||
Return _courtID
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ROUND As Integer
|
||||
Get
|
||||
Return _RoundNum
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'--[CONSTRUCTORS]-------------------------------------------------
|
||||
|
||||
' Incase you have an event and its match number
|
||||
Public Sub New(EventID As Integer, MatchNumber As Integer)
|
||||
|
||||
_eventID = EventID
|
||||
_matchID = MatchNumber
|
||||
GetMatchData()
|
||||
|
||||
End Sub
|
||||
|
||||
' Incase you want to create instant match
|
||||
Public Sub New(BlueID As Integer, RedID As Integer, RefereeID As Integer)
|
||||
|
||||
BlueFighter = New fighter(BlueID, _eventID, _matchID)
|
||||
RedFighter = New fighter(RedID, _eventID, _matchID)
|
||||
Referee = New person(RefereeID)
|
||||
|
||||
SetDefault()
|
||||
ReTime_Round()
|
||||
ReTime_Break()
|
||||
|
||||
End Sub
|
||||
|
||||
'-----------------------------------------------------------------
|
||||
' READING MATCH NUMBER
|
||||
'-----------------------------------------------------------------
|
||||
|
||||
Private Sub SetDefault()
|
||||
|
||||
_RoundNum = 1
|
||||
_maxRound = My.Settings.match_rounds
|
||||
_maxRoundMin = My.Settings.match_round_time_minutes
|
||||
_maxRoundSec = My.Settings.match_round_time_seconds
|
||||
_maxBreakMin = My.Settings.match_break_time_minutes
|
||||
_maxBreakSec = My.Settings.match_break_time_seconds
|
||||
_enaSudenDth = My.Settings.match_enable_sudden_death
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ReTime_Round()
|
||||
_RoundMin = _maxRoundMin
|
||||
_RoundSec = _maxRoundSec
|
||||
End Sub
|
||||
|
||||
Private Sub ReTime_Break()
|
||||
_BreakMin = _maxBreakMin
|
||||
_BreakSec = _maxBreakSec
|
||||
End Sub
|
||||
|
||||
Public Function Time_CountDown() As Boolean
|
||||
|
||||
If _RoundMin > 0 Then
|
||||
|
||||
If _RoundSec > 0 And _RoundSec < 60 Then
|
||||
_RoundSec -= 1
|
||||
Return False
|
||||
Else
|
||||
_RoundMin -= 1
|
||||
_RoundSec = 59
|
||||
Return False
|
||||
End If
|
||||
|
||||
Else
|
||||
|
||||
If _RoundSec > 0 And _RoundSec < 60 Then
|
||||
_RoundSec -= 1
|
||||
Return False
|
||||
Else
|
||||
_RoundSec = 59
|
||||
Return True
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Function
|
||||
|
||||
'-----------------------------------------------------------------
|
||||
' READING MATCH NUMBER
|
||||
'-----------------------------------------------------------------
|
||||
|
||||
' THIS FUNCTION GETS THE NEWLY CREATED MATCH NUMBER
|
||||
|
||||
Private Sub GetMatchData()
|
||||
|
||||
Dim QRY As String = "SELECT ecn, ern, emn, blue_fighter, red_fighter FROM test.event_matches where emn = " & _matchID & " and started = 0 and ended = 0 and (not isnull(red_fighter)) and (not isnull(blue_fighter)) order by ern, emn asc"
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
|
||||
Try
|
||||
_courtID = RDR("ecn")
|
||||
Catch ex As Exception
|
||||
_courtID = 0
|
||||
End Try
|
||||
|
||||
Try
|
||||
_eventRound = RDR("ern")
|
||||
Catch ex As Exception
|
||||
_eventRound = 0
|
||||
End Try
|
||||
|
||||
Try
|
||||
BlueFighter = New fighter(RDR("blue_fighter"), _eventID, _matchID)
|
||||
Catch ex As Exception
|
||||
BlueFighter = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
RedFighter = New fighter(RDR("red_fighter"), _eventID, _matchID)
|
||||
Catch ex As Exception
|
||||
RedFighter = Nothing
|
||||
End Try
|
||||
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
' THIS FUNCTION RETURNS AVAILABLE NUMBER FOR A NEW MATCH
|
||||
|
||||
Private Function GetAvailableNewMatchID() As Integer
|
||||
|
||||
' Select the Unstarted Matches From The Match Sequence
|
||||
Dim QRY As String = ("
|
||||
select
|
||||
person.id as 'pid',
|
||||
person.fname,
|
||||
person.mname,
|
||||
person.lname,
|
||||
TIMESTAMPDIFF(YEAR, person.date_of_birth, CURDATE()) as 'age',
|
||||
person.date_of_birth,
|
||||
person.category,
|
||||
person.weight,
|
||||
person.weight_class,
|
||||
person.gender,
|
||||
person.picture,
|
||||
clubs.title as 'club',
|
||||
clubs.logo as 'logo',
|
||||
countries.iso3 as 'country',
|
||||
countries.flatflag as 'flag'
|
||||
FROM
|
||||
person
|
||||
left join
|
||||
clubs on person.club = clubs.id
|
||||
left join
|
||||
countries on person.country = countries.id
|
||||
where
|
||||
person.id=1
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim NUM As Integer
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
Try
|
||||
NUM = RDR("ID")
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return NUM
|
||||
|
||||
End Function
|
||||
|
||||
Public Sub StartMatch()
|
||||
|
||||
' Update The Table With The Winner ID
|
||||
Dim QRY As String = ("
|
||||
SET SQL_SAFE_UPDATES = 0;
|
||||
|
||||
UPDATE
|
||||
`event_matches`
|
||||
SET
|
||||
`started` = 1
|
||||
WHERE
|
||||
`emn` = " & _matchID & ";
|
||||
")
|
||||
|
||||
' Executing The Command
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub EndMatch()
|
||||
|
||||
' Testing This Condition
|
||||
If _matchID = 0 Or _matchID = Nothing Then Exit Sub
|
||||
|
||||
' Update The Table With The Winner ID
|
||||
Dim QRY As String = ("
|
||||
SET SQL_SAFE_UPDATES = 0;
|
||||
|
||||
UPDATE
|
||||
`event_matches`
|
||||
SET
|
||||
`ended` = 1
|
||||
WHERE
|
||||
`emn` = " & _matchID & ";
|
||||
")
|
||||
|
||||
' Executing The Command
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
'-----------------------------------------------------------------
|
||||
' METHODES OF ENDING A MATCH
|
||||
'-----------------------------------------------------------------
|
||||
|
||||
' THIS SUB ENDS THE MATCH AUTOMATICALLY BY CALCULATING THE POINTS
|
||||
Private Sub AutoEndMatch()
|
||||
|
||||
' Winner ID Holder
|
||||
Dim WinnerID As Integer
|
||||
|
||||
' This Is Where We Do Decision Making
|
||||
If BlueFighter.Score > RedFighter.Score Then
|
||||
WinnerID = BlueFighter.Person.ID ' Blue Fighter Wins
|
||||
ElseIf BlueFighter.Score < RedFighter.Score Then
|
||||
WinnerID = RedFighter.Person.ID ' Red Fighter Wins
|
||||
End If
|
||||
|
||||
' Update The Table With The Winner ID
|
||||
Dim QRY As String = ("
|
||||
SET SQL_SAFE_UPDATES = 0;
|
||||
|
||||
UPDATE
|
||||
`event_matches`
|
||||
SET
|
||||
`blue_score` = " & BlueFighter.Score & ",
|
||||
`blue_foul` = " & BlueFighter.Gamjum & ",
|
||||
`red_score` = " & RedFighter.Score & ",
|
||||
`red_foul` = " & RedFighter.Gamjum & ",
|
||||
`winner` = " & WinnerID & ",
|
||||
`ended` = 1
|
||||
WHERE
|
||||
`emn` = " & _matchID & ";
|
||||
")
|
||||
|
||||
' Executing The Command
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
' THIS SUB ENDS THE MATCH MANUALLY BY THE MAIN REFEREE IF NEEDED TO
|
||||
Private Sub ManualEndMatch(WinnerID As Integer, WinnerBy As String, Note As String)
|
||||
|
||||
' Update The Table With The Winner ID
|
||||
Dim QRY As String = ("
|
||||
SET SQL_SAFE_UPDATES = 0;
|
||||
|
||||
UPDATE
|
||||
`event_matches`
|
||||
SET
|
||||
`blue_score` = " & BlueFighter.Score & ",
|
||||
`blue_foul` = " & BlueFighter.Gamjum & ",
|
||||
`red_score` = " & RedFighter.Score & ",
|
||||
`red_foul` = " & RedFighter.Gamjum & ",
|
||||
`winner` = " & WinnerID & ",
|
||||
`notes` = '" & Note & "',
|
||||
`winnerBy` = '" & WinnerBy & "',
|
||||
`ended` = 1
|
||||
WHERE
|
||||
`emn` = " & _matchID & ";
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
@ -0,0 +1,391 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class platformevent
|
||||
|
||||
' TAKEONE Event
|
||||
Private _id As Integer
|
||||
Private _title As String
|
||||
Private _organizer As String
|
||||
Private _type As String
|
||||
Private _rules As String
|
||||
|
||||
' Location
|
||||
Private _address As String
|
||||
Private _location As String
|
||||
Private _country As country
|
||||
|
||||
' Event Parameters
|
||||
Private _court As Integer
|
||||
Private _enroll_start As Date
|
||||
Private _enroll_end As Date
|
||||
Private _weigh_in As Date
|
||||
Private _event_start As Date
|
||||
Private _event_end As Date
|
||||
Private _fee As Double
|
||||
Private _currency As String
|
||||
Private _logo As MemoryStream
|
||||
|
||||
' Making New Instance Without Any Action
|
||||
Public Sub New()
|
||||
|
||||
End Sub
|
||||
|
||||
' Make New Instance Of Event By Reading Data From Its ID
|
||||
Public Sub New(id As Integer)
|
||||
|
||||
GetEventData(id)
|
||||
|
||||
End Sub
|
||||
|
||||
' Make New Instance Directly By Creating A New Event Record
|
||||
Public Sub New(EventTitle As String, Type As String, Rounds As Integer, Organizer As String, Country As Integer, Address As String, Location As String, Courts As Integer, Rules As String, Currency As String, Fee As Integer, EnrollStart As String, EnrollEnd As String, WeighIn As String, EventStart As String, EventEnd As String, Logo As PictureBox)
|
||||
|
||||
CreateNewEvent(EventTitle, Type, Rounds, Organizer, Country, Address, Location, Courts, Rules, Currency, Fee, EnrollStart, EnrollEnd, WeighIn, EventStart, EventEnd, Logo)
|
||||
GetEventData(_id)
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
' Set Of Properties
|
||||
|
||||
ReadOnly Property ID As Integer
|
||||
Get
|
||||
Return _id
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Title As String
|
||||
Get
|
||||
Return _title
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Organizer As String
|
||||
Get
|
||||
Return _organizer
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Type As String
|
||||
Get
|
||||
Return _type
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Country As country
|
||||
Get
|
||||
Return _country
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Address As String
|
||||
Get
|
||||
Return _address
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Location As String
|
||||
Get
|
||||
Return _location
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Courts As Integer
|
||||
Get
|
||||
Return _court
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property EnrollStartDate As Date
|
||||
Get
|
||||
Return _enroll_start
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property EnrollEndDate As Date
|
||||
Get
|
||||
Return _enroll_end
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property WeighInDate As Date
|
||||
Get
|
||||
Return _weigh_in
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property EventStartDate As Date
|
||||
Get
|
||||
Return _event_start
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property EventEndDate As Date
|
||||
Get
|
||||
Return _event_end
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Rules As String
|
||||
Get
|
||||
Return _rules
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Currency As String
|
||||
Get
|
||||
Return _currency
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Fee As Integer
|
||||
Get
|
||||
Return _fee
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Logo As MemoryStream
|
||||
Get
|
||||
Return _logo
|
||||
End Get
|
||||
End Property
|
||||
|
||||
' Set Of Functions
|
||||
|
||||
Public Function EventList()
|
||||
|
||||
Dim QRY As String = "select * from event order by event_start asc"
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of platformevent)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New platformevent(RDR("id")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return LST
|
||||
|
||||
End Function
|
||||
|
||||
Private Sub GetEventData(id As Integer)
|
||||
|
||||
Dim QRY As String = ("select event.* from event where event.id = " & id & " LIMIT 1")
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
|
||||
Try
|
||||
_id = Int(RDR("id"))
|
||||
Catch ex As Exception
|
||||
_id = 0
|
||||
End Try
|
||||
|
||||
Try
|
||||
_title = RDR("title")
|
||||
Catch ex As Exception
|
||||
_title = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_organizer = RDR("organizor")
|
||||
Catch ex As Exception
|
||||
_organizer = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_type = RDR("type")
|
||||
Catch ex As Exception
|
||||
_type = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_country = New country(Int(RDR("country")))
|
||||
Catch ex As Exception
|
||||
_country = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_address = RDR("address")
|
||||
Catch ex As Exception
|
||||
_address = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_location = RDR("location")
|
||||
Catch ex As Exception
|
||||
_location = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_court = RDR("courts")
|
||||
Catch ex As Exception
|
||||
_court = 0
|
||||
End Try
|
||||
|
||||
Try
|
||||
_enroll_start = CDate(RDR("enroll_start"))
|
||||
Catch ex As Exception
|
||||
_enroll_start = Now
|
||||
End Try
|
||||
|
||||
Try
|
||||
_enroll_end = CDate(RDR("enroll_end"))
|
||||
Catch ex As Exception
|
||||
_enroll_end = Now
|
||||
End Try
|
||||
|
||||
Try
|
||||
_weigh_in = CDate(RDR("weigh_in"))
|
||||
Catch ex As Exception
|
||||
'_weigh_in = Now
|
||||
End Try
|
||||
|
||||
Try
|
||||
_event_start = CDate(RDR("event_start"))
|
||||
Catch ex As Exception
|
||||
'_event_start = Now
|
||||
End Try
|
||||
|
||||
Try
|
||||
_event_end = CDate(RDR("event_end"))
|
||||
Catch ex As Exception
|
||||
'_event_end = Now
|
||||
End Try
|
||||
|
||||
Try
|
||||
_rules = RDR("rules")
|
||||
Catch ex As Exception
|
||||
_rules = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_currency = RDR("currency ")
|
||||
Catch ex As Exception
|
||||
_currency = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_fee = RDR("participation_fee")
|
||||
Catch ex As Exception
|
||||
_fee = 0
|
||||
End Try
|
||||
|
||||
Try ' Event Logo -----------------------------------------
|
||||
Dim data As Byte() = DirectCast(RDR("logo"), Byte())
|
||||
_logo = New MemoryStream(data)
|
||||
Catch ex As Exception
|
||||
_logo = Nothing
|
||||
End Try
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
' Set Of Routines
|
||||
|
||||
Public Sub CreateNewEvent(EventTitle As String, Type As String, Rounds As Integer, Organizer As String, Country As Integer, Address As String, Location As String, Courts As Integer, Rules As String, Currency As String, Fee As Integer, EnrollStart As String, EnrollEnd As String, WeighIn As String, EventStart As String, EventEnd As String, Logo As PictureBox)
|
||||
|
||||
' Query To Update
|
||||
Dim QRY As String = ("
|
||||
|
||||
/* This Is To Insert The Information Of The New Event */
|
||||
insert into
|
||||
event (title, type, rounds, organizor, country, address, location, courts, rules, currency, fee, enroll_start, enroll_end, weigh_in, event_start, event_end, logo)
|
||||
values ('" & EventTitle & "', '" & Type & "', '" & Rounds & "', '" & Organizer & "', " & Country & ", '" & Address & "', '" & Location & "', " & Courts & ", '" & Rules & "', '" & Currency & "', " & Fee & ", '" & EnrollStart & "', '" & EnrollEnd & "', '" & WeighIn & "', '" & EventStart & "', '" & EventEnd & "', @logo);
|
||||
|
||||
/* This Is To Return The Newly Created Event Record */
|
||||
select last_insert_id() as 'eid';
|
||||
|
||||
")
|
||||
|
||||
' Connection
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
Dim Picture As New MemoryStream
|
||||
Logo.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
Picture.Close()
|
||||
|
||||
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.Parameters.AddWithValue("@logo", arrImage)
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
|
||||
While RDR.Read
|
||||
|
||||
Try ' ID
|
||||
_id = RDR("eid")
|
||||
Catch ex As Exception
|
||||
_id = 0
|
||||
End Try
|
||||
|
||||
End While
|
||||
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub UpdateLogo(Logo As PictureBox)
|
||||
|
||||
' Query To Update
|
||||
Dim QRY As String = "update event set logo = @logo where id=" & _id
|
||||
|
||||
' Connection
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
' Preparing The Image
|
||||
Dim Picture As New MemoryStream
|
||||
Logo.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
Picture.Close()
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.Parameters.AddWithValue("@logo", arrImage)
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
368
Visual Studio Code/Timer Library/forms/event/frm_add_participants.Designer.vb
generated
Normal file
@ -0,0 +1,368 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_add_participants
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.lst_person = New System.Windows.Forms.ListBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.cbo_participants_type = New System.Windows.Forms.ComboBox()
|
||||
Me.btn_remove = New System.Windows.Forms.Button()
|
||||
Me.btn_add = New System.Windows.Forms.Button()
|
||||
Me.lst_participants_list = New System.Windows.Forms.ListBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.txt_member_search = New System.Windows.Forms.TextBox()
|
||||
Me.txt_pfilter = New System.Windows.Forms.TextBox()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.pb_club_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_person_picture = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_category = New System.Windows.Forms.Label()
|
||||
Me.lbl_weightclass = New System.Windows.Forms.Label()
|
||||
Me.lbl_weight = New System.Windows.Forms.Label()
|
||||
Me.lbl_gender = New System.Windows.Forms.Label()
|
||||
Me.btn_update = New System.Windows.Forms.Button()
|
||||
Me.btn_weighin = New System.Windows.Forms.Button()
|
||||
Me.btn_new = New System.Windows.Forms.Button()
|
||||
CType(Me.pb_club_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_person_picture, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lst_person
|
||||
'
|
||||
Me.lst_person.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lst_person.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lst_person.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lst_person.ForeColor = System.Drawing.Color.White
|
||||
Me.lst_person.FormattingEnabled = True
|
||||
Me.lst_person.ItemHeight = 20
|
||||
Me.lst_person.Location = New System.Drawing.Point(10, 85)
|
||||
Me.lst_person.Name = "lst_person"
|
||||
Me.lst_person.Size = New System.Drawing.Size(290, 322)
|
||||
Me.lst_person.TabIndex = 88
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label1.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.ForeColor = System.Drawing.Color.White
|
||||
Me.Label1.Location = New System.Drawing.Point(305, 50)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(70, 30)
|
||||
Me.Label1.TabIndex = 87
|
||||
Me.Label1.Text = "Type :"
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'cbo_participants_type
|
||||
'
|
||||
Me.cbo_participants_type.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cbo_participants_type.FormattingEnabled = True
|
||||
Me.cbo_participants_type.Items.AddRange(New Object() {"Fighter", "Referee", "Admin", "Medic", "Coach", "Organizor"})
|
||||
Me.cbo_participants_type.Location = New System.Drawing.Point(380, 50)
|
||||
Me.cbo_participants_type.Name = "cbo_participants_type"
|
||||
Me.cbo_participants_type.Size = New System.Drawing.Size(180, 28)
|
||||
Me.cbo_participants_type.TabIndex = 86
|
||||
'
|
||||
'btn_remove
|
||||
'
|
||||
Me.btn_remove.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_remove.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_remove.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_remove.Location = New System.Drawing.Point(260, 420)
|
||||
Me.btn_remove.Name = "btn_remove"
|
||||
Me.btn_remove.Size = New System.Drawing.Size(115, 45)
|
||||
Me.btn_remove.TabIndex = 102
|
||||
Me.btn_remove.Text = "REMOVE"
|
||||
Me.btn_remove.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_add
|
||||
'
|
||||
Me.btn_add.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_add.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_add.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_add.Location = New System.Drawing.Point(135, 420)
|
||||
Me.btn_add.Name = "btn_add"
|
||||
Me.btn_add.Size = New System.Drawing.Size(115, 45)
|
||||
Me.btn_add.TabIndex = 101
|
||||
Me.btn_add.Text = "ADD"
|
||||
Me.btn_add.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lst_participants_list
|
||||
'
|
||||
Me.lst_participants_list.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lst_participants_list.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lst_participants_list.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lst_participants_list.ForeColor = System.Drawing.Color.White
|
||||
Me.lst_participants_list.FormattingEnabled = True
|
||||
Me.lst_participants_list.ItemHeight = 20
|
||||
Me.lst_participants_list.Location = New System.Drawing.Point(305, 85)
|
||||
Me.lst_participants_list.Name = "lst_participants_list"
|
||||
Me.lst_participants_list.Size = New System.Drawing.Size(335, 322)
|
||||
Me.lst_participants_list.TabIndex = 103
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label2.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.ForeColor = System.Drawing.Color.White
|
||||
Me.Label2.Location = New System.Drawing.Point(10, 50)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(90, 30)
|
||||
Me.Label2.TabIndex = 104
|
||||
Me.Label2.Text = "Search :"
|
||||
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_member_search
|
||||
'
|
||||
Me.txt_member_search.BackColor = System.Drawing.Color.White
|
||||
Me.txt_member_search.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.txt_member_search.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txt_member_search.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_member_search.Location = New System.Drawing.Point(105, 50)
|
||||
Me.txt_member_search.Name = "txt_member_search"
|
||||
Me.txt_member_search.Size = New System.Drawing.Size(195, 29)
|
||||
Me.txt_member_search.TabIndex = 105
|
||||
'
|
||||
'txt_pfilter
|
||||
'
|
||||
Me.txt_pfilter.BackColor = System.Drawing.Color.White
|
||||
Me.txt_pfilter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.txt_pfilter.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txt_pfilter.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_pfilter.Location = New System.Drawing.Point(650, 50)
|
||||
Me.txt_pfilter.Name = "txt_pfilter"
|
||||
Me.txt_pfilter.Size = New System.Drawing.Size(175, 29)
|
||||
Me.txt_pfilter.TabIndex = 107
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label3.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.ForeColor = System.Drawing.Color.White
|
||||
Me.Label3.Location = New System.Drawing.Point(565, 50)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(80, 30)
|
||||
Me.Label3.TabIndex = 106
|
||||
Me.Label3.Text = "Filter :"
|
||||
Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.BackColor = System.Drawing.Color.Olive
|
||||
Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label10.ForeColor = System.Drawing.Color.White
|
||||
Me.Label10.Location = New System.Drawing.Point(10, 10)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(290, 35)
|
||||
Me.Label10.TabIndex = 108
|
||||
Me.Label10.Text = "< TAKEONE MEMBERS >"
|
||||
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.BackColor = System.Drawing.Color.Green
|
||||
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.ForeColor = System.Drawing.Color.White
|
||||
Me.Label4.Location = New System.Drawing.Point(305, 10)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(520, 35)
|
||||
Me.Label4.TabIndex = 109
|
||||
Me.Label4.Text = "< EVENT PARTICIPANS LIST >"
|
||||
Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'pb_club_logo
|
||||
'
|
||||
Me.pb_club_logo.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_club_logo.Location = New System.Drawing.Point(650, 285)
|
||||
Me.pb_club_logo.Name = "pb_club_logo"
|
||||
Me.pb_club_logo.Size = New System.Drawing.Size(75, 75)
|
||||
Me.pb_club_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_club_logo.TabIndex = 112
|
||||
Me.pb_club_logo.TabStop = False
|
||||
'
|
||||
'pb_flag
|
||||
'
|
||||
Me.pb_flag.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.pb_flag.Location = New System.Drawing.Point(730, 290)
|
||||
Me.pb_flag.Name = "pb_flag"
|
||||
Me.pb_flag.Size = New System.Drawing.Size(95, 65)
|
||||
Me.pb_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_flag.TabIndex = 111
|
||||
Me.pb_flag.TabStop = False
|
||||
'
|
||||
'pb_person_picture
|
||||
'
|
||||
Me.pb_person_picture.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_person_picture.Image = Global.TAKEONE_EMASS.My.Resources.Resources._8i6oer5KT
|
||||
Me.pb_person_picture.Location = New System.Drawing.Point(650, 85)
|
||||
Me.pb_person_picture.Name = "pb_person_picture"
|
||||
Me.pb_person_picture.Size = New System.Drawing.Size(175, 195)
|
||||
Me.pb_person_picture.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_person_picture.TabIndex = 110
|
||||
Me.pb_person_picture.TabStop = False
|
||||
'
|
||||
'lbl_category
|
||||
'
|
||||
Me.lbl_category.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_category.Font = New System.Drawing.Font("Arial Rounded MT Bold", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_category.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_category.Location = New System.Drawing.Point(650, 400)
|
||||
Me.lbl_category.Name = "lbl_category"
|
||||
Me.lbl_category.Size = New System.Drawing.Size(175, 30)
|
||||
Me.lbl_category.TabIndex = 113
|
||||
Me.lbl_category.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_weightclass
|
||||
'
|
||||
Me.lbl_weightclass.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_weightclass.Font = New System.Drawing.Font("Arial Rounded MT Bold", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_weightclass.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_weightclass.Location = New System.Drawing.Point(650, 435)
|
||||
Me.lbl_weightclass.Name = "lbl_weightclass"
|
||||
Me.lbl_weightclass.Size = New System.Drawing.Size(175, 30)
|
||||
Me.lbl_weightclass.TabIndex = 114
|
||||
Me.lbl_weightclass.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_weight
|
||||
'
|
||||
Me.lbl_weight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_weight.Font = New System.Drawing.Font("Arial Rounded MT Bold", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_weight.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_weight.Location = New System.Drawing.Point(740, 365)
|
||||
Me.lbl_weight.Name = "lbl_weight"
|
||||
Me.lbl_weight.Size = New System.Drawing.Size(85, 30)
|
||||
Me.lbl_weight.TabIndex = 115
|
||||
Me.lbl_weight.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_gender
|
||||
'
|
||||
Me.lbl_gender.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_gender.Font = New System.Drawing.Font("Arial Rounded MT Bold", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_gender.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_gender.Location = New System.Drawing.Point(650, 365)
|
||||
Me.lbl_gender.Name = "lbl_gender"
|
||||
Me.lbl_gender.Size = New System.Drawing.Size(85, 30)
|
||||
Me.lbl_gender.TabIndex = 116
|
||||
Me.lbl_gender.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_update
|
||||
'
|
||||
Me.btn_update.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_update.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_update.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_update.Location = New System.Drawing.Point(385, 420)
|
||||
Me.btn_update.Name = "btn_update"
|
||||
Me.btn_update.Size = New System.Drawing.Size(110, 45)
|
||||
Me.btn_update.TabIndex = 117
|
||||
Me.btn_update.Text = "UPDATE"
|
||||
Me.btn_update.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_weighin
|
||||
'
|
||||
Me.btn_weighin.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_weighin.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_weighin.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_weighin.Location = New System.Drawing.Point(505, 420)
|
||||
Me.btn_weighin.Name = "btn_weighin"
|
||||
Me.btn_weighin.Size = New System.Drawing.Size(135, 45)
|
||||
Me.btn_weighin.TabIndex = 118
|
||||
Me.btn_weighin.Text = "WEIGH IN"
|
||||
Me.btn_weighin.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_new
|
||||
'
|
||||
Me.btn_new.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_new.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_new.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_new.Location = New System.Drawing.Point(10, 420)
|
||||
Me.btn_new.Name = "btn_new"
|
||||
Me.btn_new.Size = New System.Drawing.Size(115, 45)
|
||||
Me.btn_new.TabIndex = 119
|
||||
Me.btn_new.Text = "NEW"
|
||||
Me.btn_new.UseVisualStyleBackColor = True
|
||||
'
|
||||
'frm_add_participants
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(9.0!, 19.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(834, 481)
|
||||
Me.Controls.Add(Me.btn_new)
|
||||
Me.Controls.Add(Me.btn_weighin)
|
||||
Me.Controls.Add(Me.btn_update)
|
||||
Me.Controls.Add(Me.lbl_gender)
|
||||
Me.Controls.Add(Me.lbl_weight)
|
||||
Me.Controls.Add(Me.lbl_weightclass)
|
||||
Me.Controls.Add(Me.lbl_category)
|
||||
Me.Controls.Add(Me.pb_club_logo)
|
||||
Me.Controls.Add(Me.pb_flag)
|
||||
Me.Controls.Add(Me.pb_person_picture)
|
||||
Me.Controls.Add(Me.Label4)
|
||||
Me.Controls.Add(Me.Label10)
|
||||
Me.Controls.Add(Me.txt_pfilter)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.txt_member_search)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
Me.Controls.Add(Me.lst_participants_list)
|
||||
Me.Controls.Add(Me.btn_remove)
|
||||
Me.Controls.Add(Me.btn_add)
|
||||
Me.Controls.Add(Me.lst_person)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.cbo_participants_type)
|
||||
Me.Font = New System.Drawing.Font("Tahoma", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
|
||||
Me.Margin = New System.Windows.Forms.Padding(4)
|
||||
Me.Name = "frm_add_participants"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Add Participants"
|
||||
CType(Me.pb_club_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_person_picture, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents lst_person As ListBox
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents cbo_participants_type As ComboBox
|
||||
Friend WithEvents btn_remove As Button
|
||||
Friend WithEvents btn_add As Button
|
||||
Friend WithEvents lst_participants_list As ListBox
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents txt_member_search As TextBox
|
||||
Friend WithEvents txt_pfilter As TextBox
|
||||
Friend WithEvents Label3 As Label
|
||||
Friend WithEvents Label4 As Label
|
||||
Friend WithEvents Label10 As Label
|
||||
Friend WithEvents pb_club_logo As PictureBox
|
||||
Friend WithEvents pb_flag As PictureBox
|
||||
Friend WithEvents pb_person_picture As PictureBox
|
||||
Friend WithEvents lbl_category As Label
|
||||
Friend WithEvents lbl_weightclass As Label
|
||||
Friend WithEvents lbl_weight As Label
|
||||
Friend WithEvents lbl_gender As Label
|
||||
Friend WithEvents btn_update As Button
|
||||
Friend WithEvents btn_weighin As Button
|
||||
Friend WithEvents btn_new As Button
|
||||
End Class
|
||||
@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@ -0,0 +1,234 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
Imports System.ComponentModel
|
||||
|
||||
Public Class frm_add_participants
|
||||
Private Sub frm_add_participants_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
|
||||
|
||||
frm_event_control.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_add_participants_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
|
||||
cbo_participants_type.SelectedIndex = 0
|
||||
|
||||
Try
|
||||
SubPopulateListBox(GetPersonList(), lst_person)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_participants_type_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_participants_type.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
SubPopulateListBox(FunListParticipants(cbo_participants_type.Text, SelectedEvent.ID, txt_pfilter.Text), lst_participants_list)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub txt_pfilter_KeyDown(sender As Object, e As KeyEventArgs) Handles txt_pfilter.KeyDown
|
||||
|
||||
Try
|
||||
SubPopulateListBox(FunListParticipants(cbo_participants_type.Text, SelectedEvent.ID, txt_pfilter.Text), lst_participants_list)
|
||||
Catch ex As Exception
|
||||
ClearListBox(lst_participants_list)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub txt_member_search_KeyDown(sender As Object, e As KeyEventArgs) Handles txt_member_search.KeyDown
|
||||
|
||||
Try
|
||||
SubPopulateListBox(FunListPerson(txt_member_search.Text), lst_person)
|
||||
Catch ex As Exception
|
||||
ClearListBox(lst_person)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub lst_participants_list_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lst_participants_list.SelectedIndexChanged
|
||||
|
||||
Dim person As person
|
||||
|
||||
Try
|
||||
person = New person(lst_participants_list.SelectedValue)
|
||||
Catch ex As Exception
|
||||
person = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
DisplayPerson(person)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
'----------------------------------------------------------------------------------
|
||||
' SPECIAL FUNCTIONS
|
||||
'----------------------------------------------------------------------------------
|
||||
|
||||
Private Sub ClearComboBox(ComboBox As ComboBox)
|
||||
|
||||
Try
|
||||
ComboBox.DataSource = Nothing
|
||||
ComboBox.Items.Clear()
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ClearListBox(ListBox As ListBox)
|
||||
|
||||
Try
|
||||
ListBox.DataSource = Nothing
|
||||
ListBox.Items.Clear()
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub DisplayPerson(Person As person)
|
||||
|
||||
Try
|
||||
pb_person_picture.Image = Image.FromStream(Person.Picture)
|
||||
Catch ex As Exception
|
||||
pb_person_picture.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_club_logo.Image = Image.FromStream(Person.Team.Logo)
|
||||
Catch ex As Exception
|
||||
pb_club_logo.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_flag.Image = Image.FromStream(Person.Team.Country.Flag)
|
||||
Catch ex As Exception
|
||||
pb_flag.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_gender.Text = Person.Gender
|
||||
Catch ex As Exception
|
||||
lbl_gender.Text = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_category.Text = Person.Weight.WeightCategory
|
||||
Catch ex As Exception
|
||||
lbl_category.Text = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_weight.Text = Person.Weight.Weight & "Kg"
|
||||
Catch ex As Exception
|
||||
lbl_weight.Text = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_weightclass.Text = Person.Weight.WeightClass
|
||||
Catch ex As Exception
|
||||
lbl_weightclass.Text = Nothing
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Function FunListParticipants(Type As String, eventID As Integer, Filter As String) As List(Of dataset)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
select
|
||||
distinct
|
||||
person.id, concat(person.fname, if(isnull(person.mname), '', concat(' ', person.mname)), ' ', person.lname) as name
|
||||
from
|
||||
event_participants
|
||||
left join
|
||||
person on person.id = event_participants.pid
|
||||
where
|
||||
concat(fname, if(isnull(mname), '', concat(' ', mname)), ' ', lname) like '%" & Filter & "%'
|
||||
and
|
||||
event_participants.eid = " & eventID & "
|
||||
and
|
||||
event_participants.type = '" & Type & "'
|
||||
order by
|
||||
fname,
|
||||
mname,
|
||||
lname
|
||||
asc
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("id"), RDR("name")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return LST
|
||||
|
||||
End Function
|
||||
|
||||
Private Function FunListPerson(Filter As String) As List(Of dataset)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
select
|
||||
distinct
|
||||
person.id, concat(person.fname, if(isnull(person.mname), '', concat(' ', person.mname)), ' ', person.lname) as name
|
||||
from
|
||||
person
|
||||
where
|
||||
concat(fname, if(isnull(mname), '', concat(' ', mname)), ' ', lname) like '%" & Filter & "%'
|
||||
order by
|
||||
fname,
|
||||
mname,
|
||||
lname
|
||||
asc
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("id"), RDR("name")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return LST
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
476
Visual Studio Code/Timer Library/forms/event/frm_arrange_matches.Designer.vb
generated
Normal file
@ -0,0 +1,476 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_arrange_matches
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.lbl_total_matches = New System.Windows.Forms.Label()
|
||||
Me.btn_set = New System.Windows.Forms.Button()
|
||||
Me.pb_blue_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.lst_match_numbers = New System.Windows.Forms.ListBox()
|
||||
Me.pb_blue_fighter = New System.Windows.Forms.PictureBox()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.lst_blue_fighter = New System.Windows.Forms.ListBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.lst_red_fighter = New System.Windows.Forms.ListBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.pb_red_fighter = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_red_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.lst_matches_set = New System.Windows.Forms.ListBox()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.btn_unset = New System.Windows.Forms.Button()
|
||||
Me.btn_close = New System.Windows.Forms.Button()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.lbl_set_matches = New System.Windows.Forms.Label()
|
||||
Me.pb_blue_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_red_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.cbo_category = New System.Windows.Forms.ComboBox()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.cbo_gender = New System.Windows.Forms.ComboBox()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_blue_fighter, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_fighter, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label3.Font = New System.Drawing.Font("Arial Rounded MT Bold", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label3.Location = New System.Drawing.Point(700, 225)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(60, 15)
|
||||
Me.Label3.TabIndex = 84
|
||||
Me.Label3.Text = "Total"
|
||||
Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_total_matches
|
||||
'
|
||||
Me.lbl_total_matches.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_total_matches.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_total_matches.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_total_matches.Location = New System.Drawing.Point(695, 230)
|
||||
Me.lbl_total_matches.Name = "lbl_total_matches"
|
||||
Me.lbl_total_matches.Size = New System.Drawing.Size(130, 35)
|
||||
Me.lbl_total_matches.TabIndex = 83
|
||||
Me.lbl_total_matches.Text = "0"
|
||||
Me.lbl_total_matches.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'btn_set
|
||||
'
|
||||
Me.btn_set.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_set.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_set.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_set.Location = New System.Drawing.Point(695, 330)
|
||||
Me.btn_set.Name = "btn_set"
|
||||
Me.btn_set.Size = New System.Drawing.Size(130, 40)
|
||||
Me.btn_set.TabIndex = 80
|
||||
Me.btn_set.Text = "SET"
|
||||
Me.btn_set.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pb_blue_logo
|
||||
'
|
||||
Me.pb_blue_logo.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_blue_logo.Location = New System.Drawing.Point(150, 75)
|
||||
Me.pb_blue_logo.Name = "pb_blue_logo"
|
||||
Me.pb_blue_logo.Size = New System.Drawing.Size(60, 60)
|
||||
Me.pb_blue_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_logo.TabIndex = 91
|
||||
Me.pb_blue_logo.TabStop = False
|
||||
'
|
||||
'lst_match_numbers
|
||||
'
|
||||
Me.lst_match_numbers.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lst_match_numbers.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lst_match_numbers.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lst_match_numbers.ForeColor = System.Drawing.Color.White
|
||||
Me.lst_match_numbers.FormattingEnabled = True
|
||||
Me.lst_match_numbers.ItemHeight = 15
|
||||
Me.lst_match_numbers.Location = New System.Drawing.Point(280, 260)
|
||||
Me.lst_match_numbers.Name = "lst_match_numbers"
|
||||
Me.lst_match_numbers.Size = New System.Drawing.Size(130, 212)
|
||||
Me.lst_match_numbers.TabIndex = 86
|
||||
'
|
||||
'pb_blue_fighter
|
||||
'
|
||||
Me.pb_blue_fighter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_blue_fighter.Location = New System.Drawing.Point(5, 45)
|
||||
Me.pb_blue_fighter.Name = "pb_blue_fighter"
|
||||
Me.pb_blue_fighter.Size = New System.Drawing.Size(140, 170)
|
||||
Me.pb_blue_fighter.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_fighter.TabIndex = 85
|
||||
Me.pb_blue_fighter.TabStop = False
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.BackColor = System.Drawing.Color.Black
|
||||
Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label10.Location = New System.Drawing.Point(280, 225)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(130, 30)
|
||||
Me.Label10.TabIndex = 89
|
||||
Me.Label10.Text = "< UNSET >"
|
||||
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lst_blue_fighter
|
||||
'
|
||||
Me.lst_blue_fighter.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lst_blue_fighter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lst_blue_fighter.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lst_blue_fighter.ForeColor = System.Drawing.Color.White
|
||||
Me.lst_blue_fighter.FormattingEnabled = True
|
||||
Me.lst_blue_fighter.ItemHeight = 20
|
||||
Me.lst_blue_fighter.Location = New System.Drawing.Point(5, 250)
|
||||
Me.lst_blue_fighter.Name = "lst_blue_fighter"
|
||||
Me.lst_blue_fighter.Size = New System.Drawing.Size(270, 222)
|
||||
Me.lst_blue_fighter.TabIndex = 92
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.BackColor = System.Drawing.Color.Blue
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Location = New System.Drawing.Point(5, 225)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(270, 25)
|
||||
Me.Label1.TabIndex = 93
|
||||
Me.Label1.Text = "< BLUE FIGHTER >"
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lst_red_fighter
|
||||
'
|
||||
Me.lst_red_fighter.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lst_red_fighter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lst_red_fighter.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lst_red_fighter.ForeColor = System.Drawing.Color.White
|
||||
Me.lst_red_fighter.FormattingEnabled = True
|
||||
Me.lst_red_fighter.ItemHeight = 20
|
||||
Me.lst_red_fighter.Location = New System.Drawing.Point(415, 250)
|
||||
Me.lst_red_fighter.Name = "lst_red_fighter"
|
||||
Me.lst_red_fighter.Size = New System.Drawing.Size(270, 222)
|
||||
Me.lst_red_fighter.TabIndex = 94
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.BackColor = System.Drawing.Color.Red
|
||||
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Location = New System.Drawing.Point(415, 225)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(270, 25)
|
||||
Me.Label2.TabIndex = 95
|
||||
Me.Label2.Text = "< RED FIGHTER >"
|
||||
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'pb_red_fighter
|
||||
'
|
||||
Me.pb_red_fighter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_red_fighter.Location = New System.Drawing.Point(690, 45)
|
||||
Me.pb_red_fighter.Name = "pb_red_fighter"
|
||||
Me.pb_red_fighter.Size = New System.Drawing.Size(140, 170)
|
||||
Me.pb_red_fighter.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_fighter.TabIndex = 96
|
||||
Me.pb_red_fighter.TabStop = False
|
||||
'
|
||||
'pb_red_logo
|
||||
'
|
||||
Me.pb_red_logo.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_red_logo.Location = New System.Drawing.Point(625, 75)
|
||||
Me.pb_red_logo.Name = "pb_red_logo"
|
||||
Me.pb_red_logo.Size = New System.Drawing.Size(60, 60)
|
||||
Me.pb_red_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_logo.TabIndex = 97
|
||||
Me.pb_red_logo.TabStop = False
|
||||
'
|
||||
'lst_matches_set
|
||||
'
|
||||
Me.lst_matches_set.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lst_matches_set.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lst_matches_set.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lst_matches_set.ForeColor = System.Drawing.Color.White
|
||||
Me.lst_matches_set.FormattingEnabled = True
|
||||
Me.lst_matches_set.ItemHeight = 15
|
||||
Me.lst_matches_set.Location = New System.Drawing.Point(215, 80)
|
||||
Me.lst_matches_set.Name = "lst_matches_set"
|
||||
Me.lst_matches_set.Size = New System.Drawing.Size(405, 137)
|
||||
Me.lst_matches_set.TabIndex = 98
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.BackColor = System.Drawing.Color.Black
|
||||
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.Location = New System.Drawing.Point(215, 45)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(405, 30)
|
||||
Me.Label4.TabIndex = 99
|
||||
Me.Label4.Text = "< MATCHES ALREADY SET >"
|
||||
Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_unset
|
||||
'
|
||||
Me.btn_unset.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_unset.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_unset.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_unset.Location = New System.Drawing.Point(695, 380)
|
||||
Me.btn_unset.Name = "btn_unset"
|
||||
Me.btn_unset.Size = New System.Drawing.Size(130, 40)
|
||||
Me.btn_unset.TabIndex = 100
|
||||
Me.btn_unset.Text = "UNSET"
|
||||
Me.btn_unset.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_close
|
||||
'
|
||||
Me.btn_close.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_close.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_close.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_close.Location = New System.Drawing.Point(695, 430)
|
||||
Me.btn_close.Name = "btn_close"
|
||||
Me.btn_close.Size = New System.Drawing.Size(130, 40)
|
||||
Me.btn_close.TabIndex = 101
|
||||
Me.btn_close.Text = "CLOSE"
|
||||
Me.btn_close.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label5.Font = New System.Drawing.Font("Arial Rounded MT Bold", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label5.Location = New System.Drawing.Point(700, 275)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(60, 15)
|
||||
Me.Label5.TabIndex = 103
|
||||
Me.Label5.Text = "Set"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_set_matches
|
||||
'
|
||||
Me.lbl_set_matches.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_set_matches.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_set_matches.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_set_matches.Location = New System.Drawing.Point(695, 280)
|
||||
Me.lbl_set_matches.Name = "lbl_set_matches"
|
||||
Me.lbl_set_matches.Size = New System.Drawing.Size(130, 35)
|
||||
Me.lbl_set_matches.TabIndex = 102
|
||||
Me.lbl_set_matches.Text = "0"
|
||||
Me.lbl_set_matches.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'pb_blue_flag
|
||||
'
|
||||
Me.pb_blue_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_blue_flag.Location = New System.Drawing.Point(150, 175)
|
||||
Me.pb_blue_flag.Name = "pb_blue_flag"
|
||||
Me.pb_blue_flag.Size = New System.Drawing.Size(60, 40)
|
||||
Me.pb_blue_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_flag.TabIndex = 106
|
||||
Me.pb_blue_flag.TabStop = False
|
||||
'
|
||||
'pb_red_flag
|
||||
'
|
||||
Me.pb_red_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_red_flag.Location = New System.Drawing.Point(625, 175)
|
||||
Me.pb_red_flag.Name = "pb_red_flag"
|
||||
Me.pb_red_flag.Size = New System.Drawing.Size(60, 40)
|
||||
Me.pb_red_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_flag.TabIndex = 107
|
||||
Me.pb_red_flag.TabStop = False
|
||||
'
|
||||
'cbo_category
|
||||
'
|
||||
Me.cbo_category.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.cbo_category.FormattingEnabled = True
|
||||
Me.cbo_category.Location = New System.Drawing.Point(445, 5)
|
||||
Me.cbo_category.Name = "cbo_category"
|
||||
Me.cbo_category.Size = New System.Drawing.Size(385, 30)
|
||||
Me.cbo_category.TabIndex = 108
|
||||
Me.cbo_category.Text = "Select Weight Profile"
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.BackColor = System.Drawing.Color.Green
|
||||
Me.Label6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label6.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label6.ForeColor = System.Drawing.Color.White
|
||||
Me.Label6.Location = New System.Drawing.Point(280, 5)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(160, 30)
|
||||
Me.Label6.TabIndex = 109
|
||||
Me.Label6.Text = "Weight Profile :"
|
||||
Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.BackColor = System.Drawing.Color.Green
|
||||
Me.Label7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label7.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label7.ForeColor = System.Drawing.Color.White
|
||||
Me.Label7.Location = New System.Drawing.Point(5, 5)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(95, 30)
|
||||
Me.Label7.TabIndex = 111
|
||||
Me.Label7.Text = "Gender :"
|
||||
Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'cbo_gender
|
||||
'
|
||||
Me.cbo_gender.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.cbo_gender.FormattingEnabled = True
|
||||
Me.cbo_gender.Items.AddRange(New Object() {"MALE", "FEMALE"})
|
||||
Me.cbo_gender.Location = New System.Drawing.Point(105, 5)
|
||||
Me.cbo_gender.Name = "cbo_gender"
|
||||
Me.cbo_gender.Size = New System.Drawing.Size(170, 30)
|
||||
Me.cbo_gender.TabIndex = 110
|
||||
Me.cbo_gender.Text = "Select Gender"
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.BackColor = System.Drawing.Color.Blue
|
||||
Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label11.Location = New System.Drawing.Point(150, 45)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(60, 25)
|
||||
Me.Label11.TabIndex = 114
|
||||
Me.Label11.Text = "LOGO"
|
||||
Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.BackColor = System.Drawing.Color.Blue
|
||||
Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label12.Location = New System.Drawing.Point(150, 145)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(60, 25)
|
||||
Me.Label12.TabIndex = 115
|
||||
Me.Label12.Text = "FLAG"
|
||||
Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.BackColor = System.Drawing.Color.Red
|
||||
Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label13.Location = New System.Drawing.Point(625, 145)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(60, 25)
|
||||
Me.Label13.TabIndex = 117
|
||||
Me.Label13.Text = "FLAG"
|
||||
Me.Label13.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.BackColor = System.Drawing.Color.Red
|
||||
Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label14.Location = New System.Drawing.Point(625, 45)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(60, 25)
|
||||
Me.Label14.TabIndex = 116
|
||||
Me.Label14.Text = "LOGO"
|
||||
Me.Label14.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'frm_arrange_matches
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(10.0!, 23.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(834, 481)
|
||||
Me.Controls.Add(Me.pb_red_fighter)
|
||||
Me.Controls.Add(Me.pb_blue_fighter)
|
||||
Me.Controls.Add(Me.Label13)
|
||||
Me.Controls.Add(Me.Label14)
|
||||
Me.Controls.Add(Me.Label12)
|
||||
Me.Controls.Add(Me.Label11)
|
||||
Me.Controls.Add(Me.Label7)
|
||||
Me.Controls.Add(Me.cbo_gender)
|
||||
Me.Controls.Add(Me.Label6)
|
||||
Me.Controls.Add(Me.cbo_category)
|
||||
Me.Controls.Add(Me.pb_red_flag)
|
||||
Me.Controls.Add(Me.pb_blue_flag)
|
||||
Me.Controls.Add(Me.Label5)
|
||||
Me.Controls.Add(Me.lbl_set_matches)
|
||||
Me.Controls.Add(Me.btn_close)
|
||||
Me.Controls.Add(Me.btn_unset)
|
||||
Me.Controls.Add(Me.btn_set)
|
||||
Me.Controls.Add(Me.lst_matches_set)
|
||||
Me.Controls.Add(Me.Label4)
|
||||
Me.Controls.Add(Me.pb_red_logo)
|
||||
Me.Controls.Add(Me.lst_red_fighter)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
Me.Controls.Add(Me.lst_blue_fighter)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.pb_blue_logo)
|
||||
Me.Controls.Add(Me.lst_match_numbers)
|
||||
Me.Controls.Add(Me.Label10)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.lbl_total_matches)
|
||||
Me.Font = New System.Drawing.Font("Tahoma", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ForeColor = System.Drawing.Color.White
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
|
||||
Me.Margin = New System.Windows.Forms.Padding(5)
|
||||
Me.Name = "frm_arrange_matches"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Manual Match Set"
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_blue_fighter, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_fighter, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents Label3 As Label
|
||||
Friend WithEvents lbl_total_matches As Label
|
||||
Friend WithEvents btn_set As Button
|
||||
Friend WithEvents pb_blue_logo As PictureBox
|
||||
Friend WithEvents lst_match_numbers As ListBox
|
||||
Friend WithEvents pb_blue_fighter As PictureBox
|
||||
Friend WithEvents Label10 As Label
|
||||
Friend WithEvents lst_blue_fighter As ListBox
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents lst_red_fighter As ListBox
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents pb_red_fighter As PictureBox
|
||||
Friend WithEvents pb_red_logo As PictureBox
|
||||
Friend WithEvents lst_matches_set As ListBox
|
||||
Friend WithEvents Label4 As Label
|
||||
Friend WithEvents btn_unset As Button
|
||||
Friend WithEvents btn_close As Button
|
||||
Friend WithEvents lbl_set_matches As Label
|
||||
Friend WithEvents pb_blue_flag As PictureBox
|
||||
Friend WithEvents pb_red_flag As PictureBox
|
||||
Friend WithEvents Label5 As Label
|
||||
Friend WithEvents cbo_category As ComboBox
|
||||
Friend WithEvents Label6 As Label
|
||||
Friend WithEvents Label7 As Label
|
||||
Friend WithEvents cbo_gender As ComboBox
|
||||
Friend WithEvents Label11 As Label
|
||||
Friend WithEvents Label12 As Label
|
||||
Friend WithEvents Label13 As Label
|
||||
Friend WithEvents Label14 As Label
|
||||
End Class
|
||||
@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@ -0,0 +1,475 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
Imports System.ComponentModel
|
||||
|
||||
Public Class frm_arrange_matches
|
||||
Private Sub btn_close_Click(sender As Object, e As EventArgs)
|
||||
|
||||
Me.Close()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_arrange_matches_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
|
||||
|
||||
frm_event_control.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_close_Click_1(sender As Object, e As EventArgs) Handles btn_close.Click
|
||||
|
||||
Me.Close()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_arrange_matches_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
|
||||
FunGetStats()
|
||||
cbo_gender.SelectedIndex = 0
|
||||
SubPopulateListBox(FunListSetMatches(cbo_category.SelectedValue), lst_matches_set)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub lst_matches_set_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lst_matches_set.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
Load_Match_Data(lst_matches_set.SelectedValue)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
'----------------------------------------------------------------------------------
|
||||
' SPECIAL FUNCTIONS
|
||||
'----------------------------------------------------------------------------------
|
||||
|
||||
Private Sub DisplayBlueFighter(Person As person)
|
||||
|
||||
Try
|
||||
pb_blue_fighter.Image = Image.FromStream(Person.Picture)
|
||||
Catch ex As Exception
|
||||
pb_blue_fighter.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_blue_logo.Image = Image.FromStream(Person.Team.Logo)
|
||||
Catch ex As Exception
|
||||
pb_blue_logo.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_blue_flag.Image = Image.FromStream(Person.Team.Country.Flag)
|
||||
Catch ex As Exception
|
||||
pb_blue_flag.Image = Nothing
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub DisplayRedFighter(Person As person)
|
||||
|
||||
Try
|
||||
pb_red_fighter.Image = Image.FromStream(Person.Picture)
|
||||
Catch ex As Exception
|
||||
pb_red_fighter.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_red_logo.Image = Image.FromStream(Person.Team.Logo)
|
||||
Catch ex As Exception
|
||||
pb_red_logo.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_red_flag.Image = Image.FromStream(Person.Team.Country.Flag)
|
||||
Catch ex As Exception
|
||||
pb_red_flag.Image = Nothing
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Function FunListSetMatches(WeightProfile As Integer) As List(Of dataset)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
SELECT
|
||||
event_matches.id as RecordNumber,
|
||||
event_matches.eid as EventID,
|
||||
event_matches.ern as EventRound,
|
||||
event_matches.emn as MatchNumber,
|
||||
concat(blue.fname, if(isnull(blue.mname), '', concat(' ', blue.mname)), ' ', blue.lname) as BlueFighter,
|
||||
concat(red.fname, if(isnull(red.mname), '', concat(' ', red.mname)), ' ', red.lname) as RedFighter,
|
||||
|
||||
CASE
|
||||
WHEN (isNull(event_matches.blue_fighter) = true OR isNull(event_matches.red_fighter) = true) THEN 'FREE'
|
||||
WHEN (isNull(event_matches.blue_fighter) = false AND isNull(event_matches.red_fighter) = true) THEN 'UNSET'
|
||||
WHEN (event_matches.blue_fighter != 0 AND event_matches.red_fighter != 0) THEN 'SET'
|
||||
ELSE 'ERROR'
|
||||
END as MatchSet,
|
||||
|
||||
CASE
|
||||
WHEN (event_matches.started = 1 AND event_matches.ended = 1) THEN 'FINISHED'
|
||||
WHEN (event_matches.started = 1 AND event_matches.ended = 0) THEN 'ONGOING'
|
||||
WHEN (event_matches.started = 0 AND event_matches.ended = 0) THEN 'UPCOMING'
|
||||
ELSE 'ERROR'
|
||||
END as MatchStatus
|
||||
|
||||
FROM
|
||||
event_matches
|
||||
LEFT JOIN
|
||||
person as blue on blue.id = event_matches.blue_fighter
|
||||
LEFT JOIN
|
||||
person as red on red.id = event_matches.red_fighter
|
||||
WHERE
|
||||
(blue_fighter != 0 OR red_fighter != 0)
|
||||
AND
|
||||
blue.wp = " & WeightProfile & "
|
||||
AND
|
||||
red.wp = " & WeightProfile & "
|
||||
ORDER BY
|
||||
event_matches.ern,
|
||||
event_matches.emn;
|
||||
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("RecordNumber"), "R" & RDR("EventRound") & " M" & RDR("MatchNumber") & " : " & RDR("BlueFighter") & " VS " & RDR("RedFighter")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return LST
|
||||
|
||||
End Function
|
||||
|
||||
Private Function FunListPerson(Filter As String) As List(Of dataset)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
select
|
||||
distinct
|
||||
person.id, concat(person.fname, if(isnull(person.mname), '', concat(' ', person.mname)), ' ', person.lname) as name
|
||||
from
|
||||
person
|
||||
where
|
||||
concat(fname, if(isnull(mname), '', concat(' ', mname)), ' ', lname) like '%" & Filter & "%'
|
||||
order by
|
||||
fname,
|
||||
mname,
|
||||
lname
|
||||
asc
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("id"), RDR("name")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return LST
|
||||
|
||||
End Function
|
||||
|
||||
Private Function FunListParticipants(Type As String, eventID As Integer, Filter As String) As List(Of dataset)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
select
|
||||
distinct
|
||||
person.id, concat(person.fname, if(isnull(person.mname), '', concat(' ', person.mname)), ' ', person.lname) as name
|
||||
from
|
||||
event_participants
|
||||
left join
|
||||
person on person.id = event_participants.pid
|
||||
where
|
||||
concat(fname, if(isnull(mname), '', concat(' ', mname)), ' ', lname) like '%" & Filter & "%'
|
||||
and
|
||||
event_participants.eid = " & eventID & "
|
||||
and
|
||||
event_participants.type = '" & Type & "'
|
||||
order by
|
||||
fname,
|
||||
mname,
|
||||
lname
|
||||
asc
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("id"), RDR("name")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return LST
|
||||
|
||||
End Function
|
||||
|
||||
Private Sub FunGetStats()
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
SELECT
|
||||
(select count(*) From (select * from event_matches where eid = " & SelectedEvent.ID & ") as TOTALMATCHES) as 'TOTAL',
|
||||
(select count(*) From (select * from event_matches where eid = " & SelectedEvent.ID & " and (blue_fighter != 0 AND NOT isNull(blue_fighter)) and (red_fighter != 0 AND NOT isNull(red_fighter))) as SETMATCHES) as 'SET'
|
||||
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
|
||||
Try
|
||||
lbl_total_matches.Text = RDR("TOTAL")
|
||||
Catch ex As Exception
|
||||
lbl_total_matches.Text = 0
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_set_matches.Text = RDR("SET")
|
||||
Catch ex As Exception
|
||||
lbl_set_matches.Text = 0
|
||||
End Try
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Load_Match_Data(MatchID As Integer)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
/*-----------------------------------------------------
|
||||
THIS CODE IS FOR SEARCHING THE MATCH
|
||||
BY MATCH ID NUMBER
|
||||
-----------------------------------------------------*/
|
||||
|
||||
SELECT
|
||||
event_matches.blue_fighter as 'blue',
|
||||
event_matches.red_fighter as 'red'
|
||||
FROM
|
||||
event_matches
|
||||
WHERE
|
||||
(NOT event_matches.blue_fighter = 0 AND NOT isNull(event_matches.blue_fighter))
|
||||
AND
|
||||
(NOT event_matches.red_fighter = 0 AND NOT isNull(event_matches.red_fighter))
|
||||
AND
|
||||
event_matches.id = " & MatchID & "
|
||||
AND
|
||||
event_matches.eid = " & SelectedEvent.ID & "
|
||||
ORDER BY
|
||||
ern,
|
||||
emn
|
||||
asc
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
|
||||
Dim current_blue_fighter As person
|
||||
|
||||
Try
|
||||
|
||||
current_blue_fighter = New person(RDR("blue"))
|
||||
|
||||
Try
|
||||
pb_blue_logo.Image = Image.FromStream(current_blue_fighter.Team.Logo)
|
||||
Catch ex As Exception
|
||||
pb_blue_logo.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_blue_flag.Image = Image.FromStream(current_blue_fighter.Team.Country.Flag)
|
||||
Catch ex As Exception
|
||||
pb_blue_flag.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_blue_fighter.Image = Image.FromStream(current_blue_fighter.Picture)
|
||||
Catch ex As Exception
|
||||
pb_blue_fighter.Image = Nothing
|
||||
End Try
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
current_blue_fighter = Nothing
|
||||
|
||||
End Try
|
||||
|
||||
Dim current_red_fighter As person
|
||||
|
||||
Try
|
||||
|
||||
current_red_fighter = New person(RDR("red"))
|
||||
|
||||
Try
|
||||
pb_red_logo.Image = Image.FromStream(current_red_fighter.Team.Logo)
|
||||
Catch ex As Exception
|
||||
pb_red_logo.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_red_flag.Image = Image.FromStream(current_red_fighter.Team.Country.Flag)
|
||||
Catch ex As Exception
|
||||
pb_red_flag.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_red_fighter.Image = Image.FromStream(current_red_fighter.Picture)
|
||||
Catch ex As Exception
|
||||
pb_red_fighter.Image = Nothing
|
||||
End Try
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
current_red_fighter = Nothing
|
||||
|
||||
End Try
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Function Load_Weight_Profiles(Gender As String) As List(Of dataset)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
/*-----------------------------------------------------
|
||||
THIS CODE IS FOR SEARCHING THE MATCH
|
||||
BY MATCH ID NUMBER
|
||||
-----------------------------------------------------*/
|
||||
|
||||
SELECT
|
||||
distinct
|
||||
weight_divisions.id,
|
||||
weight_divisions.category,
|
||||
weight_divisions.className
|
||||
FROM
|
||||
event_participants
|
||||
LEFT JOIN
|
||||
person ON event_participants.pid = person.id
|
||||
LEFT JOIN
|
||||
weight_divisions ON weight_divisions.id = person.wp
|
||||
WHERE
|
||||
person.gender = '" & Gender & "'
|
||||
ORDER BY
|
||||
weight_divisions.category,
|
||||
weight_divisions.gender,
|
||||
weight_divisions.className
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("id"), (RDR("category") & " : " & RDR("className"))))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return LST
|
||||
|
||||
End Function
|
||||
|
||||
Private Sub cbo_gender_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_gender.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
SubPopulateComboBox(Load_Weight_Profiles(cbo_gender.Text), cbo_category)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_category_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_category.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
SubPopulateListBox(FunListSetMatches(cbo_category.SelectedValue), lst_matches_set)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
553
Visual Studio Code/Timer Library/forms/event/frm_create_event.designer.vb
generated
Normal file
@ -0,0 +1,553 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_create_event
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.lbl_title = New System.Windows.Forms.Label()
|
||||
Me.txt_title = New System.Windows.Forms.TextBox()
|
||||
Me.lbl_organizor = New System.Windows.Forms.Label()
|
||||
Me.txt_organizor = New System.Windows.Forms.TextBox()
|
||||
Me.cbo_type = New System.Windows.Forms.ComboBox()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.Label15 = New System.Windows.Forms.Label()
|
||||
Me.dtp_start_enroll = New System.Windows.Forms.DateTimePicker()
|
||||
Me.txt_location = New System.Windows.Forms.TextBox()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.dtp_end_enroll = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.dtp_start_date = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.dtp_end_date = New System.Windows.Forms.DateTimePicker()
|
||||
Me.dtp_weigh_date = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.txt_rules = New System.Windows.Forms.TextBox()
|
||||
Me.btn_cancel = New System.Windows.Forms.Button()
|
||||
Me.btn_create = New System.Windows.Forms.Button()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.txt_courts = New System.Windows.Forms.TextBox()
|
||||
Me.pb_event_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.txt_rounds = New System.Windows.Forms.TextBox()
|
||||
Me.lbl_round = New System.Windows.Forms.Label()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.cbo_country = New System.Windows.Forms.ComboBox()
|
||||
Me.pb_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_address = New System.Windows.Forms.Label()
|
||||
Me.txt_address = New System.Windows.Forms.TextBox()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.cbo_currency = New System.Windows.Forms.ComboBox()
|
||||
Me.txt_fee = New System.Windows.Forms.TextBox()
|
||||
CType(Me.pb_event_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbl_title
|
||||
'
|
||||
Me.lbl_title.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_title.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.lbl_title.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_title.Location = New System.Drawing.Point(300, 10)
|
||||
Me.lbl_title.Name = "lbl_title"
|
||||
Me.lbl_title.Size = New System.Drawing.Size(175, 30)
|
||||
Me.lbl_title.TabIndex = 34
|
||||
Me.lbl_title.Text = "Title :"
|
||||
Me.lbl_title.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_title
|
||||
'
|
||||
Me.txt_title.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.txt_title.Location = New System.Drawing.Point(480, 10)
|
||||
Me.txt_title.Name = "txt_title"
|
||||
Me.txt_title.Size = New System.Drawing.Size(355, 29)
|
||||
Me.txt_title.TabIndex = 1
|
||||
'
|
||||
'lbl_organizor
|
||||
'
|
||||
Me.lbl_organizor.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_organizor.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.lbl_organizor.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_organizor.Location = New System.Drawing.Point(300, 115)
|
||||
Me.lbl_organizor.Name = "lbl_organizor"
|
||||
Me.lbl_organizor.Size = New System.Drawing.Size(175, 30)
|
||||
Me.lbl_organizor.TabIndex = 69
|
||||
Me.lbl_organizor.Text = "Organizor :"
|
||||
Me.lbl_organizor.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_organizor
|
||||
'
|
||||
Me.txt_organizor.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.txt_organizor.Location = New System.Drawing.Point(480, 115)
|
||||
Me.txt_organizor.Name = "txt_organizor"
|
||||
Me.txt_organizor.Size = New System.Drawing.Size(355, 29)
|
||||
Me.txt_organizor.TabIndex = 2
|
||||
'
|
||||
'cbo_type
|
||||
'
|
||||
Me.cbo_type.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.cbo_type.FormattingEnabled = True
|
||||
Me.cbo_type.Items.AddRange(New Object() {"PLAYOFF", "LEAGUE"})
|
||||
Me.cbo_type.Location = New System.Drawing.Point(480, 45)
|
||||
Me.cbo_type.Name = "cbo_type"
|
||||
Me.cbo_type.Size = New System.Drawing.Size(355, 30)
|
||||
Me.cbo_type.TabIndex = 3
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label14.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label14.ForeColor = System.Drawing.Color.White
|
||||
Me.Label14.Location = New System.Drawing.Point(300, 220)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(175, 30)
|
||||
Me.Label14.TabIndex = 67
|
||||
Me.Label14.Text = "Location :"
|
||||
Me.Label14.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label15
|
||||
'
|
||||
Me.Label15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label15.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label15.ForeColor = System.Drawing.Color.White
|
||||
Me.Label15.Location = New System.Drawing.Point(300, 45)
|
||||
Me.Label15.Name = "Label15"
|
||||
Me.Label15.Size = New System.Drawing.Size(175, 30)
|
||||
Me.Label15.TabIndex = 56
|
||||
Me.Label15.Text = "Type :"
|
||||
Me.Label15.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'dtp_start_enroll
|
||||
'
|
||||
Me.dtp_start_enroll.CustomFormat = "yyyy-MM-dd"
|
||||
Me.dtp_start_enroll.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.dtp_start_enroll.Format = System.Windows.Forms.DateTimePickerFormat.Custom
|
||||
Me.dtp_start_enroll.Location = New System.Drawing.Point(480, 380)
|
||||
Me.dtp_start_enroll.Name = "dtp_start_enroll"
|
||||
Me.dtp_start_enroll.Size = New System.Drawing.Size(140, 29)
|
||||
Me.dtp_start_enroll.TabIndex = 6
|
||||
'
|
||||
'txt_location
|
||||
'
|
||||
Me.txt_location.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.txt_location.Location = New System.Drawing.Point(480, 220)
|
||||
Me.txt_location.Name = "txt_location"
|
||||
Me.txt_location.Size = New System.Drawing.Size(355, 29)
|
||||
Me.txt_location.TabIndex = 4
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label12.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label12.ForeColor = System.Drawing.Color.White
|
||||
Me.Label12.Location = New System.Drawing.Point(300, 380)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(175, 30)
|
||||
Me.Label12.TabIndex = 62
|
||||
Me.Label12.Text = "Enrollment :"
|
||||
Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'dtp_end_enroll
|
||||
'
|
||||
Me.dtp_end_enroll.CustomFormat = "yyyy-MM-dd"
|
||||
Me.dtp_end_enroll.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.dtp_end_enroll.Format = System.Windows.Forms.DateTimePickerFormat.Custom
|
||||
Me.dtp_end_enroll.Location = New System.Drawing.Point(695, 380)
|
||||
Me.dtp_end_enroll.Name = "dtp_end_enroll"
|
||||
Me.dtp_end_enroll.Size = New System.Drawing.Size(140, 29)
|
||||
Me.dtp_end_enroll.TabIndex = 7
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label13.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label13.ForeColor = System.Drawing.Color.White
|
||||
Me.Label13.Location = New System.Drawing.Point(625, 380)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(65, 30)
|
||||
Me.Label13.TabIndex = 64
|
||||
Me.Label13.Text = "till :"
|
||||
Me.Label13.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'dtp_start_date
|
||||
'
|
||||
Me.dtp_start_date.CustomFormat = "yyyy-MM-dd"
|
||||
Me.dtp_start_date.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.dtp_start_date.Format = System.Windows.Forms.DateTimePickerFormat.Custom
|
||||
Me.dtp_start_date.Location = New System.Drawing.Point(480, 450)
|
||||
Me.dtp_start_date.Name = "dtp_start_date"
|
||||
Me.dtp_start_date.Size = New System.Drawing.Size(140, 29)
|
||||
Me.dtp_start_date.TabIndex = 9
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label9.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label9.ForeColor = System.Drawing.Color.White
|
||||
Me.Label9.Location = New System.Drawing.Point(300, 450)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(175, 30)
|
||||
Me.Label9.TabIndex = 56
|
||||
Me.Label9.Text = "Start Date :"
|
||||
Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'dtp_end_date
|
||||
'
|
||||
Me.dtp_end_date.CustomFormat = "yyyy-MM-dd"
|
||||
Me.dtp_end_date.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.dtp_end_date.Format = System.Windows.Forms.DateTimePickerFormat.Custom
|
||||
Me.dtp_end_date.Location = New System.Drawing.Point(695, 450)
|
||||
Me.dtp_end_date.Name = "dtp_end_date"
|
||||
Me.dtp_end_date.Size = New System.Drawing.Size(140, 29)
|
||||
Me.dtp_end_date.TabIndex = 10
|
||||
'
|
||||
'dtp_weigh_date
|
||||
'
|
||||
Me.dtp_weigh_date.CustomFormat = "yyyy-MM-dd"
|
||||
Me.dtp_weigh_date.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.dtp_weigh_date.Format = System.Windows.Forms.DateTimePickerFormat.Custom
|
||||
Me.dtp_weigh_date.Location = New System.Drawing.Point(480, 415)
|
||||
Me.dtp_weigh_date.Name = "dtp_weigh_date"
|
||||
Me.dtp_weigh_date.Size = New System.Drawing.Size(355, 29)
|
||||
Me.dtp_weigh_date.TabIndex = 8
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label8.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label8.ForeColor = System.Drawing.Color.White
|
||||
Me.Label8.Location = New System.Drawing.Point(300, 290)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(175, 50)
|
||||
Me.Label8.TabIndex = 36
|
||||
Me.Label8.Text = "Rules :"
|
||||
Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label11.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label11.ForeColor = System.Drawing.Color.White
|
||||
Me.Label11.Location = New System.Drawing.Point(300, 415)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(175, 30)
|
||||
Me.Label11.TabIndex = 60
|
||||
Me.Label11.Text = "Weigh In :"
|
||||
Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_rules
|
||||
'
|
||||
Me.txt_rules.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.txt_rules.Location = New System.Drawing.Point(480, 290)
|
||||
Me.txt_rules.Multiline = True
|
||||
Me.txt_rules.Name = "txt_rules"
|
||||
Me.txt_rules.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
|
||||
Me.txt_rules.Size = New System.Drawing.Size(355, 50)
|
||||
Me.txt_rules.TabIndex = 5
|
||||
'
|
||||
'btn_cancel
|
||||
'
|
||||
Me.btn_cancel.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_cancel.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.btn_cancel.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_cancel.Location = New System.Drawing.Point(10, 415)
|
||||
Me.btn_cancel.Name = "btn_cancel"
|
||||
Me.btn_cancel.Size = New System.Drawing.Size(280, 65)
|
||||
Me.btn_cancel.TabIndex = 18
|
||||
Me.btn_cancel.Text = "Cancel"
|
||||
Me.btn_cancel.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_create
|
||||
'
|
||||
Me.btn_create.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_create.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.btn_create.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_create.Location = New System.Drawing.Point(10, 345)
|
||||
Me.btn_create.Name = "btn_create"
|
||||
Me.btn_create.Size = New System.Drawing.Size(280, 65)
|
||||
Me.btn_create.TabIndex = 17
|
||||
Me.btn_create.Text = "Create Event"
|
||||
Me.btn_create.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label1.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label1.ForeColor = System.Drawing.Color.White
|
||||
Me.Label1.Location = New System.Drawing.Point(300, 255)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(175, 30)
|
||||
Me.Label1.TabIndex = 69
|
||||
Me.Label1.Text = "Courts :"
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_courts
|
||||
'
|
||||
Me.txt_courts.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.txt_courts.Location = New System.Drawing.Point(480, 255)
|
||||
Me.txt_courts.Name = "txt_courts"
|
||||
Me.txt_courts.Size = New System.Drawing.Size(355, 29)
|
||||
Me.txt_courts.TabIndex = 11
|
||||
'
|
||||
'pb_event_logo
|
||||
'
|
||||
Me.pb_event_logo.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_event_logo.Location = New System.Drawing.Point(10, 45)
|
||||
Me.pb_event_logo.Name = "pb_event_logo"
|
||||
Me.pb_event_logo.Size = New System.Drawing.Size(280, 295)
|
||||
Me.pb_event_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_event_logo.TabIndex = 70
|
||||
Me.pb_event_logo.TabStop = False
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label2.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label2.ForeColor = System.Drawing.Color.White
|
||||
Me.Label2.Location = New System.Drawing.Point(10, 10)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(280, 30)
|
||||
Me.Label2.TabIndex = 71
|
||||
Me.Label2.Text = "Event Logo"
|
||||
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'txt_rounds
|
||||
'
|
||||
Me.txt_rounds.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.txt_rounds.Location = New System.Drawing.Point(480, 80)
|
||||
Me.txt_rounds.Name = "txt_rounds"
|
||||
Me.txt_rounds.Size = New System.Drawing.Size(355, 29)
|
||||
Me.txt_rounds.TabIndex = 72
|
||||
Me.txt_rounds.Text = "1"
|
||||
Me.txt_rounds.Visible = False
|
||||
'
|
||||
'lbl_round
|
||||
'
|
||||
Me.lbl_round.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_round.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.lbl_round.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_round.Location = New System.Drawing.Point(300, 80)
|
||||
Me.lbl_round.Name = "lbl_round"
|
||||
Me.lbl_round.Size = New System.Drawing.Size(175, 30)
|
||||
Me.lbl_round.TabIndex = 73
|
||||
Me.lbl_round.Text = "Rounds :"
|
||||
Me.lbl_round.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.lbl_round.Visible = False
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label3.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label3.ForeColor = System.Drawing.Color.White
|
||||
Me.Label3.Location = New System.Drawing.Point(300, 150)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(175, 30)
|
||||
Me.Label3.TabIndex = 74
|
||||
Me.Label3.Text = "Country :"
|
||||
Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'cbo_country
|
||||
'
|
||||
Me.cbo_country.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.cbo_country.FormattingEnabled = True
|
||||
Me.cbo_country.Items.AddRange(New Object() {"PLAYOFF", "LEAGUE"})
|
||||
Me.cbo_country.Location = New System.Drawing.Point(480, 150)
|
||||
Me.cbo_country.Name = "cbo_country"
|
||||
Me.cbo_country.Size = New System.Drawing.Size(305, 30)
|
||||
Me.cbo_country.TabIndex = 75
|
||||
'
|
||||
'pb_flag
|
||||
'
|
||||
Me.pb_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_flag.Location = New System.Drawing.Point(790, 150)
|
||||
Me.pb_flag.Name = "pb_flag"
|
||||
Me.pb_flag.Size = New System.Drawing.Size(45, 30)
|
||||
Me.pb_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_flag.TabIndex = 76
|
||||
Me.pb_flag.TabStop = False
|
||||
'
|
||||
'lbl_address
|
||||
'
|
||||
Me.lbl_address.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_address.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.lbl_address.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_address.Location = New System.Drawing.Point(300, 185)
|
||||
Me.lbl_address.Name = "lbl_address"
|
||||
Me.lbl_address.Size = New System.Drawing.Size(175, 30)
|
||||
Me.lbl_address.TabIndex = 77
|
||||
Me.lbl_address.Text = "Address :"
|
||||
Me.lbl_address.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_address
|
||||
'
|
||||
Me.txt_address.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.txt_address.Location = New System.Drawing.Point(480, 185)
|
||||
Me.txt_address.Name = "txt_address"
|
||||
Me.txt_address.Size = New System.Drawing.Size(355, 29)
|
||||
Me.txt_address.TabIndex = 78
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label4.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label4.ForeColor = System.Drawing.Color.White
|
||||
Me.Label4.Location = New System.Drawing.Point(625, 450)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(65, 30)
|
||||
Me.Label4.TabIndex = 79
|
||||
Me.Label4.Text = "till :"
|
||||
Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label5.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label5.ForeColor = System.Drawing.Color.White
|
||||
Me.Label5.Location = New System.Drawing.Point(300, 345)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(175, 30)
|
||||
Me.Label5.TabIndex = 80
|
||||
Me.Label5.Text = "Currency :"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label6.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.Label6.ForeColor = System.Drawing.Color.White
|
||||
Me.Label6.Location = New System.Drawing.Point(625, 345)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(65, 30)
|
||||
Me.Label6.TabIndex = 81
|
||||
Me.Label6.Text = "Fee :"
|
||||
Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'cbo_currency
|
||||
'
|
||||
Me.cbo_currency.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.cbo_currency.FormattingEnabled = True
|
||||
Me.cbo_currency.Location = New System.Drawing.Point(480, 345)
|
||||
Me.cbo_currency.Name = "cbo_currency"
|
||||
Me.cbo_currency.Size = New System.Drawing.Size(140, 30)
|
||||
Me.cbo_currency.TabIndex = 82
|
||||
'
|
||||
'txt_fee
|
||||
'
|
||||
Me.txt_fee.Font = New System.Drawing.Font("Tahoma", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World)
|
||||
Me.txt_fee.Location = New System.Drawing.Point(695, 345)
|
||||
Me.txt_fee.Name = "txt_fee"
|
||||
Me.txt_fee.Size = New System.Drawing.Size(140, 29)
|
||||
Me.txt_fee.TabIndex = 83
|
||||
'
|
||||
'frm_create_event
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(844, 491)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.txt_fee)
|
||||
Me.Controls.Add(Me.cbo_currency)
|
||||
Me.Controls.Add(Me.Label6)
|
||||
Me.Controls.Add(Me.Label5)
|
||||
Me.Controls.Add(Me.Label4)
|
||||
Me.Controls.Add(Me.txt_address)
|
||||
Me.Controls.Add(Me.lbl_address)
|
||||
Me.Controls.Add(Me.pb_flag)
|
||||
Me.Controls.Add(Me.cbo_country)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.lbl_round)
|
||||
Me.Controls.Add(Me.txt_rounds)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
Me.Controls.Add(Me.pb_event_logo)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.btn_cancel)
|
||||
Me.Controls.Add(Me.txt_courts)
|
||||
Me.Controls.Add(Me.btn_create)
|
||||
Me.Controls.Add(Me.lbl_organizor)
|
||||
Me.Controls.Add(Me.txt_organizor)
|
||||
Me.Controls.Add(Me.txt_title)
|
||||
Me.Controls.Add(Me.cbo_type)
|
||||
Me.Controls.Add(Me.lbl_title)
|
||||
Me.Controls.Add(Me.Label14)
|
||||
Me.Controls.Add(Me.txt_rules)
|
||||
Me.Controls.Add(Me.Label15)
|
||||
Me.Controls.Add(Me.Label11)
|
||||
Me.Controls.Add(Me.dtp_start_enroll)
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.txt_location)
|
||||
Me.Controls.Add(Me.dtp_weigh_date)
|
||||
Me.Controls.Add(Me.Label12)
|
||||
Me.Controls.Add(Me.dtp_end_enroll)
|
||||
Me.Controls.Add(Me.dtp_end_date)
|
||||
Me.Controls.Add(Me.Label13)
|
||||
Me.Controls.Add(Me.Label9)
|
||||
Me.Controls.Add(Me.dtp_start_date)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
|
||||
Me.Name = "frm_create_event"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Create Event"
|
||||
CType(Me.pb_event_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents lbl_title As System.Windows.Forms.Label
|
||||
Friend WithEvents txt_title As System.Windows.Forms.TextBox
|
||||
Friend WithEvents cbo_type As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label15 As System.Windows.Forms.Label
|
||||
Friend WithEvents dtp_start_enroll As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents txt_location As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label12 As System.Windows.Forms.Label
|
||||
Friend WithEvents dtp_end_enroll As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label13 As System.Windows.Forms.Label
|
||||
Friend WithEvents dtp_start_date As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label9 As System.Windows.Forms.Label
|
||||
Friend WithEvents dtp_end_date As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents dtp_weigh_date As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label11 As System.Windows.Forms.Label
|
||||
Friend WithEvents txt_rules As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents txt_courts As System.Windows.Forms.TextBox
|
||||
Friend WithEvents lbl_organizor As System.Windows.Forms.Label
|
||||
Friend WithEvents txt_organizor As System.Windows.Forms.TextBox
|
||||
Friend WithEvents btn_cancel As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_create As System.Windows.Forms.Button
|
||||
Friend WithEvents pb_event_logo As PictureBox
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents txt_rounds As TextBox
|
||||
Friend WithEvents lbl_round As Label
|
||||
Friend WithEvents Label3 As Label
|
||||
Friend WithEvents cbo_country As ComboBox
|
||||
Friend WithEvents pb_flag As PictureBox
|
||||
Friend WithEvents lbl_address As Label
|
||||
Friend WithEvents txt_address As TextBox
|
||||
Friend WithEvents Label4 As Label
|
||||
Friend WithEvents Label5 As Label
|
||||
Friend WithEvents Label6 As Label
|
||||
Friend WithEvents cbo_currency As ComboBox
|
||||
Friend WithEvents txt_fee As TextBox
|
||||
End Class
|
||||
@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@ -0,0 +1,93 @@
|
||||
Imports System.IO
|
||||
Imports System.ComponentModel
|
||||
|
||||
Public Class frm_create_event
|
||||
|
||||
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_cancel.Click
|
||||
|
||||
frm_main.Show()
|
||||
Me.Close()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_championship_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
GetCountryList(cbo_country)
|
||||
cbo_type.SelectedIndex = 1
|
||||
dtp_start_enroll.MinDate = Date.Today
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub dtp_start_enroll_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles dtp_start_enroll.ValueChanged
|
||||
|
||||
dtp_end_enroll.MinDate = dtp_start_enroll.Value
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub dtp_end_enroll_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles dtp_end_enroll.ValueChanged
|
||||
|
||||
dtp_weigh_date.MinDate = dtp_end_enroll.Value
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub dtp_weigh_date_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles dtp_weigh_date.ValueChanged
|
||||
|
||||
dtp_start_date.MinDate = dtp_weigh_date.Value
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub dtp_start_date_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles dtp_start_date.ValueChanged
|
||||
|
||||
dtp_end_date.MinDate = dtp_start_date.Value
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_create_Click(sender As Object, e As EventArgs) Handles btn_create.Click
|
||||
|
||||
Try
|
||||
Dim takeone_event As New platformevent(txt_title.Text, cbo_type.Text, txt_rounds.Text, txt_organizor.Text, cbo_country.SelectedValue, txt_address.Text, txt_location.Text, txt_courts.Text, txt_rules.Text, cbo_currency.Text, txt_fee.Text, dtp_start_enroll.Text, dtp_end_enroll.Text, dtp_weigh_date.Text, dtp_start_date.Text, dtp_end_date.Text, pb_event_logo)
|
||||
EventList(frm_main.lst_events)
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub pb_event_logo_Click(sender As Object, e As EventArgs) Handles pb_event_logo.Click
|
||||
|
||||
ResizePicture(pb_event_logo, 500, 500)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_create_event_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
|
||||
|
||||
frm_main.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_type_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_type.SelectedIndexChanged
|
||||
|
||||
If cbo_type.Text = "LEAGUE" Then
|
||||
txt_rounds.Visible = True
|
||||
lbl_round.Visible = True
|
||||
Else
|
||||
txt_rounds.Visible = False
|
||||
lbl_round.Visible = False
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_country_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_country.SelectedIndexChanged
|
||||
|
||||
Dim country As country
|
||||
|
||||
Try
|
||||
country = New country(cbo_country.SelectedValue)
|
||||
pb_flag.Image = Image.FromStream(country.Flag)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
517
Visual Studio Code/Timer Library/forms/event/frm_event_control.designer.vb
generated
Normal file
@ -0,0 +1,517 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class frm_event_control
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.btn_participants = New System.Windows.Forms.Button()
|
||||
Me.btn_start_event = New System.Windows.Forms.Button()
|
||||
Me.lbl_event_title_display = New System.Windows.Forms.Label()
|
||||
Me.btn_clubs_data = New System.Windows.Forms.Button()
|
||||
Me.btn_draw_managment = New System.Windows.Forms.Button()
|
||||
Me.btn_event_results = New System.Windows.Forms.Button()
|
||||
Me.btn_back = New System.Windows.Forms.Button()
|
||||
Me.lbl_total_rounds = New System.Windows.Forms.Label()
|
||||
Me.btn_fighter_statistics = New System.Windows.Forms.Button()
|
||||
Me.pb_event_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_total_matches = New System.Windows.Forms.Label()
|
||||
Me.lbl_total_referees = New System.Windows.Forms.Label()
|
||||
Me.lbl_total_clubs = New System.Windows.Forms.Label()
|
||||
Me.btn_swap_match = New System.Windows.Forms.Button()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.lbl_current_round = New System.Windows.Forms.Label()
|
||||
Me.lbl_remaining_matches = New System.Windows.Forms.Label()
|
||||
Me.lbl_total_females = New System.Windows.Forms.Label()
|
||||
Me.lbl_total_males = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
CType(Me.pb_event_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'btn_participants
|
||||
'
|
||||
Me.btn_participants.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_participants.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_participants.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_participants.Location = New System.Drawing.Point(15, 215)
|
||||
Me.btn_participants.Name = "btn_participants"
|
||||
Me.btn_participants.Size = New System.Drawing.Size(395, 55)
|
||||
Me.btn_participants.TabIndex = 0
|
||||
Me.btn_participants.Text = "PARTICIPANTS"
|
||||
Me.btn_participants.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_start_event
|
||||
'
|
||||
Me.btn_start_event.FlatAppearance.MouseOverBackColor = System.Drawing.Color.Green
|
||||
Me.btn_start_event.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_start_event.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_start_event.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_start_event.Location = New System.Drawing.Point(425, 215)
|
||||
Me.btn_start_event.Name = "btn_start_event"
|
||||
Me.btn_start_event.Size = New System.Drawing.Size(395, 55)
|
||||
Me.btn_start_event.TabIndex = 1
|
||||
Me.btn_start_event.Text = "START EVENT"
|
||||
Me.btn_start_event.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lbl_event_title_display
|
||||
'
|
||||
Me.lbl_event_title_display.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_event_title_display.Font = New System.Drawing.Font("Arial Rounded MT Bold", 30.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_event_title_display.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_event_title_display.Location = New System.Drawing.Point(210, 20)
|
||||
Me.lbl_event_title_display.Name = "lbl_event_title_display"
|
||||
Me.lbl_event_title_display.Size = New System.Drawing.Size(610, 55)
|
||||
Me.lbl_event_title_display.TabIndex = 11
|
||||
Me.lbl_event_title_display.Text = "Warrior TaeKwonDo Academy League"
|
||||
Me.lbl_event_title_display.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_clubs_data
|
||||
'
|
||||
Me.btn_clubs_data.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_clubs_data.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_clubs_data.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_clubs_data.Location = New System.Drawing.Point(425, 280)
|
||||
Me.btn_clubs_data.Name = "btn_clubs_data"
|
||||
Me.btn_clubs_data.Size = New System.Drawing.Size(395, 55)
|
||||
Me.btn_clubs_data.TabIndex = 12
|
||||
Me.btn_clubs_data.Text = "CLUBS DATA"
|
||||
Me.btn_clubs_data.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_draw_managment
|
||||
'
|
||||
Me.btn_draw_managment.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_draw_managment.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_draw_managment.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_draw_managment.Location = New System.Drawing.Point(15, 280)
|
||||
Me.btn_draw_managment.Name = "btn_draw_managment"
|
||||
Me.btn_draw_managment.Size = New System.Drawing.Size(395, 55)
|
||||
Me.btn_draw_managment.TabIndex = 13
|
||||
Me.btn_draw_managment.Text = "DRAW MANAGMENT"
|
||||
Me.btn_draw_managment.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_event_results
|
||||
'
|
||||
Me.btn_event_results.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_event_results.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_event_results.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_event_results.Location = New System.Drawing.Point(425, 410)
|
||||
Me.btn_event_results.Name = "btn_event_results"
|
||||
Me.btn_event_results.Size = New System.Drawing.Size(395, 55)
|
||||
Me.btn_event_results.TabIndex = 14
|
||||
Me.btn_event_results.Text = "EVENT RESULTS"
|
||||
Me.btn_event_results.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_back
|
||||
'
|
||||
Me.btn_back.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_back.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_back.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_back.Location = New System.Drawing.Point(15, 410)
|
||||
Me.btn_back.Name = "btn_back"
|
||||
Me.btn_back.Size = New System.Drawing.Size(395, 55)
|
||||
Me.btn_back.TabIndex = 16
|
||||
Me.btn_back.Text = "< BACK"
|
||||
Me.btn_back.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lbl_total_rounds
|
||||
'
|
||||
Me.lbl_total_rounds.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_total_rounds.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_total_rounds.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_total_rounds.Location = New System.Drawing.Point(210, 120)
|
||||
Me.lbl_total_rounds.Name = "lbl_total_rounds"
|
||||
Me.lbl_total_rounds.Size = New System.Drawing.Size(110, 35)
|
||||
Me.lbl_total_rounds.TabIndex = 20
|
||||
Me.lbl_total_rounds.Text = "0"
|
||||
Me.lbl_total_rounds.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'btn_fighter_statistics
|
||||
'
|
||||
Me.btn_fighter_statistics.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_fighter_statistics.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_fighter_statistics.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_fighter_statistics.Location = New System.Drawing.Point(425, 345)
|
||||
Me.btn_fighter_statistics.Name = "btn_fighter_statistics"
|
||||
Me.btn_fighter_statistics.Size = New System.Drawing.Size(395, 55)
|
||||
Me.btn_fighter_statistics.TabIndex = 22
|
||||
Me.btn_fighter_statistics.Text = "FIGHTERS DATA"
|
||||
Me.btn_fighter_statistics.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pb_event_logo
|
||||
'
|
||||
Me.pb_event_logo.Location = New System.Drawing.Point(15, 20)
|
||||
Me.pb_event_logo.Name = "pb_event_logo"
|
||||
Me.pb_event_logo.Size = New System.Drawing.Size(180, 180)
|
||||
Me.pb_event_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_event_logo.TabIndex = 24
|
||||
Me.pb_event_logo.TabStop = False
|
||||
'
|
||||
'lbl_total_matches
|
||||
'
|
||||
Me.lbl_total_matches.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_total_matches.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_total_matches.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_total_matches.Location = New System.Drawing.Point(335, 120)
|
||||
Me.lbl_total_matches.Name = "lbl_total_matches"
|
||||
Me.lbl_total_matches.Size = New System.Drawing.Size(110, 35)
|
||||
Me.lbl_total_matches.TabIndex = 25
|
||||
Me.lbl_total_matches.Text = "0"
|
||||
Me.lbl_total_matches.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lbl_total_referees
|
||||
'
|
||||
Me.lbl_total_referees.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_total_referees.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_total_referees.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_total_referees.Location = New System.Drawing.Point(460, 120)
|
||||
Me.lbl_total_referees.Name = "lbl_total_referees"
|
||||
Me.lbl_total_referees.Size = New System.Drawing.Size(110, 80)
|
||||
Me.lbl_total_referees.TabIndex = 26
|
||||
Me.lbl_total_referees.Text = "0"
|
||||
Me.lbl_total_referees.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_total_clubs
|
||||
'
|
||||
Me.lbl_total_clubs.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_total_clubs.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_total_clubs.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_total_clubs.Location = New System.Drawing.Point(585, 120)
|
||||
Me.lbl_total_clubs.Name = "lbl_total_clubs"
|
||||
Me.lbl_total_clubs.Size = New System.Drawing.Size(110, 80)
|
||||
Me.lbl_total_clubs.TabIndex = 27
|
||||
Me.lbl_total_clubs.Text = "0"
|
||||
Me.lbl_total_clubs.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_swap_match
|
||||
'
|
||||
Me.btn_swap_match.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_swap_match.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_swap_match.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_swap_match.Location = New System.Drawing.Point(15, 345)
|
||||
Me.btn_swap_match.Name = "btn_swap_match"
|
||||
Me.btn_swap_match.Size = New System.Drawing.Size(395, 55)
|
||||
Me.btn_swap_match.TabIndex = 15
|
||||
Me.btn_swap_match.Text = "SWAP MATCH"
|
||||
Me.btn_swap_match.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.BackColor = System.Drawing.Color.Black
|
||||
Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label10.ForeColor = System.Drawing.Color.White
|
||||
Me.Label10.Location = New System.Drawing.Point(210, 85)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(110, 25)
|
||||
Me.Label10.TabIndex = 58
|
||||
Me.Label10.Text = "ROUNDS"
|
||||
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.BackColor = System.Drawing.Color.Black
|
||||
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.ForeColor = System.Drawing.Color.White
|
||||
Me.Label5.Location = New System.Drawing.Point(335, 85)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(110, 25)
|
||||
Me.Label5.TabIndex = 59
|
||||
Me.Label5.Text = "MATCHES"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.BackColor = System.Drawing.Color.Black
|
||||
Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label6.ForeColor = System.Drawing.Color.White
|
||||
Me.Label6.Location = New System.Drawing.Point(710, 85)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(110, 25)
|
||||
Me.Label6.TabIndex = 60
|
||||
Me.Label6.Text = "PLAYERS"
|
||||
Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.BackColor = System.Drawing.Color.Black
|
||||
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label7.ForeColor = System.Drawing.Color.White
|
||||
Me.Label7.Location = New System.Drawing.Point(585, 85)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(110, 25)
|
||||
Me.Label7.TabIndex = 61
|
||||
Me.Label7.Text = "CLUBS"
|
||||
Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.BackColor = System.Drawing.Color.Black
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.Color.White
|
||||
Me.Label8.Location = New System.Drawing.Point(460, 85)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(110, 25)
|
||||
Me.Label8.TabIndex = 62
|
||||
Me.Label8.Text = "REFEREES"
|
||||
Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_current_round
|
||||
'
|
||||
Me.lbl_current_round.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_current_round.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_current_round.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_current_round.Location = New System.Drawing.Point(210, 165)
|
||||
Me.lbl_current_round.Name = "lbl_current_round"
|
||||
Me.lbl_current_round.Size = New System.Drawing.Size(110, 35)
|
||||
Me.lbl_current_round.TabIndex = 72
|
||||
Me.lbl_current_round.Text = "0"
|
||||
Me.lbl_current_round.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lbl_remaining_matches
|
||||
'
|
||||
Me.lbl_remaining_matches.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_remaining_matches.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_remaining_matches.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_remaining_matches.Location = New System.Drawing.Point(335, 165)
|
||||
Me.lbl_remaining_matches.Name = "lbl_remaining_matches"
|
||||
Me.lbl_remaining_matches.Size = New System.Drawing.Size(110, 35)
|
||||
Me.lbl_remaining_matches.TabIndex = 73
|
||||
Me.lbl_remaining_matches.Text = "0"
|
||||
Me.lbl_remaining_matches.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lbl_total_females
|
||||
'
|
||||
Me.lbl_total_females.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lbl_total_females.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_total_females.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_total_females.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_total_females.Location = New System.Drawing.Point(710, 165)
|
||||
Me.lbl_total_females.Name = "lbl_total_females"
|
||||
Me.lbl_total_females.Size = New System.Drawing.Size(110, 35)
|
||||
Me.lbl_total_females.TabIndex = 75
|
||||
Me.lbl_total_females.Text = "0"
|
||||
Me.lbl_total_females.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lbl_total_males
|
||||
'
|
||||
Me.lbl_total_males.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lbl_total_males.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_total_males.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_total_males.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_total_males.Location = New System.Drawing.Point(710, 120)
|
||||
Me.lbl_total_males.Name = "lbl_total_males"
|
||||
Me.lbl_total_males.Size = New System.Drawing.Size(110, 35)
|
||||
Me.lbl_total_males.TabIndex = 74
|
||||
Me.lbl_total_males.Text = "0"
|
||||
Me.lbl_total_males.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label1.Font = New System.Drawing.Font("Arial Rounded MT Bold", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label1.Location = New System.Drawing.Point(215, 115)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(60, 15)
|
||||
Me.Label1.TabIndex = 76
|
||||
Me.Label1.Text = "Total"
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label2.Font = New System.Drawing.Font("Arial Rounded MT Bold", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label2.Location = New System.Drawing.Point(215, 160)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(60, 15)
|
||||
Me.Label2.TabIndex = 77
|
||||
Me.Label2.Text = "Current"
|
||||
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label3.Font = New System.Drawing.Font("Arial Rounded MT Bold", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label3.Location = New System.Drawing.Point(340, 160)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(60, 15)
|
||||
Me.Label3.TabIndex = 79
|
||||
Me.Label3.Text = "Remain"
|
||||
Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label4.Font = New System.Drawing.Font("Arial Rounded MT Bold", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label4.Location = New System.Drawing.Point(340, 115)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(60, 15)
|
||||
Me.Label4.TabIndex = 78
|
||||
Me.Label4.Text = "Total"
|
||||
Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label9.Font = New System.Drawing.Font("Arial Rounded MT Bold", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label9.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label9.Location = New System.Drawing.Point(465, 115)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(60, 15)
|
||||
Me.Label9.TabIndex = 80
|
||||
Me.Label9.Text = "Total"
|
||||
Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label11.Font = New System.Drawing.Font("Arial Rounded MT Bold", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label11.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label11.Location = New System.Drawing.Point(590, 115)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(60, 15)
|
||||
Me.Label11.TabIndex = 81
|
||||
Me.Label11.Text = "Total"
|
||||
Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label12.Font = New System.Drawing.Font("Arial Rounded MT Bold", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label12.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label12.Location = New System.Drawing.Point(715, 115)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(60, 15)
|
||||
Me.Label12.TabIndex = 82
|
||||
Me.Label12.Text = "Male"
|
||||
Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label13.Font = New System.Drawing.Font("Arial Rounded MT Bold", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label13.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label13.Location = New System.Drawing.Point(715, 160)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(60, 15)
|
||||
Me.Label13.TabIndex = 83
|
||||
Me.Label13.Text = "Female"
|
||||
Me.Label13.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'frm_event_control
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(834, 481)
|
||||
Me.Controls.Add(Me.Label13)
|
||||
Me.Controls.Add(Me.Label12)
|
||||
Me.Controls.Add(Me.Label11)
|
||||
Me.Controls.Add(Me.Label9)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.Label4)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.lbl_total_females)
|
||||
Me.Controls.Add(Me.lbl_total_males)
|
||||
Me.Controls.Add(Me.lbl_remaining_matches)
|
||||
Me.Controls.Add(Me.lbl_current_round)
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.Label7)
|
||||
Me.Controls.Add(Me.Label6)
|
||||
Me.Controls.Add(Me.Label5)
|
||||
Me.Controls.Add(Me.Label10)
|
||||
Me.Controls.Add(Me.lbl_total_clubs)
|
||||
Me.Controls.Add(Me.lbl_total_referees)
|
||||
Me.Controls.Add(Me.lbl_total_matches)
|
||||
Me.Controls.Add(Me.pb_event_logo)
|
||||
Me.Controls.Add(Me.btn_fighter_statistics)
|
||||
Me.Controls.Add(Me.lbl_total_rounds)
|
||||
Me.Controls.Add(Me.btn_back)
|
||||
Me.Controls.Add(Me.btn_swap_match)
|
||||
Me.Controls.Add(Me.btn_event_results)
|
||||
Me.Controls.Add(Me.btn_draw_managment)
|
||||
Me.Controls.Add(Me.btn_clubs_data)
|
||||
Me.Controls.Add(Me.lbl_event_title_display)
|
||||
Me.Controls.Add(Me.btn_start_event)
|
||||
Me.Controls.Add(Me.btn_participants)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
|
||||
Me.MaximizeBox = False
|
||||
Me.Name = "frm_event_control"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Score Control"
|
||||
CType(Me.pb_event_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents btn_participants As Button
|
||||
Friend WithEvents btn_start_event As Button
|
||||
Friend WithEvents lbl_event_title_display As Label
|
||||
Friend WithEvents btn_clubs_data As Button
|
||||
Friend WithEvents btn_draw_managment As Button
|
||||
Friend WithEvents btn_event_results As Button
|
||||
Friend WithEvents btn_back As Button
|
||||
Friend WithEvents lbl_total_rounds As Label
|
||||
Friend WithEvents btn_fighter_statistics As Button
|
||||
Friend WithEvents pb_event_logo As PictureBox
|
||||
Friend WithEvents lbl_total_referees As Label
|
||||
Friend WithEvents lbl_total_clubs As Label
|
||||
Friend WithEvents lbl_total_matches As Label
|
||||
Friend WithEvents btn_swap_match As Button
|
||||
Friend WithEvents Label10 As Label
|
||||
Friend WithEvents Label5 As Label
|
||||
Friend WithEvents Label6 As Label
|
||||
Friend WithEvents Label7 As Label
|
||||
Friend WithEvents Label8 As Label
|
||||
Friend WithEvents lbl_current_round As Label
|
||||
Friend WithEvents lbl_remaining_matches As Label
|
||||
Friend WithEvents lbl_total_males As Label
|
||||
Friend WithEvents lbl_total_females As Label
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents Label3 As Label
|
||||
Friend WithEvents Label4 As Label
|
||||
Friend WithEvents Label9 As Label
|
||||
Friend WithEvents Label11 As Label
|
||||
Friend WithEvents Label12 As Label
|
||||
Friend WithEvents Label13 As Label
|
||||
End Class
|
||||
@ -0,0 +1,216 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="btn_participants.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="btn_start_event.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="lbl_event_title_display.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="btn_clubs_data.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="btn_draw_managment.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="btn_event_results.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="btn_back.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="lbl_total_rounds.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="btn_fighter_statistics.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="pb_event_logo.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="lbl_total_matches.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="lbl_total_referees.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="lbl_total_clubs.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="btn_swap_match.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label10.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label5.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label6.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label7.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label8.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="lbl_current_round.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="lbl_remaining_matches.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="lbl_total_females.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="lbl_total_males.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label1.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label2.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label3.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label4.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label9.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label11.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label12.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Label13.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="$this.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
</root>
|
||||
@ -0,0 +1,195 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
Imports System.ComponentModel
|
||||
|
||||
Public Class frm_event_control
|
||||
|
||||
Public EventID As String
|
||||
Public EventTitle As String
|
||||
|
||||
Private Sub EventBasicStats(eventID As Integer)
|
||||
|
||||
Dim QRY As String = ("
|
||||
select
|
||||
(select count(*) From (select distinct ern from event_matches where eid = " & eventID & ") as TOTALROUNDS) as 'TR',
|
||||
(select * From (select distinct ern from event_matches where eid = " & eventID & " and started = 0 and ended = 0 limit 1) as CURRENTROUND) as 'CR',
|
||||
(select count(*) From (select * from event_matches where eid = " & eventID & ") as TOTALMATCHES) as 'TM',
|
||||
(select count(*) From (select * from event_matches where eid = " & eventID & " and started = 0 and ended = 0) as REMMATCHES) as 'RM',
|
||||
(select count(*) From (select distinct person.* from event_matches left join person on event_matches.blue_fighter = person.id or event_matches.red_fighter = person.id where person.gender = 'MALE' and event_matches.eid = " & eventID & ") as MALE) as 'GM',
|
||||
(select count(*) From (select distinct person.* from event_matches left join person on event_matches.blue_fighter = person.id or event_matches.red_fighter = person.id where person.gender = 'FEMALE' and event_matches.eid = " & eventID & ") as FEMALE) as 'GF',
|
||||
(select count(*) From (select distinct clubs.Title from event_matches left join person on event_matches.blue_fighter = person.id or event_matches.red_fighter = person.id left join clubs on person.club = clubs.id where event_matches.eid = " & eventID & " group by clubs.title) as CLUBS) as 'CL'
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
|
||||
Try
|
||||
lbl_total_rounds.Text = RDR("TR")
|
||||
Catch ex As Exception
|
||||
lbl_total_rounds.Text = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_current_round.Text = RDR("CR")
|
||||
Catch ex As Exception
|
||||
lbl_current_round.Text = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_total_matches.Text = RDR("TM")
|
||||
Catch ex As Exception
|
||||
lbl_total_matches.Text = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_remaining_matches.Text = RDR("RM")
|
||||
Catch ex As Exception
|
||||
lbl_remaining_matches.Text = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_total_clubs.Text = RDR("CL")
|
||||
Catch ex As Exception
|
||||
lbl_total_clubs.Text = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_total_males.Text = RDR("GM")
|
||||
Catch ex As Exception
|
||||
lbl_total_males.Text = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_total_females.Text = RDR("GF")
|
||||
Catch ex As Exception
|
||||
lbl_total_females.Text = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_total_referees.Text = 0
|
||||
Catch ex As Exception
|
||||
lbl_total_rounds.Text = Nothing
|
||||
End Try
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_add_participant_Click(sender As Object, e As EventArgs) Handles btn_participants.Click
|
||||
|
||||
frm_add_participants.Show()
|
||||
Me.Hide()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_event_control_MaximumSizeChanged(sender As Object, e As EventArgs) Handles Me.MaximumSizeChanged
|
||||
|
||||
frm_main.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_event_control_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
lbl_event_title_display.Text = SelectedEvent.Title
|
||||
|
||||
Try
|
||||
pb_event_logo.Image = Image.FromStream(SelectedEvent.Logo)
|
||||
Catch ex As Exception
|
||||
pb_event_logo.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
EventBasicStats(SelectedEvent.ID)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_back_Click(sender As Object, e As EventArgs) Handles btn_back.Click
|
||||
|
||||
frm_main.Show()
|
||||
Me.Close()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_create_matches_Click(sender As Object, e As EventArgs) Handles btn_start_event.Click
|
||||
|
||||
frm_scorecontrol.Show()
|
||||
Me.Hide()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_event_control_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
|
||||
|
||||
frm_main.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub pb_event_logo_Click(sender As Object, e As EventArgs) Handles pb_event_logo.Click
|
||||
|
||||
If IsNothing(pb_event_logo.Image) Then
|
||||
|
||||
' Open Picture File
|
||||
ResizePicture(pb_event_logo, 500, 500)
|
||||
|
||||
' Store The Picture
|
||||
SelectedEvent.UpdateLogo(pb_event_logo)
|
||||
|
||||
ElseIf Not IsNothing(pb_event_logo.Image) Then
|
||||
|
||||
Dim iPictureUpdate As DialogResult = MessageBox.Show("Would You Like To Update The Players Picture ?", "Picture Update", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
|
||||
If iPictureUpdate = DialogResult.Yes Then
|
||||
|
||||
' Open Picture File
|
||||
ResizePicture(pb_event_logo, 500, 500)
|
||||
|
||||
' Store The Picture
|
||||
SelectedEvent.UpdateLogo(pb_event_logo)
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_statistics_Click(sender As Object, e As EventArgs) Handles btn_fighter_statistics.Click
|
||||
|
||||
If Not SelectedEvent.ID = 0 Then
|
||||
frm_fighter_statistics.Show()
|
||||
Me.Hide()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_event_results_Click(sender As Object, e As EventArgs) Handles btn_event_results.Click
|
||||
|
||||
frm_ranking.Show()
|
||||
Me.Hide()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_draw_managment_Click(sender As Object, e As EventArgs) Handles btn_draw_managment.Click
|
||||
|
||||
frm_arrange_matches.Show()
|
||||
Me.Hide()
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
703
Visual Studio Code/Timer Library/forms/event/frm_fighter_statistics.designer.vb
generated
Normal file
@ -0,0 +1,703 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class frm_fighter_statistics
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.pb_fighter = New System.Windows.Forms.PictureBox()
|
||||
Me.lst_fighters = New System.Windows.Forms.ListBox()
|
||||
Me.txt_search = New System.Windows.Forms.TextBox()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.lbl_loss = New System.Windows.Forms.Label()
|
||||
Me.lbl_wins = New System.Windows.Forms.Label()
|
||||
Me.lbl_nationality = New System.Windows.Forms.Label()
|
||||
Me.lbl_gender = New System.Windows.Forms.Label()
|
||||
Me.lbl_name = New System.Windows.Forms.Label()
|
||||
Me.lbl_category = New System.Windows.Forms.Label()
|
||||
Me.Label19 = New System.Windows.Forms.Label()
|
||||
Me.lst_matches = New System.Windows.Forms.ListBox()
|
||||
Me.Label20 = New System.Windows.Forms.Label()
|
||||
Me.lbl_age = New System.Windows.Forms.Label()
|
||||
Me.btn_preview = New System.Windows.Forms.Button()
|
||||
Me.btn_opponent = New System.Windows.Forms.Button()
|
||||
Me.btn_close = New System.Windows.Forms.Button()
|
||||
Me.pb_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.lbl_match_number = New System.Windows.Forms.Label()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.lbl_court_number = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_fighter = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_fighter = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_score = New System.Windows.Forms.Label()
|
||||
Me.Label21 = New System.Windows.Forms.Label()
|
||||
Me.lbl_winner = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_score = New System.Windows.Forms.Label()
|
||||
Me.Label27 = New System.Windows.Forms.Label()
|
||||
Me.Label28 = New System.Windows.Forms.Label()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.lbl_rank = New System.Windows.Forms.Label()
|
||||
Me.Label22 = New System.Windows.Forms.Label()
|
||||
Me.lbl_referee = New System.Windows.Forms.Label()
|
||||
Me.pb_referee_flag = New System.Windows.Forms.Label()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.lbl_last_weight = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.lbl_weight_class = New System.Windows.Forms.Label()
|
||||
Me.pb_blue_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_red_logo = New System.Windows.Forms.PictureBox()
|
||||
CType(Me.pb_fighter, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'pb_fighter
|
||||
'
|
||||
Me.pb_fighter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_fighter.Location = New System.Drawing.Point(285, 10)
|
||||
Me.pb_fighter.Name = "pb_fighter"
|
||||
Me.pb_fighter.Size = New System.Drawing.Size(160, 180)
|
||||
Me.pb_fighter.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_fighter.TabIndex = 6
|
||||
Me.pb_fighter.TabStop = False
|
||||
'
|
||||
'lst_fighters
|
||||
'
|
||||
Me.lst_fighters.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lst_fighters.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lst_fighters.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lst_fighters.ForeColor = System.Drawing.Color.White
|
||||
Me.lst_fighters.FormattingEnabled = True
|
||||
Me.lst_fighters.ItemHeight = 20
|
||||
Me.lst_fighters.Location = New System.Drawing.Point(10, 80)
|
||||
Me.lst_fighters.Name = "lst_fighters"
|
||||
Me.lst_fighters.Size = New System.Drawing.Size(265, 262)
|
||||
Me.lst_fighters.TabIndex = 7
|
||||
'
|
||||
'txt_search
|
||||
'
|
||||
Me.txt_search.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.txt_search.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.txt_search.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txt_search.ForeColor = System.Drawing.Color.White
|
||||
Me.txt_search.Location = New System.Drawing.Point(95, 10)
|
||||
Me.txt_search.Name = "txt_search"
|
||||
Me.txt_search.Size = New System.Drawing.Size(180, 26)
|
||||
Me.txt_search.TabIndex = 8
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.Location = New System.Drawing.Point(450, 10)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(110, 25)
|
||||
Me.Label3.TabIndex = 11
|
||||
Me.Label3.Text = "Name :"
|
||||
Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.Location = New System.Drawing.Point(450, 40)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(110, 25)
|
||||
Me.Label4.TabIndex = 13
|
||||
Me.Label4.Text = "Nationality :"
|
||||
Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.Location = New System.Drawing.Point(450, 100)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(110, 25)
|
||||
Me.Label5.TabIndex = 12
|
||||
Me.Label5.Text = "Gender :"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label6.Location = New System.Drawing.Point(665, 100)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(75, 25)
|
||||
Me.Label6.TabIndex = 14
|
||||
Me.Label6.Text = "Win :"
|
||||
Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label7.Location = New System.Drawing.Point(665, 130)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(75, 25)
|
||||
Me.Label7.TabIndex = 15
|
||||
Me.Label7.Text = "Lose :"
|
||||
Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lbl_loss
|
||||
'
|
||||
Me.lbl_loss.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_loss.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_loss.Location = New System.Drawing.Point(745, 130)
|
||||
Me.lbl_loss.Name = "lbl_loss"
|
||||
Me.lbl_loss.Size = New System.Drawing.Size(80, 25)
|
||||
Me.lbl_loss.TabIndex = 21
|
||||
Me.lbl_loss.Text = "0"
|
||||
Me.lbl_loss.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_wins
|
||||
'
|
||||
Me.lbl_wins.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_wins.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_wins.Location = New System.Drawing.Point(745, 100)
|
||||
Me.lbl_wins.Name = "lbl_wins"
|
||||
Me.lbl_wins.Size = New System.Drawing.Size(80, 25)
|
||||
Me.lbl_wins.TabIndex = 20
|
||||
Me.lbl_wins.Text = "0"
|
||||
Me.lbl_wins.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_nationality
|
||||
'
|
||||
Me.lbl_nationality.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_nationality.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_nationality.Location = New System.Drawing.Point(610, 40)
|
||||
Me.lbl_nationality.Name = "lbl_nationality"
|
||||
Me.lbl_nationality.Size = New System.Drawing.Size(215, 25)
|
||||
Me.lbl_nationality.TabIndex = 19
|
||||
Me.lbl_nationality.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_gender
|
||||
'
|
||||
Me.lbl_gender.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_gender.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_gender.Location = New System.Drawing.Point(565, 100)
|
||||
Me.lbl_gender.Name = "lbl_gender"
|
||||
Me.lbl_gender.Size = New System.Drawing.Size(95, 25)
|
||||
Me.lbl_gender.TabIndex = 18
|
||||
Me.lbl_gender.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_name
|
||||
'
|
||||
Me.lbl_name.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_name.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_name.Location = New System.Drawing.Point(565, 10)
|
||||
Me.lbl_name.Name = "lbl_name"
|
||||
Me.lbl_name.Size = New System.Drawing.Size(260, 25)
|
||||
Me.lbl_name.TabIndex = 17
|
||||
Me.lbl_name.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
'
|
||||
'lbl_category
|
||||
'
|
||||
Me.lbl_category.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_category.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_category.Location = New System.Drawing.Point(565, 130)
|
||||
Me.lbl_category.Name = "lbl_category"
|
||||
Me.lbl_category.Size = New System.Drawing.Size(95, 25)
|
||||
Me.lbl_category.TabIndex = 25
|
||||
Me.lbl_category.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label19
|
||||
'
|
||||
Me.Label19.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label19.Location = New System.Drawing.Point(450, 130)
|
||||
Me.Label19.Name = "Label19"
|
||||
Me.Label19.Size = New System.Drawing.Size(110, 25)
|
||||
Me.Label19.TabIndex = 26
|
||||
Me.Label19.Text = "Category :"
|
||||
Me.Label19.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lst_matches
|
||||
'
|
||||
Me.lst_matches.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lst_matches.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lst_matches.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lst_matches.ForeColor = System.Drawing.Color.White
|
||||
Me.lst_matches.FormattingEnabled = True
|
||||
Me.lst_matches.ItemHeight = 20
|
||||
Me.lst_matches.Location = New System.Drawing.Point(285, 220)
|
||||
Me.lst_matches.Name = "lst_matches"
|
||||
Me.lst_matches.Size = New System.Drawing.Size(540, 122)
|
||||
Me.lst_matches.TabIndex = 28
|
||||
'
|
||||
'Label20
|
||||
'
|
||||
Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label20.Location = New System.Drawing.Point(665, 70)
|
||||
Me.Label20.Name = "Label20"
|
||||
Me.Label20.Size = New System.Drawing.Size(75, 25)
|
||||
Me.Label20.TabIndex = 29
|
||||
Me.Label20.Text = "Age :"
|
||||
Me.Label20.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lbl_age
|
||||
'
|
||||
Me.lbl_age.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_age.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_age.Location = New System.Drawing.Point(745, 70)
|
||||
Me.lbl_age.Name = "lbl_age"
|
||||
Me.lbl_age.Size = New System.Drawing.Size(80, 25)
|
||||
Me.lbl_age.TabIndex = 30
|
||||
Me.lbl_age.Text = "0"
|
||||
Me.lbl_age.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_preview
|
||||
'
|
||||
Me.btn_preview.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_preview.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_preview.Location = New System.Drawing.Point(650, 350)
|
||||
Me.btn_preview.Name = "btn_preview"
|
||||
Me.btn_preview.Size = New System.Drawing.Size(175, 35)
|
||||
Me.btn_preview.TabIndex = 31
|
||||
Me.btn_preview.Text = "Preview"
|
||||
Me.btn_preview.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_opponent
|
||||
'
|
||||
Me.btn_opponent.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_opponent.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_opponent.Location = New System.Drawing.Point(650, 390)
|
||||
Me.btn_opponent.Name = "btn_opponent"
|
||||
Me.btn_opponent.Size = New System.Drawing.Size(175, 35)
|
||||
Me.btn_opponent.TabIndex = 32
|
||||
Me.btn_opponent.Text = "Opponent"
|
||||
Me.btn_opponent.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_close
|
||||
'
|
||||
Me.btn_close.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_close.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_close.Location = New System.Drawing.Point(650, 430)
|
||||
Me.btn_close.Name = "btn_close"
|
||||
Me.btn_close.Size = New System.Drawing.Size(175, 35)
|
||||
Me.btn_close.TabIndex = 35
|
||||
Me.btn_close.Text = "Close"
|
||||
Me.btn_close.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pb_flag
|
||||
'
|
||||
Me.pb_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_flag.Location = New System.Drawing.Point(565, 40)
|
||||
Me.pb_flag.Name = "pb_flag"
|
||||
Me.pb_flag.Size = New System.Drawing.Size(40, 25)
|
||||
Me.pb_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_flag.TabIndex = 36
|
||||
Me.pb_flag.TabStop = False
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label11.Location = New System.Drawing.Point(130, 350)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(70, 25)
|
||||
Me.Label11.TabIndex = 39
|
||||
Me.Label11.Text = "Match"
|
||||
Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_match_number
|
||||
'
|
||||
Me.lbl_match_number.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_match_number.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_match_number.Location = New System.Drawing.Point(130, 380)
|
||||
Me.lbl_match_number.Name = "lbl_match_number"
|
||||
Me.lbl_match_number.Size = New System.Drawing.Size(70, 25)
|
||||
Me.lbl_match_number.TabIndex = 40
|
||||
Me.lbl_match_number.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label13.Location = New System.Drawing.Point(130, 410)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(70, 25)
|
||||
Me.Label13.TabIndex = 41
|
||||
Me.Label13.Text = "Court"
|
||||
Me.Label13.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_court_number
|
||||
'
|
||||
Me.lbl_court_number.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_court_number.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_court_number.Location = New System.Drawing.Point(130, 440)
|
||||
Me.lbl_court_number.Name = "lbl_court_number"
|
||||
Me.lbl_court_number.Size = New System.Drawing.Size(70, 25)
|
||||
Me.lbl_court_number.TabIndex = 42
|
||||
Me.lbl_court_number.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_fighter
|
||||
'
|
||||
Me.lbl_blue_fighter.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_fighter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_fighter.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_fighter.Location = New System.Drawing.Point(425, 350)
|
||||
Me.lbl_blue_fighter.Name = "lbl_blue_fighter"
|
||||
Me.lbl_blue_fighter.Size = New System.Drawing.Size(170, 25)
|
||||
Me.lbl_blue_fighter.TabIndex = 46
|
||||
Me.lbl_blue_fighter.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_fighter
|
||||
'
|
||||
Me.lbl_red_fighter.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_fighter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_fighter.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_fighter.Location = New System.Drawing.Point(425, 380)
|
||||
Me.lbl_red_fighter.Name = "lbl_red_fighter"
|
||||
Me.lbl_red_fighter.Size = New System.Drawing.Size(170, 25)
|
||||
Me.lbl_red_fighter.TabIndex = 48
|
||||
Me.lbl_red_fighter.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_score
|
||||
'
|
||||
Me.lbl_blue_score.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_score.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_score.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_score.Location = New System.Drawing.Point(600, 350)
|
||||
Me.lbl_blue_score.Name = "lbl_blue_score"
|
||||
Me.lbl_blue_score.Size = New System.Drawing.Size(40, 25)
|
||||
Me.lbl_blue_score.TabIndex = 50
|
||||
Me.lbl_blue_score.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label21
|
||||
'
|
||||
Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label21.Location = New System.Drawing.Point(330, 440)
|
||||
Me.Label21.Name = "Label21"
|
||||
Me.Label21.Size = New System.Drawing.Size(90, 25)
|
||||
Me.Label21.TabIndex = 51
|
||||
Me.Label21.Text = "Winner :"
|
||||
Me.Label21.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lbl_winner
|
||||
'
|
||||
Me.lbl_winner.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_winner.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_winner.Location = New System.Drawing.Point(425, 440)
|
||||
Me.lbl_winner.Name = "lbl_winner"
|
||||
Me.lbl_winner.Size = New System.Drawing.Size(215, 25)
|
||||
Me.lbl_winner.TabIndex = 52
|
||||
Me.lbl_winner.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_score
|
||||
'
|
||||
Me.lbl_red_score.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_score.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_score.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_score.Location = New System.Drawing.Point(600, 380)
|
||||
Me.lbl_red_score.Name = "lbl_red_score"
|
||||
Me.lbl_red_score.Size = New System.Drawing.Size(40, 25)
|
||||
Me.lbl_red_score.TabIndex = 53
|
||||
Me.lbl_red_score.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label27
|
||||
'
|
||||
Me.Label27.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.Label27.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label27.Location = New System.Drawing.Point(330, 350)
|
||||
Me.Label27.Name = "Label27"
|
||||
Me.Label27.Size = New System.Drawing.Size(90, 25)
|
||||
Me.Label27.TabIndex = 54
|
||||
Me.Label27.Text = "Blue :"
|
||||
Me.Label27.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label28
|
||||
'
|
||||
Me.Label28.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.Label28.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label28.Location = New System.Drawing.Point(330, 380)
|
||||
Me.Label28.Name = "Label28"
|
||||
Me.Label28.Size = New System.Drawing.Size(90, 25)
|
||||
Me.Label28.TabIndex = 55
|
||||
Me.Label28.Text = "Red :"
|
||||
Me.Label28.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.BackColor = System.Drawing.Color.Black
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.Location = New System.Drawing.Point(285, 195)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(540, 25)
|
||||
Me.Label8.TabIndex = 56
|
||||
Me.Label8.Text = "< FIGHTING HISTORY >"
|
||||
Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.BackColor = System.Drawing.Color.Black
|
||||
Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label10.Location = New System.Drawing.Point(10, 55)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(265, 25)
|
||||
Me.Label10.TabIndex = 57
|
||||
Me.Label10.Text = "< SELECT A FIGHTER >"
|
||||
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label12.Location = New System.Drawing.Point(330, 410)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(90, 25)
|
||||
Me.Label12.TabIndex = 58
|
||||
Me.Label12.Text = "Referee :"
|
||||
Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lbl_rank
|
||||
'
|
||||
Me.lbl_rank.BackColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_rank.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_rank.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_rank.ForeColor = System.Drawing.Color.Black
|
||||
Me.lbl_rank.Location = New System.Drawing.Point(745, 160)
|
||||
Me.lbl_rank.Name = "lbl_rank"
|
||||
Me.lbl_rank.Size = New System.Drawing.Size(80, 25)
|
||||
Me.lbl_rank.TabIndex = 64
|
||||
Me.lbl_rank.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label22
|
||||
'
|
||||
Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label22.Location = New System.Drawing.Point(665, 160)
|
||||
Me.Label22.Name = "Label22"
|
||||
Me.Label22.Size = New System.Drawing.Size(75, 25)
|
||||
Me.Label22.TabIndex = 63
|
||||
Me.Label22.Text = "Points :"
|
||||
Me.Label22.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lbl_referee
|
||||
'
|
||||
Me.lbl_referee.BackColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_referee.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_referee.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_referee.ForeColor = System.Drawing.Color.Black
|
||||
Me.lbl_referee.Location = New System.Drawing.Point(425, 410)
|
||||
Me.lbl_referee.Name = "lbl_referee"
|
||||
Me.lbl_referee.Size = New System.Drawing.Size(170, 25)
|
||||
Me.lbl_referee.TabIndex = 66
|
||||
Me.lbl_referee.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'pb_referee_flag
|
||||
'
|
||||
Me.pb_referee_flag.BackColor = System.Drawing.Color.Yellow
|
||||
Me.pb_referee_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_referee_flag.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.pb_referee_flag.Location = New System.Drawing.Point(600, 410)
|
||||
Me.pb_referee_flag.Name = "pb_referee_flag"
|
||||
Me.pb_referee_flag.Size = New System.Drawing.Size(40, 25)
|
||||
Me.pb_referee_flag.TabIndex = 67
|
||||
Me.pb_referee_flag.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Button1.Location = New System.Drawing.Point(10, 10)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(80, 30)
|
||||
Me.Button1.TabIndex = 68
|
||||
Me.Button1.Text = "SEARCH"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lbl_last_weight
|
||||
'
|
||||
Me.lbl_last_weight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_last_weight.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_last_weight.Location = New System.Drawing.Point(565, 70)
|
||||
Me.lbl_last_weight.Name = "lbl_last_weight"
|
||||
Me.lbl_last_weight.Size = New System.Drawing.Size(95, 25)
|
||||
Me.lbl_last_weight.TabIndex = 69
|
||||
Me.lbl_last_weight.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Location = New System.Drawing.Point(450, 70)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(110, 25)
|
||||
Me.Label1.TabIndex = 70
|
||||
Me.Label1.Text = "Weight :"
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Location = New System.Drawing.Point(450, 160)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(110, 25)
|
||||
Me.Label2.TabIndex = 71
|
||||
Me.Label2.Text = "Class :"
|
||||
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lbl_weight_class
|
||||
'
|
||||
Me.lbl_weight_class.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_weight_class.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_weight_class.Location = New System.Drawing.Point(565, 160)
|
||||
Me.lbl_weight_class.Name = "lbl_weight_class"
|
||||
Me.lbl_weight_class.Size = New System.Drawing.Size(95, 25)
|
||||
Me.lbl_weight_class.TabIndex = 72
|
||||
Me.lbl_weight_class.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'pb_blue_logo
|
||||
'
|
||||
Me.pb_blue_logo.Location = New System.Drawing.Point(10, 350)
|
||||
Me.pb_blue_logo.Name = "pb_blue_logo"
|
||||
Me.pb_blue_logo.Size = New System.Drawing.Size(115, 115)
|
||||
Me.pb_blue_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_logo.TabIndex = 73
|
||||
Me.pb_blue_logo.TabStop = False
|
||||
'
|
||||
'pb_red_logo
|
||||
'
|
||||
Me.pb_red_logo.Location = New System.Drawing.Point(205, 350)
|
||||
Me.pb_red_logo.Name = "pb_red_logo"
|
||||
Me.pb_red_logo.Size = New System.Drawing.Size(115, 115)
|
||||
Me.pb_red_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_logo.TabIndex = 74
|
||||
Me.pb_red_logo.TabStop = False
|
||||
'
|
||||
'frm_fighter_statistics
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
|
||||
Me.ClientSize = New System.Drawing.Size(834, 471)
|
||||
Me.Controls.Add(Me.pb_red_logo)
|
||||
Me.Controls.Add(Me.pb_blue_logo)
|
||||
Me.Controls.Add(Me.lbl_weight_class)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.lbl_last_weight)
|
||||
Me.Controls.Add(Me.Button1)
|
||||
Me.Controls.Add(Me.pb_referee_flag)
|
||||
Me.Controls.Add(Me.lbl_referee)
|
||||
Me.Controls.Add(Me.lbl_rank)
|
||||
Me.Controls.Add(Me.Label22)
|
||||
Me.Controls.Add(Me.Label12)
|
||||
Me.Controls.Add(Me.Label28)
|
||||
Me.Controls.Add(Me.Label27)
|
||||
Me.Controls.Add(Me.lbl_red_score)
|
||||
Me.Controls.Add(Me.lbl_winner)
|
||||
Me.Controls.Add(Me.Label21)
|
||||
Me.Controls.Add(Me.lbl_blue_score)
|
||||
Me.Controls.Add(Me.lbl_red_fighter)
|
||||
Me.Controls.Add(Me.lbl_blue_fighter)
|
||||
Me.Controls.Add(Me.lbl_court_number)
|
||||
Me.Controls.Add(Me.Label13)
|
||||
Me.Controls.Add(Me.lbl_match_number)
|
||||
Me.Controls.Add(Me.Label11)
|
||||
Me.Controls.Add(Me.pb_flag)
|
||||
Me.Controls.Add(Me.btn_close)
|
||||
Me.Controls.Add(Me.btn_opponent)
|
||||
Me.Controls.Add(Me.btn_preview)
|
||||
Me.Controls.Add(Me.lbl_age)
|
||||
Me.Controls.Add(Me.Label20)
|
||||
Me.Controls.Add(Me.lst_matches)
|
||||
Me.Controls.Add(Me.Label19)
|
||||
Me.Controls.Add(Me.lbl_category)
|
||||
Me.Controls.Add(Me.lbl_loss)
|
||||
Me.Controls.Add(Me.lbl_wins)
|
||||
Me.Controls.Add(Me.lbl_nationality)
|
||||
Me.Controls.Add(Me.lbl_gender)
|
||||
Me.Controls.Add(Me.lbl_name)
|
||||
Me.Controls.Add(Me.Label7)
|
||||
Me.Controls.Add(Me.Label6)
|
||||
Me.Controls.Add(Me.Label4)
|
||||
Me.Controls.Add(Me.Label5)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.txt_search)
|
||||
Me.Controls.Add(Me.lst_fighters)
|
||||
Me.Controls.Add(Me.pb_fighter)
|
||||
Me.Controls.Add(Me.Label10)
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.ForeColor = System.Drawing.Color.White
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "frm_fighter_statistics"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "TAKEONE"
|
||||
CType(Me.pb_fighter, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents pb_fighter As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents lst_fighters As System.Windows.Forms.ListBox
|
||||
Friend WithEvents txt_search As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label7 As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_loss As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_wins As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_nationality As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_gender As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_name As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_category As System.Windows.Forms.Label
|
||||
Friend WithEvents Label19 As System.Windows.Forms.Label
|
||||
Friend WithEvents lst_matches As System.Windows.Forms.ListBox
|
||||
Friend WithEvents Label20 As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_age As System.Windows.Forms.Label
|
||||
Friend WithEvents btn_preview As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_opponent As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_close As System.Windows.Forms.Button
|
||||
Friend WithEvents pb_flag As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents Label11 As Label
|
||||
Friend WithEvents lbl_match_number As Label
|
||||
Friend WithEvents Label13 As Label
|
||||
Friend WithEvents lbl_court_number As Label
|
||||
Friend WithEvents lbl_blue_fighter As Label
|
||||
Friend WithEvents lbl_red_fighter As Label
|
||||
Friend WithEvents lbl_blue_score As Label
|
||||
Friend WithEvents Label21 As Label
|
||||
Friend WithEvents lbl_winner As Label
|
||||
Friend WithEvents lbl_red_score As Label
|
||||
Friend WithEvents Label27 As Label
|
||||
Friend WithEvents Label28 As Label
|
||||
Friend WithEvents Label8 As Label
|
||||
Friend WithEvents Label10 As Label
|
||||
Friend WithEvents Label12 As Label
|
||||
Friend WithEvents lbl_rank As Label
|
||||
Friend WithEvents Label22 As Label
|
||||
Friend WithEvents lbl_referee As Label
|
||||
Friend WithEvents pb_referee_flag As Label
|
||||
Friend WithEvents Button1 As Button
|
||||
Friend WithEvents lbl_last_weight As Label
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents lbl_weight_class As Label
|
||||
Friend WithEvents pb_blue_logo As PictureBox
|
||||
Friend WithEvents pb_red_logo As PictureBox
|
||||
End Class
|
||||
@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@ -0,0 +1,512 @@
|
||||
Imports System.ComponentModel
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
Public Class frm_fighter_statistics
|
||||
Private Sub frm_fighter_statistics_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
Me.Text = SelectedEvent.Title
|
||||
|
||||
Try
|
||||
list_fighters("", SelectedEvent.ID)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Load_Fighter_Data(FighterID As Integer)
|
||||
|
||||
Dim person As New person(FighterID)
|
||||
|
||||
lbl_age.Text = person.Age.Years
|
||||
lbl_gender.Text = person.Gender
|
||||
lbl_name.Text = person.FullName
|
||||
lbl_nationality.Text = person.Nationality.Name
|
||||
lbl_last_weight.Text = person.Weight.Weight & "Kg"
|
||||
lbl_category.Text = person.Weight.WeightCategory
|
||||
lbl_weight_class.Text = person.Weight.WeightClass
|
||||
|
||||
Try
|
||||
pb_fighter.Image = Image.FromStream(person.PICTURE)
|
||||
Catch ex As Exception
|
||||
pb_fighter.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_flag.Image = Image.FromStream(person.Team.Country.Flag)
|
||||
Catch ex As Exception
|
||||
pb_flag.Image = Nothing
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Load_Fighter_Matches(FighterID As Integer, EventID As Integer)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
/*-----------------------------------------------------
|
||||
THIS CODE IS FOR SEARCHING THE MATCHES
|
||||
FOR A FIGHTER BY HIS/HER ID NUMBER
|
||||
-----------------------------------------------------*/
|
||||
|
||||
SELECT
|
||||
event_matches.id as 'MatchID',
|
||||
event_matches.emn as 'MatchNo',
|
||||
event_matches.ern as 'EventRound',
|
||||
if(" & FighterID & " = blue.id, concat(red.fname, ' ', if(isnull(red.mname), '', red.mname), ' ', red.lname), concat(blue.fname, ' ', if(isnull(blue.mname), '', blue.mname), ' ', blue.lname)) as 'Opponent',
|
||||
if(" & FighterID & " = winner.id, 'WIN', 'LOSE') as 'Result'
|
||||
FROM
|
||||
event_matches
|
||||
LEFT JOIN
|
||||
person as winner ON winner.id = event_matches.winner
|
||||
LEFT JOIN
|
||||
clubs as winner_club ON winner_club.id = winner.club
|
||||
LEFT JOIN
|
||||
person as blue ON blue.id = event_matches.blue_fighter
|
||||
LEFT JOIN
|
||||
clubs as blue_club ON blue_club.id = blue.club
|
||||
LEFT JOIN
|
||||
person as red ON red.id = event_matches.red_fighter
|
||||
LEFT JOIN
|
||||
clubs as red_club ON red_club.id = red.club
|
||||
|
||||
Where
|
||||
(blue_fighter = " & FighterID & " or red_fighter = " & FighterID & ")
|
||||
and
|
||||
event_matches.started = true
|
||||
and
|
||||
event_matches.ended = true
|
||||
and
|
||||
event_matches.eid = " & EventID & "
|
||||
order by
|
||||
ern,
|
||||
emn
|
||||
asc
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
Dim MatchDisplayText As String = "Match No. " & Zero(RDR("MatchNo")) & ", Round " & RDR("EventRound") & ", " & RDR("Opponent") & " - " & RDR("Result")
|
||||
LST.Add(New dataset(RDR("MatchID"), MatchDisplayText))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
lst_matches.DataSource = LST
|
||||
lst_matches.ValueMember = "ID"
|
||||
lst_matches.DisplayMember = "name"
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Load_Fighter_Points(FighterID As Integer, EventID As Integer)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
/*-----------------------------------------------------
|
||||
THIS CODE IS FOR SEARCHING THE MATCH
|
||||
DATA OF WINS LOSSES AND COLLECTED POINTS
|
||||
-----------------------------------------------------*/
|
||||
|
||||
Select
|
||||
(select count(*) as WIN from event_matches inner join event on event_matches.eid = event.id where event_matches.eid = " & EventID & " And event_matches.started = true And event_matches.ended = true And (blue_fighter = " & FighterID & " Or red_fighter = " & FighterID & ") And winner = " & FighterID & ") as 'WIN',
|
||||
(select count(*) as WIN from event_matches inner join event on event_matches.eid = event.id where event_matches.eid = " & EventID & " And event_matches.started = true And event_matches.ended = true And (blue_fighter = " & FighterID & " Or red_fighter = " & FighterID & ") And winner != " & FighterID & ") as 'LOSS',
|
||||
(select count(*) as WIN from event_matches inner join event on event_matches.eid = event.id where event_matches.eid = " & EventID & " And event_matches.started = true And event_matches.ended = true And (blue_fighter = " & FighterID & " Or red_fighter = " & FighterID & ") And winner = " & FighterID & ") * 3 as 'POINTS'
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
lbl_wins.Text = RDR("WIN")
|
||||
lbl_loss.Text = RDR("LOSS")
|
||||
lbl_rank.Text = RDR("POINTS")
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Load_Match_Data(MatchID As Integer)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
/*-----------------------------------------------------
|
||||
THIS CODE IS FOR SEARCHING THE MATCH
|
||||
BY MATCH ID NUMBER
|
||||
-----------------------------------------------------*/
|
||||
|
||||
SELECT
|
||||
event_matches.id as 'MatchID',
|
||||
event_matches.ecn as 'Court',
|
||||
event_matches.emn as 'MatchNo',
|
||||
event_matches.ern as 'EventRound',
|
||||
concat(blue.fname, ' ', blue.mname, ' ', blue.lname) as 'BlueName',
|
||||
blue_club.title as 'BlueClub',
|
||||
blue_club.logo as 'BlueLogo',
|
||||
blue_score as 'BlueScore',
|
||||
blue_foul as 'BlueFoul',
|
||||
concat(red.fname, ' ', red.mname, ' ', red.lname) as 'RedName',
|
||||
red_club.title as 'RedClub',
|
||||
red_club.logo as 'RedLogo',
|
||||
red_score as 'RedScore',
|
||||
red_foul as 'RedFoul',
|
||||
concat(winner.fname, ' ', winner.mname, ' ', winner.lname) as 'Winner'
|
||||
FROM
|
||||
event_matches
|
||||
LEFT JOIN
|
||||
person as winner ON winner.id = event_matches.winner
|
||||
LEFT JOIN
|
||||
clubs as winner_club ON winner_club.id = winner.club
|
||||
LEFT JOIN
|
||||
person as blue ON blue.id = event_matches.blue_fighter
|
||||
LEFT JOIN
|
||||
clubs as blue_club ON blue_club.id = blue.club
|
||||
LEFT JOIN
|
||||
person as red ON red.id = event_matches.red_fighter
|
||||
LEFT JOIN
|
||||
clubs as red_club ON red_club.id = red.club
|
||||
|
||||
Where
|
||||
event_matches.started = true
|
||||
and
|
||||
event_matches.ended = true
|
||||
and
|
||||
event_matches.id = " & MatchID & "
|
||||
order by
|
||||
ern,
|
||||
emn
|
||||
asc
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
|
||||
Try
|
||||
lbl_match_number.Text = RDR("MatchNo")
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_court_number.Text = RDR("Court")
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_blue_fighter.Text = RDR("BlueName")
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_blue_score.Text = RDR("BlueScore")
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Try
|
||||
Dim data As Byte() = DirectCast(RDR("bluelogo"), Byte())
|
||||
Dim BlueLogo = New System.IO.MemoryStream(data)
|
||||
pb_blue_logo.Image = Image.FromStream(BlueLogo)
|
||||
Catch ex As Exception
|
||||
pb_blue_logo.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_red_fighter.Text = RDR("RedName")
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_red_score.Text = RDR("RedScore")
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Try
|
||||
Dim data As Byte() = DirectCast(RDR("redlogo"), Byte())
|
||||
Dim RedLogo = New System.IO.MemoryStream(data)
|
||||
pb_red_logo.Image = Image.FromStream(RedLogo)
|
||||
Catch ex As Exception
|
||||
pb_red_logo.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
lbl_winner.Text = RDR("Winner")
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub ClearList()
|
||||
|
||||
Try
|
||||
lst_fighters.DataSource = Nothing
|
||||
lst_fighters.Items.Clear()
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub txt_search_TextChanged(sender As Object, e As EventArgs) Handles txt_search.TextChanged
|
||||
|
||||
ClearList()
|
||||
|
||||
Try
|
||||
list_fighters(txt_search.Text, SelectedEvent.ID)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub lst_fighters_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lst_fighters.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
Load_Fighter_Data(lst_fighters.SelectedValue)
|
||||
Load_Fighter_Matches(lst_fighters.SelectedValue, SelectedEvent.ID)
|
||||
Load_Fighter_Points(lst_fighters.SelectedValue, SelectedEvent.ID)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_close_Click(sender As Object, e As EventArgs) Handles btn_close.Click
|
||||
|
||||
Me.Close()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_fighter_statistics_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
|
||||
|
||||
'frm_main.Show()
|
||||
frm_event_control.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub pb_fighter_Click(sender As Object, e As EventArgs) Handles pb_fighter.Click
|
||||
|
||||
If IsNothing(pb_fighter.Image) Then
|
||||
|
||||
' Open Picture File
|
||||
open_picture_file()
|
||||
|
||||
' Store The Picture
|
||||
update_fighter_picture()
|
||||
|
||||
ElseIf Not IsNothing(pb_fighter.Image) Then
|
||||
|
||||
Dim iPictureUpdate As DialogResult = MessageBox.Show("Would You Like To Update The Players Picture ?", "Picture Update", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
|
||||
If iPictureUpdate = DialogResult.Yes Then
|
||||
|
||||
' Open Picture File
|
||||
open_picture_file()
|
||||
|
||||
' Store The Picture
|
||||
update_fighter_picture()
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub open_picture_file()
|
||||
|
||||
'Creating A New Dialog
|
||||
Dim OpenPictureFile As New OpenFileDialog
|
||||
|
||||
'Filtering The Types
|
||||
OpenPictureFile.Filter = "Image Files | *.jpg; *.jpeg; *.bmp; *.png; *.gif;"
|
||||
|
||||
'Openning The File
|
||||
If OpenPictureFile.ShowDialog = System.Windows.Forms.DialogResult.OK Then
|
||||
|
||||
Try
|
||||
' Getting File Path
|
||||
Dim FilePath As String = OpenPictureFile.FileName()
|
||||
Dim FileName As String = System.IO.Path.GetFileName(OpenPictureFile.FileName)
|
||||
|
||||
' Picture File
|
||||
Dim Picture As New MemoryStream
|
||||
|
||||
' Define New Image Size
|
||||
Dim LogoSize As New Size(385, 500)
|
||||
|
||||
' Resizing The Image
|
||||
Dim ResizedImage = New Bitmap(Image.FromFile(FilePath), LogoSize)
|
||||
|
||||
' Display The Image
|
||||
pb_fighter.Image = ResizedImage
|
||||
|
||||
' Saving The Image As PNG Format
|
||||
pb_fighter.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
|
||||
' Read The Image As Bytes
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
|
||||
' Closing The Picture
|
||||
Picture.Close()
|
||||
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub update_fighter_picture()
|
||||
|
||||
' Query To Update
|
||||
Dim QRY As String = "update person set picture = @picture where id=" & lst_fighters.SelectedValue
|
||||
|
||||
' Connection
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
' Preparing The Image
|
||||
Dim Picture As New MemoryStream
|
||||
pb_fighter.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
Picture.Close()
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.Parameters.AddWithValue("@picture", arrImage)
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Function Zero(Number As Integer) As String
|
||||
|
||||
If Number >= 0 And Number < 10 Then
|
||||
|
||||
Return "00" & Number
|
||||
|
||||
ElseIf Number >= 10 And Number < 100 Then
|
||||
|
||||
Return "0" & Number
|
||||
|
||||
Else
|
||||
|
||||
Return Number
|
||||
|
||||
End If
|
||||
|
||||
End Function
|
||||
|
||||
Private Sub list_fighters(filter As String, eventID As Integer)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
select
|
||||
distinct
|
||||
person.id, concat(person.fname, if(isnull(person.mname), '', concat(' ', person.mname)), ' ', person.lname) as name
|
||||
from
|
||||
person
|
||||
left join
|
||||
event_matches on (person.id = coalesce(event_matches.blue_fighter, 0) or person.id = coalesce(event_matches.red_fighter, 0))
|
||||
where
|
||||
concat(fname, if(isnull(mname), '', concat(' ', mname)), ' ', lname) like '%" & filter & "%'
|
||||
and
|
||||
event_matches.eid = " & eventID & "
|
||||
order by
|
||||
fname,
|
||||
mname,
|
||||
lname
|
||||
asc
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("id"), RDR("name")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
lst_fighters.DataSource = LST
|
||||
lst_fighters.ValueMember = "ID"
|
||||
lst_fighters.DisplayMember = "name"
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub lst_matches_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lst_matches.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
Load_Match_Data(lst_matches.SelectedValue)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
146
Visual Studio Code/Timer Library/forms/event/frm_match_fighters.Designer.vb
generated
Normal file
@ -0,0 +1,146 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_match_fighters
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frm_match_fighters))
|
||||
Me.pb_blue_picture = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_red_picture = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_blue_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_red_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_blue_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_red_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_court_number = New System.Windows.Forms.Label()
|
||||
CType(Me.pb_blue_picture, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_picture, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'pb_blue_picture
|
||||
'
|
||||
Me.pb_blue_picture.Image = CType(resources.GetObject("pb_blue_picture.Image"), System.Drawing.Image)
|
||||
Me.pb_blue_picture.Location = New System.Drawing.Point(5, 5)
|
||||
Me.pb_blue_picture.Name = "pb_blue_picture"
|
||||
Me.pb_blue_picture.Size = New System.Drawing.Size(395, 470)
|
||||
Me.pb_blue_picture.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_picture.TabIndex = 0
|
||||
Me.pb_blue_picture.TabStop = False
|
||||
'
|
||||
'pb_red_picture
|
||||
'
|
||||
Me.pb_red_picture.Image = CType(resources.GetObject("pb_red_picture.Image"), System.Drawing.Image)
|
||||
Me.pb_red_picture.Location = New System.Drawing.Point(435, 5)
|
||||
Me.pb_red_picture.Name = "pb_red_picture"
|
||||
Me.pb_red_picture.Size = New System.Drawing.Size(395, 470)
|
||||
Me.pb_red_picture.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_picture.TabIndex = 1
|
||||
Me.pb_red_picture.TabStop = False
|
||||
'
|
||||
'pb_blue_flag
|
||||
'
|
||||
Me.pb_blue_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_blue_flag.Location = New System.Drawing.Point(15, 405)
|
||||
Me.pb_blue_flag.Name = "pb_blue_flag"
|
||||
Me.pb_blue_flag.Size = New System.Drawing.Size(105, 60)
|
||||
Me.pb_blue_flag.TabIndex = 2
|
||||
Me.pb_blue_flag.TabStop = False
|
||||
'
|
||||
'pb_red_flag
|
||||
'
|
||||
Me.pb_red_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_red_flag.Location = New System.Drawing.Point(715, 405)
|
||||
Me.pb_red_flag.Name = "pb_red_flag"
|
||||
Me.pb_red_flag.Size = New System.Drawing.Size(105, 60)
|
||||
Me.pb_red_flag.TabIndex = 3
|
||||
Me.pb_red_flag.TabStop = False
|
||||
'
|
||||
'pb_blue_logo
|
||||
'
|
||||
Me.pb_blue_logo.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_blue_logo.Location = New System.Drawing.Point(290, 365)
|
||||
Me.pb_blue_logo.Name = "pb_blue_logo"
|
||||
Me.pb_blue_logo.Size = New System.Drawing.Size(100, 100)
|
||||
Me.pb_blue_logo.TabIndex = 4
|
||||
Me.pb_blue_logo.TabStop = False
|
||||
'
|
||||
'pb_red_logo
|
||||
'
|
||||
Me.pb_red_logo.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_red_logo.Location = New System.Drawing.Point(445, 365)
|
||||
Me.pb_red_logo.Name = "pb_red_logo"
|
||||
Me.pb_red_logo.Size = New System.Drawing.Size(100, 100)
|
||||
Me.pb_red_logo.TabIndex = 5
|
||||
Me.pb_red_logo.TabStop = False
|
||||
'
|
||||
'lbl_court_number
|
||||
'
|
||||
Me.lbl_court_number.BackColor = System.Drawing.Color.Transparent
|
||||
Me.lbl_court_number.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_court_number.Font = New System.Drawing.Font("Microsoft Sans Serif", 75.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_court_number.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_court_number.Location = New System.Drawing.Point(315, 170)
|
||||
Me.lbl_court_number.Name = "lbl_court_number"
|
||||
Me.lbl_court_number.Size = New System.Drawing.Size(205, 80)
|
||||
Me.lbl_court_number.TabIndex = 22
|
||||
Me.lbl_court_number.Text = "VS"
|
||||
Me.lbl_court_number.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'frm_match_fighters
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(834, 481)
|
||||
Me.Controls.Add(Me.lbl_court_number)
|
||||
Me.Controls.Add(Me.pb_red_logo)
|
||||
Me.Controls.Add(Me.pb_blue_logo)
|
||||
Me.Controls.Add(Me.pb_red_flag)
|
||||
Me.Controls.Add(Me.pb_blue_flag)
|
||||
Me.Controls.Add(Me.pb_red_picture)
|
||||
Me.Controls.Add(Me.pb_blue_picture)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "frm_match_fighters"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "frm_match_fighters"
|
||||
CType(Me.pb_blue_picture, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_picture, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents pb_blue_picture As PictureBox
|
||||
Friend WithEvents pb_red_picture As PictureBox
|
||||
Friend WithEvents pb_blue_flag As PictureBox
|
||||
Friend WithEvents pb_red_flag As PictureBox
|
||||
Friend WithEvents pb_blue_logo As PictureBox
|
||||
Friend WithEvents pb_red_logo As PictureBox
|
||||
Friend WithEvents lbl_court_number As Label
|
||||
End Class
|
||||
3628
Visual Studio Code/Timer Library/forms/event/frm_match_fighters.resx
Normal file
@ -0,0 +1,3 @@
|
||||
Public Class frm_match_fighters
|
||||
|
||||
End Class
|
||||
133
Visual Studio Code/Timer Library/forms/event/frm_ranking.Designer.vb
generated
Normal file
@ -0,0 +1,133 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_ranking
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.cbo_display_type = New System.Windows.Forms.ComboBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.lst_type = New System.Windows.Forms.ListBox()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.lst_results = New System.Windows.Forms.ListBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'cbo_display_type
|
||||
'
|
||||
Me.cbo_display_type.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cbo_display_type.FormattingEnabled = True
|
||||
Me.cbo_display_type.Items.AddRange(New Object() {"Players", "Clubs"})
|
||||
Me.cbo_display_type.Location = New System.Drawing.Point(110, 10)
|
||||
Me.cbo_display_type.Name = "cbo_display_type"
|
||||
Me.cbo_display_type.Size = New System.Drawing.Size(190, 28)
|
||||
Me.cbo_display_type.TabIndex = 0
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label1.Font = New System.Drawing.Font("Arial Rounded MT Bold", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.ForeColor = System.Drawing.Color.White
|
||||
Me.Label1.Location = New System.Drawing.Point(10, 10)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(95, 30)
|
||||
Me.Label1.TabIndex = 28
|
||||
Me.Label1.Text = "Display :"
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'lst_type
|
||||
'
|
||||
Me.lst_type.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lst_type.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lst_type.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lst_type.ForeColor = System.Drawing.Color.White
|
||||
Me.lst_type.FormattingEnabled = True
|
||||
Me.lst_type.ItemHeight = 20
|
||||
Me.lst_type.Location = New System.Drawing.Point(10, 80)
|
||||
Me.lst_type.Name = "lst_type"
|
||||
Me.lst_type.Size = New System.Drawing.Size(290, 382)
|
||||
Me.lst_type.TabIndex = 55
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.BackColor = System.Drawing.Color.Black
|
||||
Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label10.ForeColor = System.Drawing.Color.White
|
||||
Me.Label10.Location = New System.Drawing.Point(10, 50)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(290, 30)
|
||||
Me.Label10.TabIndex = 85
|
||||
Me.Label10.Text = "< SELECT FROM LIST >"
|
||||
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lst_results
|
||||
'
|
||||
Me.lst_results.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lst_results.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lst_results.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lst_results.ForeColor = System.Drawing.Color.White
|
||||
Me.lst_results.FormattingEnabled = True
|
||||
Me.lst_results.ItemHeight = 20
|
||||
Me.lst_results.Location = New System.Drawing.Point(310, 40)
|
||||
Me.lst_results.MultiColumn = True
|
||||
Me.lst_results.Name = "lst_results"
|
||||
Me.lst_results.Size = New System.Drawing.Size(510, 422)
|
||||
Me.lst_results.TabIndex = 86
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.BackColor = System.Drawing.Color.Black
|
||||
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.ForeColor = System.Drawing.Color.White
|
||||
Me.Label2.Location = New System.Drawing.Point(310, 10)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(510, 30)
|
||||
Me.Label2.TabIndex = 87
|
||||
Me.Label2.Text = "< LIST FROM FIRST TO LAST >"
|
||||
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'frm_ranking
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(834, 471)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
Me.Controls.Add(Me.lst_results)
|
||||
Me.Controls.Add(Me.Label10)
|
||||
Me.Controls.Add(Me.lst_type)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.cbo_display_type)
|
||||
Me.ForeColor = System.Drawing.Color.White
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
|
||||
Me.Name = "frm_ranking"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Event Ranking & Results"
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents cbo_display_type As ComboBox
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents lst_type As ListBox
|
||||
Friend WithEvents Label10 As Label
|
||||
Friend WithEvents lst_results As ListBox
|
||||
Friend WithEvents Label2 As Label
|
||||
End Class
|
||||
120
Visual Studio Code/Timer Library/forms/event/frm_ranking.resx
Normal file
@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
68
Visual Studio Code/Timer Library/forms/event/frm_ranking.vb
Normal file
@ -0,0 +1,68 @@
|
||||
Imports System.ComponentModel
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class frm_ranking
|
||||
Private Sub frm_ranking_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
|
||||
|
||||
frm_event_control.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_ranking_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
|
||||
cbo_display_type.SelectedIndex = 0
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_display_type_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_display_type.SelectedIndexChanged
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub list_weight_classes(eventID As Integer)
|
||||
|
||||
Dim QRY As String = ("
|
||||
|
||||
select
|
||||
distinct
|
||||
person.gender, person.category, person.weight_class
|
||||
from
|
||||
person
|
||||
left join
|
||||
event_matches on (person.id = coalesce(event_matches.blue_fighter, 0) or person.id = coalesce(event_matches.red_fighter, 0))
|
||||
where
|
||||
event_matches.eid = " & eventID & "
|
||||
order by
|
||||
category,
|
||||
gender,
|
||||
weight_class
|
||||
asc
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("weight_class"), RDR("category")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
lst_type.DataSource = LST
|
||||
lst_type.ValueMember = "ID"
|
||||
lst_type.DisplayMember = "name"
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
391
Visual Studio Code/Timer Library/forms/event/frm_scoreboard.Designer.vb
generated
Normal file
@ -0,0 +1,391 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_scoreboard
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.lbl_round = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_gfaul = New System.Windows.Forms.Label()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_code_3 = New System.Windows.Forms.Label()
|
||||
Me.lbl_match_number = New System.Windows.Forms.Label()
|
||||
Me.lbl_time = New System.Windows.Forms.Label()
|
||||
Me.lbl_court_number = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_team = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_score = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_fighter_name = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_gfaul = New System.Windows.Forms.Label()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_code_3 = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_team = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_score = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_fighter_name = New System.Windows.Forms.Label()
|
||||
Me.pb_red_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_blue_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_red_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_blue_flag = New System.Windows.Forms.PictureBox()
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbl_round
|
||||
'
|
||||
Me.lbl_round.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_round.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lbl_round.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_round.Font = New System.Drawing.Font("Microsoft Sans Serif", 48.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_round.ForeColor = System.Drawing.Color.Lime
|
||||
Me.lbl_round.Location = New System.Drawing.Point(435, 370)
|
||||
Me.lbl_round.Name = "lbl_round"
|
||||
Me.lbl_round.Size = New System.Drawing.Size(90, 95)
|
||||
Me.lbl_round.TabIndex = 100
|
||||
Me.lbl_round.Text = "1"
|
||||
Me.lbl_round.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_gfaul
|
||||
'
|
||||
Me.lbl_red_gfaul.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_red_gfaul.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_gfaul.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_gfaul.Font = New System.Drawing.Font("Microsoft Sans Serif", 52.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_gfaul.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_gfaul.Location = New System.Drawing.Point(840, 395)
|
||||
Me.lbl_red_gfaul.Name = "lbl_red_gfaul"
|
||||
Me.lbl_red_gfaul.Size = New System.Drawing.Size(115, 85)
|
||||
Me.lbl_red_gfaul.TabIndex = 98
|
||||
Me.lbl_red_gfaul.Text = "00"
|
||||
Me.lbl_red_gfaul.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Label5.ForeColor = System.Drawing.Color.White
|
||||
Me.Label5.Location = New System.Drawing.Point(840, 345)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(115, 45)
|
||||
Me.Label5.TabIndex = 97
|
||||
Me.Label5.Text = "GFOUL"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_code_3
|
||||
'
|
||||
Me.lbl_red_code_3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_red_code_3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_code_3.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_code_3.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_code_3.Location = New System.Drawing.Point(5, 90)
|
||||
Me.lbl_red_code_3.Name = "lbl_red_code_3"
|
||||
Me.lbl_red_code_3.Size = New System.Drawing.Size(115, 50)
|
||||
Me.lbl_red_code_3.TabIndex = 96
|
||||
Me.lbl_red_code_3.Text = "CTRY"
|
||||
Me.lbl_red_code_3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_match_number
|
||||
'
|
||||
Me.lbl_match_number.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_match_number.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_match_number.Font = New System.Drawing.Font("Microsoft Sans Serif", 75.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_match_number.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_match_number.Location = New System.Drawing.Point(635, 5)
|
||||
Me.lbl_match_number.Name = "lbl_match_number"
|
||||
Me.lbl_match_number.Size = New System.Drawing.Size(320, 80)
|
||||
Me.lbl_match_number.TabIndex = 87
|
||||
Me.lbl_match_number.Text = "M000"
|
||||
Me.lbl_match_number.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_time
|
||||
'
|
||||
Me.lbl_time.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_time.Font = New System.Drawing.Font("Microsoft Sans Serif", 85.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_time.ForeColor = System.Drawing.Color.Lime
|
||||
Me.lbl_time.Location = New System.Drawing.Point(330, 0)
|
||||
Me.lbl_time.Name = "lbl_time"
|
||||
Me.lbl_time.Size = New System.Drawing.Size(300, 90)
|
||||
Me.lbl_time.TabIndex = 86
|
||||
Me.lbl_time.Text = "00:00"
|
||||
Me.lbl_time.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_court_number
|
||||
'
|
||||
Me.lbl_court_number.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_court_number.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_court_number.Font = New System.Drawing.Font("Microsoft Sans Serif", 75.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_court_number.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_court_number.Location = New System.Drawing.Point(5, 5)
|
||||
Me.lbl_court_number.Name = "lbl_court_number"
|
||||
Me.lbl_court_number.Size = New System.Drawing.Size(320, 80)
|
||||
Me.lbl_court_number.TabIndex = 85
|
||||
Me.lbl_court_number.Text = "C000"
|
||||
Me.lbl_court_number.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_team
|
||||
'
|
||||
Me.lbl_red_team.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_red_team.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_team.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_team.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_team.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_team.Location = New System.Drawing.Point(485, 485)
|
||||
Me.lbl_red_team.Name = "lbl_red_team"
|
||||
Me.lbl_red_team.Size = New System.Drawing.Size(470, 50)
|
||||
Me.lbl_red_team.TabIndex = 84
|
||||
Me.lbl_red_team.Text = "BLUE TEAM"
|
||||
Me.lbl_red_team.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_score
|
||||
'
|
||||
Me.lbl_red_score.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_red_score.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_score.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_score.Font = New System.Drawing.Font("Microsoft Sans Serif", 170.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_score.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_score.Location = New System.Drawing.Point(485, 145)
|
||||
Me.lbl_red_score.Name = "lbl_red_score"
|
||||
Me.lbl_red_score.Size = New System.Drawing.Size(350, 335)
|
||||
Me.lbl_red_score.TabIndex = 83
|
||||
Me.lbl_red_score.Text = "00"
|
||||
Me.lbl_red_score.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_fighter_name
|
||||
'
|
||||
Me.lbl_red_fighter_name.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_red_fighter_name.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_fighter_name.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_fighter_name.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_fighter_name.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_fighter_name.Location = New System.Drawing.Point(485, 90)
|
||||
Me.lbl_red_fighter_name.Name = "lbl_red_fighter_name"
|
||||
Me.lbl_red_fighter_name.Size = New System.Drawing.Size(350, 50)
|
||||
Me.lbl_red_fighter_name.TabIndex = 82
|
||||
Me.lbl_red_fighter_name.Text = "RED FIGHTER"
|
||||
Me.lbl_red_fighter_name.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_gfaul
|
||||
'
|
||||
Me.lbl_blue_gfaul.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_blue_gfaul.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_gfaul.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_gfaul.Font = New System.Drawing.Font("Microsoft Sans Serif", 52.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_gfaul.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_gfaul.Location = New System.Drawing.Point(5, 395)
|
||||
Me.lbl_blue_gfaul.Name = "lbl_blue_gfaul"
|
||||
Me.lbl_blue_gfaul.Size = New System.Drawing.Size(115, 85)
|
||||
Me.lbl_blue_gfaul.TabIndex = 80
|
||||
Me.lbl_blue_gfaul.Text = "00"
|
||||
Me.lbl_blue_gfaul.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Label11.ForeColor = System.Drawing.Color.White
|
||||
Me.Label11.Location = New System.Drawing.Point(5, 345)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(115, 45)
|
||||
Me.Label11.TabIndex = 79
|
||||
Me.Label11.Text = "GFOUL"
|
||||
Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_code_3
|
||||
'
|
||||
Me.lbl_blue_code_3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_blue_code_3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_code_3.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_code_3.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_code_3.Location = New System.Drawing.Point(840, 90)
|
||||
Me.lbl_blue_code_3.Name = "lbl_blue_code_3"
|
||||
Me.lbl_blue_code_3.Size = New System.Drawing.Size(115, 50)
|
||||
Me.lbl_blue_code_3.TabIndex = 78
|
||||
Me.lbl_blue_code_3.Text = "CTRY"
|
||||
Me.lbl_blue_code_3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_team
|
||||
'
|
||||
Me.lbl_blue_team.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_blue_team.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_team.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_team.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_team.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_team.Location = New System.Drawing.Point(5, 485)
|
||||
Me.lbl_blue_team.Name = "lbl_blue_team"
|
||||
Me.lbl_blue_team.Size = New System.Drawing.Size(470, 50)
|
||||
Me.lbl_blue_team.TabIndex = 77
|
||||
Me.lbl_blue_team.Text = "BLUE TEAM"
|
||||
Me.lbl_blue_team.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_score
|
||||
'
|
||||
Me.lbl_blue_score.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_blue_score.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_score.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_score.Font = New System.Drawing.Font("Microsoft Sans Serif", 170.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_score.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_score.Location = New System.Drawing.Point(125, 145)
|
||||
Me.lbl_blue_score.Name = "lbl_blue_score"
|
||||
Me.lbl_blue_score.Size = New System.Drawing.Size(350, 335)
|
||||
Me.lbl_blue_score.TabIndex = 76
|
||||
Me.lbl_blue_score.Text = "00"
|
||||
Me.lbl_blue_score.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_fighter_name
|
||||
'
|
||||
Me.lbl_blue_fighter_name.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_blue_fighter_name.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_fighter_name.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_fighter_name.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_fighter_name.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_fighter_name.Location = New System.Drawing.Point(125, 90)
|
||||
Me.lbl_blue_fighter_name.Name = "lbl_blue_fighter_name"
|
||||
Me.lbl_blue_fighter_name.Size = New System.Drawing.Size(350, 50)
|
||||
Me.lbl_blue_fighter_name.TabIndex = 75
|
||||
Me.lbl_blue_fighter_name.Text = "BLUE FIGHTER"
|
||||
Me.lbl_blue_fighter_name.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'pb_red_logo
|
||||
'
|
||||
Me.pb_red_logo.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.pb_red_logo.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_red_logo.Location = New System.Drawing.Point(5, 225)
|
||||
Me.pb_red_logo.Name = "pb_red_logo"
|
||||
Me.pb_red_logo.Size = New System.Drawing.Size(115, 115)
|
||||
Me.pb_red_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_logo.TabIndex = 116
|
||||
Me.pb_red_logo.TabStop = False
|
||||
'
|
||||
'pb_blue_logo
|
||||
'
|
||||
Me.pb_blue_logo.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.pb_blue_logo.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_blue_logo.Location = New System.Drawing.Point(840, 225)
|
||||
Me.pb_blue_logo.Name = "pb_blue_logo"
|
||||
Me.pb_blue_logo.Size = New System.Drawing.Size(115, 115)
|
||||
Me.pb_blue_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_logo.TabIndex = 115
|
||||
Me.pb_blue_logo.TabStop = False
|
||||
'
|
||||
'pb_red_flag
|
||||
'
|
||||
Me.pb_red_flag.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.pb_red_flag.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_red_flag.Location = New System.Drawing.Point(5, 145)
|
||||
Me.pb_red_flag.Name = "pb_red_flag"
|
||||
Me.pb_red_flag.Size = New System.Drawing.Size(115, 75)
|
||||
Me.pb_red_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_flag.TabIndex = 99
|
||||
Me.pb_red_flag.TabStop = False
|
||||
'
|
||||
'pb_blue_flag
|
||||
'
|
||||
Me.pb_blue_flag.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.pb_blue_flag.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_blue_flag.Location = New System.Drawing.Point(840, 145)
|
||||
Me.pb_blue_flag.Name = "pb_blue_flag"
|
||||
Me.pb_blue_flag.Size = New System.Drawing.Size(115, 75)
|
||||
Me.pb_blue_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_flag.TabIndex = 81
|
||||
Me.pb_blue_flag.TabStop = False
|
||||
'
|
||||
'frm_scoreboard
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(16.0!, 31.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(960, 540)
|
||||
Me.Controls.Add(Me.lbl_round)
|
||||
Me.Controls.Add(Me.pb_red_logo)
|
||||
Me.Controls.Add(Me.pb_blue_logo)
|
||||
Me.Controls.Add(Me.pb_red_flag)
|
||||
Me.Controls.Add(Me.lbl_red_gfaul)
|
||||
Me.Controls.Add(Me.Label5)
|
||||
Me.Controls.Add(Me.lbl_red_code_3)
|
||||
Me.Controls.Add(Me.lbl_match_number)
|
||||
Me.Controls.Add(Me.lbl_time)
|
||||
Me.Controls.Add(Me.lbl_court_number)
|
||||
Me.Controls.Add(Me.lbl_red_team)
|
||||
Me.Controls.Add(Me.lbl_red_score)
|
||||
Me.Controls.Add(Me.lbl_red_fighter_name)
|
||||
Me.Controls.Add(Me.pb_blue_flag)
|
||||
Me.Controls.Add(Me.lbl_blue_gfaul)
|
||||
Me.Controls.Add(Me.Label11)
|
||||
Me.Controls.Add(Me.lbl_blue_code_3)
|
||||
Me.Controls.Add(Me.lbl_blue_team)
|
||||
Me.Controls.Add(Me.lbl_blue_score)
|
||||
Me.Controls.Add(Me.lbl_blue_fighter_name)
|
||||
Me.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ForeColor = System.Drawing.Color.White
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
Me.Margin = New System.Windows.Forms.Padding(5, 7, 5, 7)
|
||||
Me.Name = "frm_scoreboard"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "frm_scoreboard"
|
||||
Me.WindowState = System.Windows.Forms.FormWindowState.Maximized
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents pb_red_logo As PictureBox
|
||||
Friend WithEvents pb_blue_logo As PictureBox
|
||||
Friend WithEvents lbl_round As Label
|
||||
Friend WithEvents pb_red_flag As PictureBox
|
||||
Friend WithEvents lbl_red_gfaul As Label
|
||||
Friend WithEvents Label5 As Label
|
||||
Friend WithEvents lbl_red_code_3 As Label
|
||||
Friend WithEvents lbl_match_number As Label
|
||||
Friend WithEvents lbl_time As Label
|
||||
Friend WithEvents lbl_court_number As Label
|
||||
Friend WithEvents lbl_red_team As Label
|
||||
Friend WithEvents lbl_red_score As Label
|
||||
Friend WithEvents lbl_red_fighter_name As Label
|
||||
Friend WithEvents pb_blue_flag As PictureBox
|
||||
Friend WithEvents lbl_blue_gfaul As Label
|
||||
Friend WithEvents Label11 As Label
|
||||
Friend WithEvents lbl_blue_code_3 As Label
|
||||
Friend WithEvents lbl_blue_team As Label
|
||||
Friend WithEvents lbl_blue_score As Label
|
||||
Friend WithEvents lbl_blue_fighter_name As Label
|
||||
End Class
|
||||
120
Visual Studio Code/Timer Library/forms/event/frm_scoreboard.resx
Normal file
@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@ -0,0 +1,9 @@
|
||||
Public Class frm_scoreboard
|
||||
Private Sub lbl_red_code_3_Click(sender As Object, e As EventArgs) Handles lbl_red_code_3.Click
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_scoreboard_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
832
Visual Studio Code/Timer Library/forms/event/frm_scorecontrol.designer.vb
generated
Normal file
@ -0,0 +1,832 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class frm_scorecontrol
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Me.lbl_blue_fighter_name = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_score = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_team = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_code_3 = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_gamjum = New System.Windows.Forms.Label()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.pb_blue_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_red_team = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_score = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_fighter_name = New System.Windows.Forms.Label()
|
||||
Me.lbl_court_number = New System.Windows.Forms.Label()
|
||||
Me.lbl_time = New System.Windows.Forms.Label()
|
||||
Me.lbl_match_number = New System.Windows.Forms.Label()
|
||||
Me.btn_blue_shkp = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_shkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_dhkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_dhkp = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_sbkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_sbkp = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_dbkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_dbkp = New System.Windows.Forms.Button()
|
||||
Me.pb_red_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_red_gamjum = New System.Windows.Forms.Label()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_code_3 = New System.Windows.Forms.Label()
|
||||
Me.lbl_round = New System.Windows.Forms.Label()
|
||||
Me.btn_red_dhkn = New System.Windows.Forms.Button()
|
||||
Me.btn_red_dhkp = New System.Windows.Forms.Button()
|
||||
Me.btn_red_sbkn = New System.Windows.Forms.Button()
|
||||
Me.btn_red_sbkp = New System.Windows.Forms.Button()
|
||||
Me.btn_red_dbkn = New System.Windows.Forms.Button()
|
||||
Me.btn_red_dbkp = New System.Windows.Forms.Button()
|
||||
Me.btn_red_shkn = New System.Windows.Forms.Button()
|
||||
Me.btn_red_shkp = New System.Windows.Forms.Button()
|
||||
Me.tmr_display = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.btn_start = New System.Windows.Forms.Button()
|
||||
Me.btn_end = New System.Windows.Forms.Button()
|
||||
Me.round_countdown = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.btn_blue_ngf = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_pgf = New System.Windows.Forms.Button()
|
||||
Me.btn_red_ngf = New System.Windows.Forms.Button()
|
||||
Me.btn_red_pgf = New System.Windows.Forms.Button()
|
||||
Me.break_countdown = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.pb_blue_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_red_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.btn_dec_match = New System.Windows.Forms.Button()
|
||||
Me.btn_inc_match = New System.Windows.Forms.Button()
|
||||
Me.lbl_blue_weight_class = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_weight_class = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_weight_category = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_weight_category = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_gender = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_gender = New System.Windows.Forms.Label()
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbl_blue_fighter_name
|
||||
'
|
||||
Me.lbl_blue_fighter_name.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_fighter_name.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_fighter_name.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_fighter_name.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_fighter_name.Location = New System.Drawing.Point(100, 90)
|
||||
Me.lbl_blue_fighter_name.Name = "lbl_blue_fighter_name"
|
||||
Me.lbl_blue_fighter_name.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_blue_fighter_name.TabIndex = 0
|
||||
Me.lbl_blue_fighter_name.Text = "BLUE FIGHTER"
|
||||
Me.lbl_blue_fighter_name.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_score
|
||||
'
|
||||
Me.lbl_blue_score.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_score.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_score.Font = New System.Drawing.Font("Microsoft Sans Serif", 170.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_score.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_score.Location = New System.Drawing.Point(100, 135)
|
||||
Me.lbl_blue_score.Name = "lbl_blue_score"
|
||||
Me.lbl_blue_score.Size = New System.Drawing.Size(315, 235)
|
||||
Me.lbl_blue_score.TabIndex = 0
|
||||
Me.lbl_blue_score.Text = "00"
|
||||
Me.lbl_blue_score.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_team
|
||||
'
|
||||
Me.lbl_blue_team.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_team.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_team.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_team.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_team.Location = New System.Drawing.Point(100, 375)
|
||||
Me.lbl_blue_team.Name = "lbl_blue_team"
|
||||
Me.lbl_blue_team.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_blue_team.TabIndex = 2
|
||||
Me.lbl_blue_team.Text = "BLUE TEAM"
|
||||
Me.lbl_blue_team.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_code_3
|
||||
'
|
||||
Me.lbl_blue_code_3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_code_3.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_code_3.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_code_3.Location = New System.Drawing.Point(5, 90)
|
||||
Me.lbl_blue_code_3.Name = "lbl_blue_code_3"
|
||||
Me.lbl_blue_code_3.Size = New System.Drawing.Size(90, 40)
|
||||
Me.lbl_blue_code_3.TabIndex = 6
|
||||
Me.lbl_blue_code_3.Text = "ISO3"
|
||||
Me.lbl_blue_code_3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_gamjum
|
||||
'
|
||||
Me.lbl_blue_gamjum.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_gamjum.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_gamjum.Font = New System.Drawing.Font("Microsoft Sans Serif", 52.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_gamjum.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_gamjum.Location = New System.Drawing.Point(5, 340)
|
||||
Me.lbl_blue_gamjum.Name = "lbl_blue_gamjum"
|
||||
Me.lbl_blue_gamjum.Size = New System.Drawing.Size(90, 75)
|
||||
Me.lbl_blue_gamjum.TabIndex = 10
|
||||
Me.lbl_blue_gamjum.Text = "00"
|
||||
Me.lbl_blue_gamjum.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label11.ForeColor = System.Drawing.Color.White
|
||||
Me.Label11.Location = New System.Drawing.Point(5, 295)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(90, 40)
|
||||
Me.Label11.TabIndex = 9
|
||||
Me.Label11.Text = "GAMJUM"
|
||||
Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'pb_blue_flag
|
||||
'
|
||||
Me.pb_blue_flag.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_blue_flag.Location = New System.Drawing.Point(5, 135)
|
||||
Me.pb_blue_flag.Name = "pb_blue_flag"
|
||||
Me.pb_blue_flag.Size = New System.Drawing.Size(90, 60)
|
||||
Me.pb_blue_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_flag.TabIndex = 11
|
||||
Me.pb_blue_flag.TabStop = False
|
||||
'
|
||||
'lbl_red_team
|
||||
'
|
||||
Me.lbl_red_team.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_team.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_team.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_team.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_team.Location = New System.Drawing.Point(420, 375)
|
||||
Me.lbl_red_team.Name = "lbl_red_team"
|
||||
Me.lbl_red_team.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_red_team.TabIndex = 14
|
||||
Me.lbl_red_team.Text = "BLUE TEAM"
|
||||
Me.lbl_red_team.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_score
|
||||
'
|
||||
Me.lbl_red_score.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_score.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_score.Font = New System.Drawing.Font("Microsoft Sans Serif", 170.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_score.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_score.Location = New System.Drawing.Point(420, 135)
|
||||
Me.lbl_red_score.Name = "lbl_red_score"
|
||||
Me.lbl_red_score.Size = New System.Drawing.Size(315, 235)
|
||||
Me.lbl_red_score.TabIndex = 13
|
||||
Me.lbl_red_score.Text = "00"
|
||||
Me.lbl_red_score.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_fighter_name
|
||||
'
|
||||
Me.lbl_red_fighter_name.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_fighter_name.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_fighter_name.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_fighter_name.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_fighter_name.Location = New System.Drawing.Point(420, 90)
|
||||
Me.lbl_red_fighter_name.Name = "lbl_red_fighter_name"
|
||||
Me.lbl_red_fighter_name.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_red_fighter_name.TabIndex = 12
|
||||
Me.lbl_red_fighter_name.Text = "RED FIGHTER"
|
||||
Me.lbl_red_fighter_name.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_court_number
|
||||
'
|
||||
Me.lbl_court_number.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_court_number.Font = New System.Drawing.Font("Microsoft Sans Serif", 75.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_court_number.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_court_number.Location = New System.Drawing.Point(5, 5)
|
||||
Me.lbl_court_number.Name = "lbl_court_number"
|
||||
Me.lbl_court_number.Size = New System.Drawing.Size(275, 80)
|
||||
Me.lbl_court_number.TabIndex = 21
|
||||
Me.lbl_court_number.Text = "C000"
|
||||
Me.lbl_court_number.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_time
|
||||
'
|
||||
Me.lbl_time.Font = New System.Drawing.Font("Microsoft Sans Serif", 85.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_time.ForeColor = System.Drawing.Color.Lime
|
||||
Me.lbl_time.Location = New System.Drawing.Point(285, -5)
|
||||
Me.lbl_time.Name = "lbl_time"
|
||||
Me.lbl_time.Size = New System.Drawing.Size(265, 95)
|
||||
Me.lbl_time.TabIndex = 22
|
||||
Me.lbl_time.Text = "00:00"
|
||||
Me.lbl_time.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_match_number
|
||||
'
|
||||
Me.lbl_match_number.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_match_number.Font = New System.Drawing.Font("Microsoft Sans Serif", 75.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_match_number.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_match_number.Location = New System.Drawing.Point(555, 5)
|
||||
Me.lbl_match_number.Name = "lbl_match_number"
|
||||
Me.lbl_match_number.Size = New System.Drawing.Size(275, 80)
|
||||
Me.lbl_match_number.TabIndex = 23
|
||||
Me.lbl_match_number.Text = "M000"
|
||||
Me.lbl_match_number.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_blue_shkp
|
||||
'
|
||||
Me.btn_blue_shkp.BackColor = System.Drawing.Color.Blue
|
||||
Me.btn_blue_shkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_shkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_shkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_shkp.Location = New System.Drawing.Point(5, 420)
|
||||
Me.btn_blue_shkp.Name = "btn_blue_shkp"
|
||||
Me.btn_blue_shkp.Size = New System.Drawing.Size(95, 25)
|
||||
Me.btn_blue_shkp.TabIndex = 24
|
||||
Me.btn_blue_shkp.Text = "+ 4"
|
||||
Me.btn_blue_shkp.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_blue_shkn
|
||||
'
|
||||
Me.btn_blue_shkn.BackColor = System.Drawing.Color.Blue
|
||||
Me.btn_blue_shkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_shkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_shkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_shkn.Location = New System.Drawing.Point(5, 450)
|
||||
Me.btn_blue_shkn.Name = "btn_blue_shkn"
|
||||
Me.btn_blue_shkn.Size = New System.Drawing.Size(95, 25)
|
||||
Me.btn_blue_shkn.TabIndex = 25
|
||||
Me.btn_blue_shkn.Text = "- 4"
|
||||
Me.btn_blue_shkn.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_blue_dhkn
|
||||
'
|
||||
Me.btn_blue_dhkn.BackColor = System.Drawing.Color.Blue
|
||||
Me.btn_blue_dhkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dhkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dhkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dhkn.Location = New System.Drawing.Point(105, 450)
|
||||
Me.btn_blue_dhkn.Name = "btn_blue_dhkn"
|
||||
Me.btn_blue_dhkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dhkn.TabIndex = 27
|
||||
Me.btn_blue_dhkn.Text = "- 3"
|
||||
Me.btn_blue_dhkn.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_blue_dhkp
|
||||
'
|
||||
Me.btn_blue_dhkp.BackColor = System.Drawing.Color.Blue
|
||||
Me.btn_blue_dhkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dhkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dhkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dhkp.Location = New System.Drawing.Point(105, 420)
|
||||
Me.btn_blue_dhkp.Name = "btn_blue_dhkp"
|
||||
Me.btn_blue_dhkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dhkp.TabIndex = 26
|
||||
Me.btn_blue_dhkp.Text = "+ 3"
|
||||
Me.btn_blue_dhkp.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_blue_sbkn
|
||||
'
|
||||
Me.btn_blue_sbkn.BackColor = System.Drawing.Color.Blue
|
||||
Me.btn_blue_sbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_sbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_sbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_sbkn.Location = New System.Drawing.Point(210, 450)
|
||||
Me.btn_blue_sbkn.Name = "btn_blue_sbkn"
|
||||
Me.btn_blue_sbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_sbkn.TabIndex = 29
|
||||
Me.btn_blue_sbkn.Text = "- 2"
|
||||
Me.btn_blue_sbkn.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_blue_sbkp
|
||||
'
|
||||
Me.btn_blue_sbkp.BackColor = System.Drawing.Color.Blue
|
||||
Me.btn_blue_sbkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_sbkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_sbkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_sbkp.Location = New System.Drawing.Point(210, 420)
|
||||
Me.btn_blue_sbkp.Name = "btn_blue_sbkp"
|
||||
Me.btn_blue_sbkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_sbkp.TabIndex = 28
|
||||
Me.btn_blue_sbkp.Text = "+ 2"
|
||||
Me.btn_blue_sbkp.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_blue_dbkn
|
||||
'
|
||||
Me.btn_blue_dbkn.BackColor = System.Drawing.Color.Blue
|
||||
Me.btn_blue_dbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dbkn.Location = New System.Drawing.Point(315, 450)
|
||||
Me.btn_blue_dbkn.Name = "btn_blue_dbkn"
|
||||
Me.btn_blue_dbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dbkn.TabIndex = 31
|
||||
Me.btn_blue_dbkn.Text = "- 1"
|
||||
Me.btn_blue_dbkn.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_blue_dbkp
|
||||
'
|
||||
Me.btn_blue_dbkp.BackColor = System.Drawing.Color.Blue
|
||||
Me.btn_blue_dbkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dbkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dbkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dbkp.Location = New System.Drawing.Point(315, 420)
|
||||
Me.btn_blue_dbkp.Name = "btn_blue_dbkp"
|
||||
Me.btn_blue_dbkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dbkp.TabIndex = 30
|
||||
Me.btn_blue_dbkp.Text = "+ 1"
|
||||
Me.btn_blue_dbkp.UseVisualStyleBackColor = False
|
||||
'
|
||||
'pb_red_flag
|
||||
'
|
||||
Me.pb_red_flag.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_red_flag.Location = New System.Drawing.Point(740, 135)
|
||||
Me.pb_red_flag.Name = "pb_red_flag"
|
||||
Me.pb_red_flag.Size = New System.Drawing.Size(90, 60)
|
||||
Me.pb_red_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_flag.TabIndex = 45
|
||||
Me.pb_red_flag.TabStop = False
|
||||
'
|
||||
'lbl_red_gamjum
|
||||
'
|
||||
Me.lbl_red_gamjum.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_gamjum.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_gamjum.Font = New System.Drawing.Font("Microsoft Sans Serif", 52.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_gamjum.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_gamjum.Location = New System.Drawing.Point(740, 340)
|
||||
Me.lbl_red_gamjum.Name = "lbl_red_gamjum"
|
||||
Me.lbl_red_gamjum.Size = New System.Drawing.Size(90, 75)
|
||||
Me.lbl_red_gamjum.TabIndex = 44
|
||||
Me.lbl_red_gamjum.Text = "00"
|
||||
Me.lbl_red_gamjum.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.ForeColor = System.Drawing.Color.White
|
||||
Me.Label5.Location = New System.Drawing.Point(740, 295)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(90, 40)
|
||||
Me.Label5.TabIndex = 43
|
||||
Me.Label5.Text = "GAMJUM"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_code_3
|
||||
'
|
||||
Me.lbl_red_code_3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_code_3.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_code_3.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_code_3.Location = New System.Drawing.Point(740, 90)
|
||||
Me.lbl_red_code_3.Name = "lbl_red_code_3"
|
||||
Me.lbl_red_code_3.Size = New System.Drawing.Size(90, 40)
|
||||
Me.lbl_red_code_3.TabIndex = 40
|
||||
Me.lbl_red_code_3.Text = "ISO3"
|
||||
Me.lbl_red_code_3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_round
|
||||
'
|
||||
Me.lbl_round.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lbl_round.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_round.Font = New System.Drawing.Font("Microsoft Sans Serif", 48.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_round.ForeColor = System.Drawing.Color.Lime
|
||||
Me.lbl_round.Location = New System.Drawing.Point(375, 185)
|
||||
Me.lbl_round.Name = "lbl_round"
|
||||
Me.lbl_round.Size = New System.Drawing.Size(85, 100)
|
||||
Me.lbl_round.TabIndex = 46
|
||||
Me.lbl_round.Text = "1"
|
||||
Me.lbl_round.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_red_dhkn
|
||||
'
|
||||
Me.btn_red_dhkn.BackColor = System.Drawing.Color.Red
|
||||
Me.btn_red_dhkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_dhkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_dhkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_dhkn.Location = New System.Drawing.Point(630, 450)
|
||||
Me.btn_red_dhkn.Name = "btn_red_dhkn"
|
||||
Me.btn_red_dhkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_dhkn.TabIndex = 54
|
||||
Me.btn_red_dhkn.Text = "3 -"
|
||||
Me.btn_red_dhkn.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_red_dhkp
|
||||
'
|
||||
Me.btn_red_dhkp.BackColor = System.Drawing.Color.Red
|
||||
Me.btn_red_dhkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_dhkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_dhkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_dhkp.Location = New System.Drawing.Point(630, 420)
|
||||
Me.btn_red_dhkp.Name = "btn_red_dhkp"
|
||||
Me.btn_red_dhkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_dhkp.TabIndex = 53
|
||||
Me.btn_red_dhkp.Text = "3 +"
|
||||
Me.btn_red_dhkp.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_red_sbkn
|
||||
'
|
||||
Me.btn_red_sbkn.BackColor = System.Drawing.Color.Red
|
||||
Me.btn_red_sbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_sbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_sbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_sbkn.Location = New System.Drawing.Point(525, 450)
|
||||
Me.btn_red_sbkn.Name = "btn_red_sbkn"
|
||||
Me.btn_red_sbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_sbkn.TabIndex = 52
|
||||
Me.btn_red_sbkn.Text = "2 -"
|
||||
Me.btn_red_sbkn.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_red_sbkp
|
||||
'
|
||||
Me.btn_red_sbkp.BackColor = System.Drawing.Color.Red
|
||||
Me.btn_red_sbkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_sbkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_sbkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_sbkp.Location = New System.Drawing.Point(525, 420)
|
||||
Me.btn_red_sbkp.Name = "btn_red_sbkp"
|
||||
Me.btn_red_sbkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_sbkp.TabIndex = 51
|
||||
Me.btn_red_sbkp.Text = "2 +"
|
||||
Me.btn_red_sbkp.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_red_dbkn
|
||||
'
|
||||
Me.btn_red_dbkn.BackColor = System.Drawing.Color.Red
|
||||
Me.btn_red_dbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_dbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_dbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_dbkn.Location = New System.Drawing.Point(420, 450)
|
||||
Me.btn_red_dbkn.Name = "btn_red_dbkn"
|
||||
Me.btn_red_dbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_dbkn.TabIndex = 50
|
||||
Me.btn_red_dbkn.Text = "1 -"
|
||||
Me.btn_red_dbkn.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_red_dbkp
|
||||
'
|
||||
Me.btn_red_dbkp.BackColor = System.Drawing.Color.Red
|
||||
Me.btn_red_dbkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_dbkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_dbkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_dbkp.Location = New System.Drawing.Point(420, 420)
|
||||
Me.btn_red_dbkp.Name = "btn_red_dbkp"
|
||||
Me.btn_red_dbkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_dbkp.TabIndex = 49
|
||||
Me.btn_red_dbkp.Text = "1 +"
|
||||
Me.btn_red_dbkp.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_red_shkn
|
||||
'
|
||||
Me.btn_red_shkn.BackColor = System.Drawing.Color.Red
|
||||
Me.btn_red_shkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_shkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_shkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_shkn.Location = New System.Drawing.Point(735, 450)
|
||||
Me.btn_red_shkn.Name = "btn_red_shkn"
|
||||
Me.btn_red_shkn.Size = New System.Drawing.Size(95, 25)
|
||||
Me.btn_red_shkn.TabIndex = 48
|
||||
Me.btn_red_shkn.Text = "4 -"
|
||||
Me.btn_red_shkn.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btn_red_shkp
|
||||
'
|
||||
Me.btn_red_shkp.BackColor = System.Drawing.Color.Red
|
||||
Me.btn_red_shkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_shkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_shkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_shkp.Location = New System.Drawing.Point(735, 420)
|
||||
Me.btn_red_shkp.Name = "btn_red_shkp"
|
||||
Me.btn_red_shkp.Size = New System.Drawing.Size(95, 25)
|
||||
Me.btn_red_shkp.TabIndex = 47
|
||||
Me.btn_red_shkp.Text = "4 +"
|
||||
Me.btn_red_shkp.UseVisualStyleBackColor = False
|
||||
'
|
||||
'tmr_display
|
||||
'
|
||||
Me.tmr_display.Enabled = True
|
||||
Me.tmr_display.Interval = 1
|
||||
'
|
||||
'btn_start
|
||||
'
|
||||
Me.btn_start.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_start.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_start.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_start.Location = New System.Drawing.Point(375, 295)
|
||||
Me.btn_start.Name = "btn_start"
|
||||
Me.btn_start.Size = New System.Drawing.Size(85, 30)
|
||||
Me.btn_start.TabIndex = 55
|
||||
Me.btn_start.Text = "START"
|
||||
Me.btn_start.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_end
|
||||
'
|
||||
Me.btn_end.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_end.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_end.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_end.Location = New System.Drawing.Point(375, 330)
|
||||
Me.btn_end.Name = "btn_end"
|
||||
Me.btn_end.Size = New System.Drawing.Size(85, 30)
|
||||
Me.btn_end.TabIndex = 56
|
||||
Me.btn_end.Text = "END"
|
||||
Me.btn_end.UseVisualStyleBackColor = True
|
||||
'
|
||||
'round_countdown
|
||||
'
|
||||
'
|
||||
'btn_blue_ngf
|
||||
'
|
||||
Me.btn_blue_ngf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_ngf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_ngf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_ngf.Location = New System.Drawing.Point(105, 340)
|
||||
Me.btn_blue_ngf.Name = "btn_blue_ngf"
|
||||
Me.btn_blue_ngf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_blue_ngf.TabIndex = 60
|
||||
Me.btn_blue_ngf.Text = "-"
|
||||
Me.btn_blue_ngf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_pgf
|
||||
'
|
||||
Me.btn_blue_pgf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_pgf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_pgf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_pgf.Location = New System.Drawing.Point(105, 310)
|
||||
Me.btn_blue_pgf.Name = "btn_blue_pgf"
|
||||
Me.btn_blue_pgf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_blue_pgf.TabIndex = 59
|
||||
Me.btn_blue_pgf.Text = "+"
|
||||
Me.btn_blue_pgf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_ngf
|
||||
'
|
||||
Me.btn_red_ngf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_ngf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_ngf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_ngf.Location = New System.Drawing.Point(705, 340)
|
||||
Me.btn_red_ngf.Name = "btn_red_ngf"
|
||||
Me.btn_red_ngf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_red_ngf.TabIndex = 64
|
||||
Me.btn_red_ngf.Text = "-"
|
||||
Me.btn_red_ngf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_pgf
|
||||
'
|
||||
Me.btn_red_pgf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_pgf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_pgf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_pgf.Location = New System.Drawing.Point(705, 310)
|
||||
Me.btn_red_pgf.Name = "btn_red_pgf"
|
||||
Me.btn_red_pgf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_red_pgf.TabIndex = 63
|
||||
Me.btn_red_pgf.Text = "+"
|
||||
Me.btn_red_pgf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pb_blue_logo
|
||||
'
|
||||
Me.pb_blue_logo.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_blue_logo.Location = New System.Drawing.Point(5, 200)
|
||||
Me.pb_blue_logo.Name = "pb_blue_logo"
|
||||
Me.pb_blue_logo.Size = New System.Drawing.Size(90, 90)
|
||||
Me.pb_blue_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_logo.TabIndex = 65
|
||||
Me.pb_blue_logo.TabStop = False
|
||||
'
|
||||
'pb_red_logo
|
||||
'
|
||||
Me.pb_red_logo.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_red_logo.Location = New System.Drawing.Point(740, 200)
|
||||
Me.pb_red_logo.Name = "pb_red_logo"
|
||||
Me.pb_red_logo.Size = New System.Drawing.Size(90, 90)
|
||||
Me.pb_red_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_logo.TabIndex = 66
|
||||
Me.pb_red_logo.TabStop = False
|
||||
'
|
||||
'btn_dec_match
|
||||
'
|
||||
Me.btn_dec_match.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_dec_match.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_dec_match.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_dec_match.Location = New System.Drawing.Point(800, 50)
|
||||
Me.btn_dec_match.Name = "btn_dec_match"
|
||||
Me.btn_dec_match.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_dec_match.TabIndex = 68
|
||||
Me.btn_dec_match.Text = "-"
|
||||
Me.btn_dec_match.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_inc_match
|
||||
'
|
||||
Me.btn_inc_match.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_inc_match.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_inc_match.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_inc_match.Location = New System.Drawing.Point(800, 15)
|
||||
Me.btn_inc_match.Name = "btn_inc_match"
|
||||
Me.btn_inc_match.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_inc_match.TabIndex = 67
|
||||
Me.btn_inc_match.Text = "+"
|
||||
Me.btn_inc_match.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lbl_blue_weight_class
|
||||
'
|
||||
Me.lbl_blue_weight_class.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_weight_class.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_weight_class.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_blue_weight_class.Location = New System.Drawing.Point(290, 140)
|
||||
Me.lbl_blue_weight_class.Name = "lbl_blue_weight_class"
|
||||
Me.lbl_blue_weight_class.Size = New System.Drawing.Size(120, 30)
|
||||
Me.lbl_blue_weight_class.TabIndex = 69
|
||||
Me.lbl_blue_weight_class.Text = "Weight Class"
|
||||
Me.lbl_blue_weight_class.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_weight_class
|
||||
'
|
||||
Me.lbl_red_weight_class.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_weight_class.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_weight_class.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_red_weight_class.Location = New System.Drawing.Point(425, 140)
|
||||
Me.lbl_red_weight_class.Name = "lbl_red_weight_class"
|
||||
Me.lbl_red_weight_class.Size = New System.Drawing.Size(120, 30)
|
||||
Me.lbl_red_weight_class.TabIndex = 70
|
||||
Me.lbl_red_weight_class.Text = "Weight Class"
|
||||
Me.lbl_red_weight_class.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_weight_category
|
||||
'
|
||||
Me.lbl_blue_weight_category.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_weight_category.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_weight_category.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_blue_weight_category.Location = New System.Drawing.Point(105, 140)
|
||||
Me.lbl_blue_weight_category.Name = "lbl_blue_weight_category"
|
||||
Me.lbl_blue_weight_category.Size = New System.Drawing.Size(95, 30)
|
||||
Me.lbl_blue_weight_category.TabIndex = 71
|
||||
Me.lbl_blue_weight_category.Text = "Category"
|
||||
Me.lbl_blue_weight_category.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_weight_category
|
||||
'
|
||||
Me.lbl_red_weight_category.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_weight_category.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_weight_category.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_red_weight_category.Location = New System.Drawing.Point(635, 140)
|
||||
Me.lbl_red_weight_category.Name = "lbl_red_weight_category"
|
||||
Me.lbl_red_weight_category.Size = New System.Drawing.Size(95, 30)
|
||||
Me.lbl_red_weight_category.TabIndex = 72
|
||||
Me.lbl_red_weight_category.Text = "Category"
|
||||
Me.lbl_red_weight_category.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_gender
|
||||
'
|
||||
Me.lbl_blue_gender.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_gender.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_gender.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_blue_gender.Location = New System.Drawing.Point(135, 335)
|
||||
Me.lbl_blue_gender.Name = "lbl_blue_gender"
|
||||
Me.lbl_blue_gender.Size = New System.Drawing.Size(235, 30)
|
||||
Me.lbl_blue_gender.TabIndex = 73
|
||||
Me.lbl_blue_gender.Text = "Gender"
|
||||
Me.lbl_blue_gender.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_gender
|
||||
'
|
||||
Me.lbl_red_gender.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_gender.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_gender.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_red_gender.Location = New System.Drawing.Point(465, 335)
|
||||
Me.lbl_red_gender.Name = "lbl_red_gender"
|
||||
Me.lbl_red_gender.Size = New System.Drawing.Size(235, 30)
|
||||
Me.lbl_red_gender.TabIndex = 74
|
||||
Me.lbl_red_gender.Text = "Gender"
|
||||
Me.lbl_red_gender.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'frm_scorecontrol
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 15.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(834, 481)
|
||||
Me.Controls.Add(Me.lbl_red_gender)
|
||||
Me.Controls.Add(Me.lbl_blue_gender)
|
||||
Me.Controls.Add(Me.lbl_red_weight_category)
|
||||
Me.Controls.Add(Me.lbl_blue_weight_category)
|
||||
Me.Controls.Add(Me.lbl_red_weight_class)
|
||||
Me.Controls.Add(Me.lbl_blue_weight_class)
|
||||
Me.Controls.Add(Me.btn_dec_match)
|
||||
Me.Controls.Add(Me.btn_inc_match)
|
||||
Me.Controls.Add(Me.pb_red_logo)
|
||||
Me.Controls.Add(Me.pb_blue_logo)
|
||||
Me.Controls.Add(Me.btn_red_ngf)
|
||||
Me.Controls.Add(Me.btn_red_pgf)
|
||||
Me.Controls.Add(Me.btn_blue_ngf)
|
||||
Me.Controls.Add(Me.btn_blue_pgf)
|
||||
Me.Controls.Add(Me.btn_end)
|
||||
Me.Controls.Add(Me.btn_start)
|
||||
Me.Controls.Add(Me.btn_red_dhkn)
|
||||
Me.Controls.Add(Me.btn_red_dhkp)
|
||||
Me.Controls.Add(Me.btn_red_sbkn)
|
||||
Me.Controls.Add(Me.btn_red_sbkp)
|
||||
Me.Controls.Add(Me.btn_red_dbkn)
|
||||
Me.Controls.Add(Me.btn_red_dbkp)
|
||||
Me.Controls.Add(Me.btn_red_shkn)
|
||||
Me.Controls.Add(Me.btn_red_shkp)
|
||||
Me.Controls.Add(Me.lbl_round)
|
||||
Me.Controls.Add(Me.pb_red_flag)
|
||||
Me.Controls.Add(Me.lbl_red_gamjum)
|
||||
Me.Controls.Add(Me.Label5)
|
||||
Me.Controls.Add(Me.lbl_red_code_3)
|
||||
Me.Controls.Add(Me.btn_blue_dbkn)
|
||||
Me.Controls.Add(Me.btn_blue_dbkp)
|
||||
Me.Controls.Add(Me.btn_blue_sbkn)
|
||||
Me.Controls.Add(Me.btn_blue_sbkp)
|
||||
Me.Controls.Add(Me.btn_blue_dhkn)
|
||||
Me.Controls.Add(Me.btn_blue_dhkp)
|
||||
Me.Controls.Add(Me.btn_blue_shkn)
|
||||
Me.Controls.Add(Me.btn_blue_shkp)
|
||||
Me.Controls.Add(Me.lbl_match_number)
|
||||
Me.Controls.Add(Me.lbl_time)
|
||||
Me.Controls.Add(Me.lbl_court_number)
|
||||
Me.Controls.Add(Me.lbl_red_team)
|
||||
Me.Controls.Add(Me.lbl_red_score)
|
||||
Me.Controls.Add(Me.lbl_red_fighter_name)
|
||||
Me.Controls.Add(Me.pb_blue_flag)
|
||||
Me.Controls.Add(Me.lbl_blue_gamjum)
|
||||
Me.Controls.Add(Me.Label11)
|
||||
Me.Controls.Add(Me.lbl_blue_code_3)
|
||||
Me.Controls.Add(Me.lbl_blue_team)
|
||||
Me.Controls.Add(Me.lbl_blue_score)
|
||||
Me.Controls.Add(Me.lbl_blue_fighter_name)
|
||||
Me.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "frm_scorecontrol"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "TAKEONE : Score Control"
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents lbl_blue_fighter_name As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_blue_score As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_blue_team As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_blue_code_3 As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_blue_gamjum As System.Windows.Forms.Label
|
||||
Friend WithEvents Label11 As System.Windows.Forms.Label
|
||||
Friend WithEvents pb_blue_flag As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents lbl_red_team As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_red_score As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_red_fighter_name As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_court_number As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_time As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_match_number As System.Windows.Forms.Label
|
||||
Friend WithEvents btn_blue_shkp As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_shkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_dhkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_dhkp As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_sbkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_sbkp As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_dbkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_dbkp As System.Windows.Forms.Button
|
||||
Friend WithEvents pb_red_flag As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents lbl_red_gamjum As System.Windows.Forms.Label
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_red_code_3 As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_round As System.Windows.Forms.Label
|
||||
Friend WithEvents btn_red_dhkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_red_dhkp As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_red_sbkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_red_sbkp As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_red_dbkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_red_dbkp As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_red_shkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_red_shkp As System.Windows.Forms.Button
|
||||
Friend WithEvents tmr_display As System.Windows.Forms.Timer
|
||||
Friend WithEvents btn_start As Button
|
||||
Friend WithEvents btn_end As Button
|
||||
Friend WithEvents round_countdown As System.Windows.Forms.Timer
|
||||
Friend WithEvents btn_blue_ngf As Button
|
||||
Friend WithEvents btn_blue_pgf As Button
|
||||
Friend WithEvents btn_red_ngf As Button
|
||||
Friend WithEvents btn_red_pgf As Button
|
||||
Friend WithEvents break_countdown As System.Windows.Forms.Timer
|
||||
Friend WithEvents pb_blue_logo As PictureBox
|
||||
Friend WithEvents pb_red_logo As PictureBox
|
||||
Friend WithEvents btn_dec_match As Button
|
||||
Friend WithEvents btn_inc_match As Button
|
||||
Friend WithEvents lbl_blue_weight_class As Label
|
||||
Friend WithEvents lbl_red_weight_class As Label
|
||||
Friend WithEvents lbl_blue_weight_category As Label
|
||||
Friend WithEvents lbl_red_weight_category As Label
|
||||
Friend WithEvents lbl_blue_gender As Label
|
||||
Friend WithEvents lbl_red_gender As Label
|
||||
End Class
|
||||
@ -0,0 +1,132 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="tmr_display.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<metadata name="round_countdown.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>131, 17</value>
|
||||
</metadata>
|
||||
<metadata name="break_countdown.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>270, 14</value>
|
||||
</metadata>
|
||||
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>42</value>
|
||||
</metadata>
|
||||
</root>
|
||||
369
Visual Studio Code/Timer Library/forms/event/frm_scorecontrol.vb
Normal file
@ -0,0 +1,369 @@
|
||||
Imports System.ComponentModel
|
||||
|
||||
Public Class frm_scorecontrol
|
||||
|
||||
Dim Match As match
|
||||
Dim MatchNumber As Integer = 1
|
||||
Dim MatchTimer As match_timer
|
||||
|
||||
Dim CHANGE As Boolean = False
|
||||
Dim START_BUTTON As Boolean = False
|
||||
|
||||
Private Sub tmr_display_Tick(sender As Object, e As EventArgs) Handles tmr_display.Tick
|
||||
|
||||
If START_BUTTON = True Then
|
||||
|
||||
DisplayData()
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_start_Click(sender As Object, e As EventArgs) Handles btn_start.Click
|
||||
|
||||
If btn_start.Text = "START" Then
|
||||
|
||||
If Not IsNothing(Match) Then Match.StartMatch() Else Exit Sub
|
||||
START_BUTTON = True
|
||||
CHANGE = True
|
||||
MatchTimer = New match_timer(1, 30)
|
||||
round_countdown.Interval = 1000
|
||||
round_countdown.Enabled = True
|
||||
btn_start.Text = "PAUSE"
|
||||
|
||||
ElseIf btn_start.Text = "PAUSE" Then
|
||||
|
||||
btn_start.Text = "RESUME"
|
||||
round_countdown.Enabled = False
|
||||
|
||||
ElseIf btn_start.Text = "RESUME" Then
|
||||
|
||||
btn_start.Text = "PAUSE"
|
||||
round_countdown.Enabled = True
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_shkp_Click(sender As Object, e As EventArgs) Handles btn_blue_shkp.Click
|
||||
|
||||
If CHANGE = True Then MATCH.BlueFighter.AdjustScore(4)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_dhkp_Click(sender As Object, e As EventArgs) Handles btn_blue_dhkp.Click
|
||||
|
||||
If CHANGE = True Then MATCH.BlueFighter.AdjustScore(3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_sbkp_Click(sender As Object, e As EventArgs) Handles btn_blue_sbkp.Click
|
||||
|
||||
If CHANGE = True Then Match.BlueFighter.AdjustScore(2)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_dbkp_Click(sender As Object, e As EventArgs) Handles btn_blue_dbkp.Click
|
||||
|
||||
If CHANGE = True Then MATCH.BlueFighter.AdjustScore(1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_dbkp_Click(sender As Object, e As EventArgs) Handles btn_red_dbkp.Click
|
||||
|
||||
If CHANGE = True Then MATCH.RedFighter.AdjustScore(1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_sbkp_Click(sender As Object, e As EventArgs) Handles btn_red_sbkp.Click
|
||||
|
||||
If CHANGE = True Then Match.RedFighter.AdjustScore(2)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_dhkp_Click(sender As Object, e As EventArgs) Handles btn_red_dhkp.Click
|
||||
|
||||
If CHANGE = True Then MATCH.RedFighter.AdjustScore(3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_shkp_Click(sender As Object, e As EventArgs) Handles btn_red_shkp.Click
|
||||
|
||||
If CHANGE = True Then MATCH.RedFighter.AdjustScore(4)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub timer_countdown_Tick(sender As Object, e As EventArgs) Handles round_countdown.Tick
|
||||
|
||||
MatchTimer.Run()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_shkn_Click(sender As Object, e As EventArgs) Handles btn_blue_shkn.Click
|
||||
|
||||
If CHANGE = True Then MATCH.BlueFighter.AdjustScore(-4)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_dhkn_Click(sender As Object, e As EventArgs) Handles btn_blue_dhkn.Click
|
||||
|
||||
If CHANGE = True Then MATCH.BlueFighter.AdjustScore(-3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_sbkn_Click(sender As Object, e As EventArgs) Handles btn_blue_sbkn.Click
|
||||
|
||||
If CHANGE = True Then Match.BlueFighter.AdjustScore(-2)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_dbkn_Click(sender As Object, e As EventArgs) Handles btn_blue_dbkn.Click
|
||||
|
||||
If CHANGE = True Then MATCH.BlueFighter.AdjustScore(-1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_dbkn_Click(sender As Object, e As EventArgs) Handles btn_red_dbkn.Click
|
||||
|
||||
If CHANGE = True Then MATCH.RedFighter.AdjustScore(-1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_sbkn_Click(sender As Object, e As EventArgs) Handles btn_red_sbkn.Click
|
||||
|
||||
If CHANGE = True Then Match.RedFighter.AdjustScore(-2)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_dhkn_Click(sender As Object, e As EventArgs) Handles btn_red_dhkn.Click
|
||||
|
||||
If CHANGE = True Then MATCH.RedFighter.AdjustScore(-3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_shkn_Click(sender As Object, e As EventArgs) Handles btn_red_shkn.Click
|
||||
|
||||
If CHANGE = True Then MATCH.RedFighter.AdjustScore(-4)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_pgf_Click(sender As Object, e As EventArgs) Handles btn_blue_pgf.Click
|
||||
|
||||
If CHANGE = True Then
|
||||
Match.BlueFighter.AdjustGamjum(1)
|
||||
'Match.RedFighter.GetTransfered(1)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_ngf_Click(sender As Object, e As EventArgs) Handles btn_blue_ngf.Click
|
||||
|
||||
If CHANGE = True Then MATCH.BlueFighter.AdjustGamjum(-1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_pgf_Click(sender As Object, e As EventArgs) Handles btn_red_pgf.Click
|
||||
|
||||
If CHANGE = True Then MATCH.RedFighter.AdjustGamjum(1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_ngf_Click(sender As Object, e As EventArgs) Handles btn_red_ngf.Click
|
||||
|
||||
If CHANGE = True Then MATCH.RedFighter.AdjustGamjum(-1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_end_Click(sender As Object, e As EventArgs) Handles btn_end.Click
|
||||
|
||||
CHANGE = False
|
||||
|
||||
If Not IsNothing(Match) Then Match.EndMatch() Else System.GC.Collect()
|
||||
|
||||
btn_start.Text = "START"
|
||||
'Match.RoundTime = New match.timer(Match.MaxRoundMin, Match.MaxRoundSec)
|
||||
round_countdown.Enabled = False
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub lbl_match_number_Click(sender As Object, e As EventArgs) Handles lbl_match_number.Click
|
||||
|
||||
If CHANGE = False Then
|
||||
|
||||
MatchNumber = InputBox("Please Type The Match Number", "Match Number", "1")
|
||||
Match = New match(1, MatchNumber)
|
||||
DisplayData()
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub DisplayData()
|
||||
|
||||
' Board Display
|
||||
|
||||
Try
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
lbl_round.Text = Match.ROUND
|
||||
lbl_match_number.Text = "M" & Match.ID
|
||||
lbl_court_number.Text = "C" & Match.COURT & "R" & Match.ROUND
|
||||
|
||||
' Blue Fighter Data Display
|
||||
Try
|
||||
lbl_blue_score.Text = Match.BlueFighter.Score
|
||||
lbl_blue_gamjum.Text = Match.BlueFighter.Gamjum
|
||||
lbl_blue_team.Text = Match.BlueFighter.Person.Team.Title
|
||||
lbl_blue_fighter_name.Text = Match.BlueFighter.Person.ShortName
|
||||
lbl_blue_code_3.Text = Match.BlueFighter.Person.Team.Country.ISO3
|
||||
lbl_blue_gender.Text = Match.BlueFighter.Person.Gender
|
||||
lbl_blue_weight_class.Text = Match.BlueFighter.Person.Weight.WeightClass
|
||||
lbl_blue_weight_category.Text = Match.BlueFighter.Person.Weight.WeightCategory
|
||||
Catch ex As Exception
|
||||
lbl_blue_score.Text = 0
|
||||
lbl_blue_gamjum.Text = 0
|
||||
lbl_blue_team.Text = "BLUE TEAM"
|
||||
lbl_blue_fighter_name.Text = "BLUE FIGHTER"
|
||||
lbl_blue_code_3.Text = "ISO3"
|
||||
lbl_blue_gender.Text = "XGNDR"
|
||||
lbl_blue_weight_class.Text = "OPEN WT"
|
||||
lbl_blue_weight_category.Text = "UNKNOWN"
|
||||
End Try
|
||||
|
||||
Try ' Blue Fighter Flag Image Display
|
||||
pb_blue_flag.Image = Image.FromStream(Match.BlueFighter.Person.TEAM.Country.Flag)
|
||||
'pb_blue_flag.Visible = True
|
||||
Catch ex As Exception
|
||||
pb_blue_flag.Image = Nothing
|
||||
'pb_blue_flag.Visible = False
|
||||
End Try
|
||||
|
||||
Try ' Blue Fighter Logo Image Display
|
||||
pb_blue_logo.Image = Image.FromStream(Match.BlueFighter.Person.TEAM.Logo)
|
||||
'pb_blue_logo.Visible = True
|
||||
Catch ex As Exception
|
||||
pb_blue_logo.Image = Nothing
|
||||
'pb_blue_logo.Visible = False
|
||||
End Try
|
||||
|
||||
' Red Fighter Data Display
|
||||
Try
|
||||
lbl_red_score.Text = Match.RedFighter.Score
|
||||
lbl_red_gamjum.Text = Match.RedFighter.Gamjum
|
||||
lbl_red_team.Text = Match.RedFighter.Person.Team.Title
|
||||
lbl_red_fighter_name.Text = Match.RedFighter.Person.ShortName
|
||||
lbl_red_code_3.Text = Match.RedFighter.Person.Team.Country.ISO3
|
||||
lbl_red_gender.Text = Match.RedFighter.Person.Gender
|
||||
lbl_red_weight_class.Text = Match.RedFighter.Person.Weight.WeightClass
|
||||
lbl_red_weight_category.Text = Match.RedFighter.Person.Weight.WeightCategory
|
||||
Catch ex As Exception
|
||||
lbl_red_score.Text = 0
|
||||
lbl_red_gamjum.Text = 0
|
||||
lbl_red_team.Text = "RED TEAM"
|
||||
lbl_red_fighter_name.Text = "RED FIGHTER"
|
||||
lbl_red_code_3.Text = "ISO3"
|
||||
lbl_red_gender.Text = "XGNDR"
|
||||
lbl_red_weight_class.Text = "OPEN WT"
|
||||
lbl_red_weight_category.Text = "UNKNOWN"
|
||||
End Try
|
||||
|
||||
Try ' Red Fighter Flag Image Display
|
||||
pb_red_flag.Image = Image.FromStream(Match.RedFighter.Person.TEAM.Country.Flag)
|
||||
'pb_red_flag.Visible = True
|
||||
Catch ex As Exception
|
||||
pb_red_flag.Image = Nothing
|
||||
'pb_red_flag.Visible = False
|
||||
End Try
|
||||
|
||||
Try ' Red Fighter Logo Image Display
|
||||
pb_red_logo.Image = Image.FromStream(Match.RedFighter.Person.TEAM.Logo)
|
||||
'pb_red_logo.Visible = True
|
||||
Catch ex As Exception
|
||||
pb_red_logo.Image = Nothing
|
||||
'pb_red_logo.Visible = False
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_inc_match_Click(sender As Object, e As EventArgs) Handles btn_inc_match.Click
|
||||
|
||||
Try
|
||||
MatchNumber += 1
|
||||
Match = New match(1, MatchNumber)
|
||||
DisplayData()
|
||||
Catch ex As Exception
|
||||
MatchNumber -= 1
|
||||
Match = New match(1, MatchNumber)
|
||||
DisplayData()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_dec_match_Click(sender As Object, e As EventArgs) Handles btn_dec_match.Click
|
||||
|
||||
Try
|
||||
MatchNumber -= 1
|
||||
Match = New match(1, MatchNumber)
|
||||
DisplayData()
|
||||
Catch ex As Exception
|
||||
MatchNumber += 1
|
||||
Match = New match(1, MatchNumber)
|
||||
DisplayData()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_scorecontrol_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
Try
|
||||
Match = New match(1, MatchNumber)
|
||||
DisplayData()
|
||||
Catch ex As Exception
|
||||
Match = New match(1, MatchNumber)
|
||||
DisplayData()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub pb_blue_logo_Click(sender As Object, e As EventArgs) Handles pb_blue_logo.Click
|
||||
|
||||
If IsNothing(pb_blue_logo.Image) Then
|
||||
frm_update_logo.Show()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub pb_red_logo_Click(sender As Object, e As EventArgs) Handles pb_red_logo.Click
|
||||
|
||||
If IsNothing(pb_red_logo.Image) Then
|
||||
frm_update_logo.Show()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_scorecontrol_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
|
||||
|
||||
frm_event_control.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub pb_blue_flag_Click(sender As Object, e As EventArgs) Handles pb_blue_flag.Click
|
||||
|
||||
If IsNothing(pb_blue_flag.Image) Then
|
||||
frm_update_flag.Show()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub pb_red_flag_Click(sender As Object, e As EventArgs) Handles pb_red_flag.Click
|
||||
|
||||
If IsNothing(pb_red_flag.Image) Then
|
||||
frm_update_flag.Show()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
@ -0,0 +1,180 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class friendly_fighter
|
||||
|
||||
' Scoring Information
|
||||
Private _match As Integer ' Match Number
|
||||
Private _person As person ' Fighter ID
|
||||
Private _score As Integer ' Total Score
|
||||
Private _gamjum As Integer ' Total Gamgum Foul
|
||||
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
' Properties
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub New(FighterID As Integer)
|
||||
_person = New person(FighterID)
|
||||
_score = 0
|
||||
_gamjum = 0
|
||||
End Sub
|
||||
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
' Properties
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
|
||||
ReadOnly Property Person As person
|
||||
Get
|
||||
Return _person
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Score As Integer
|
||||
Get
|
||||
Return _score
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Gamjum As Integer
|
||||
Get
|
||||
Return _gamjum
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
' Subroutines
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub AdjustScore(Amount As Integer)
|
||||
|
||||
_score += Amount
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub AdjustGamjum(Amount As Integer)
|
||||
|
||||
_gamjum += Amount
|
||||
|
||||
End Sub
|
||||
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
' Subroutines
|
||||
'-----------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub RegisterScore(Score As Integer, Gamjum As Integer)
|
||||
|
||||
Dim QRY As String = ("
|
||||
insert into event_matches_scores (mid, pid, score, foul) values (" & _match & ", " & _person.ID & ", " & Score & ", " & Gamjum & ");
|
||||
select sum(score) as 'score', sum(gamjum) as 'gamjum' from event_matches_scores where eid = null and mid = " & _match & " and pid = " & _person.ID & ";
|
||||
")
|
||||
|
||||
' Connection
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
|
||||
While RDR.Read
|
||||
|
||||
Try ' Score
|
||||
_score = RDR("score")
|
||||
Catch ex As Exception
|
||||
_score = 0
|
||||
End Try
|
||||
|
||||
Try ' Gamjum
|
||||
_gamjum = RDR("gamjum")
|
||||
Catch ex As Exception
|
||||
_gamjum = 0
|
||||
End Try
|
||||
|
||||
End While
|
||||
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub GetMatchScores()
|
||||
|
||||
Dim QRY As String = ("select sum(score) as 'score', sum(foul) as 'gamjum' from event_matches_scores where eid = null and mid = " & _match & " and pid = " & _person.ID & ";")
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
|
||||
While RDR.Read
|
||||
|
||||
Try ' Score
|
||||
_score = RDR("score")
|
||||
Catch ex As Exception
|
||||
_score = 0
|
||||
End Try
|
||||
|
||||
Try ' Gamjum
|
||||
_gamjum = RDR("gamjum")
|
||||
Catch ex As Exception
|
||||
_gamjum = 0
|
||||
End Try
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Function GetPointsList() As List(Of country)
|
||||
|
||||
Dim QRY As String = ("
|
||||
select
|
||||
score,
|
||||
gamjum
|
||||
from
|
||||
event_matches_scores
|
||||
where
|
||||
eid = null and mid = " & _match & " and pid = " & _person.ID & "
|
||||
order by
|
||||
eid,
|
||||
mid
|
||||
desc;
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of country)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New country(RDR("id")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return LST
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@ -0,0 +1,325 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class friendly_match
|
||||
|
||||
'--[MATCH FIGHTERS]---------------
|
||||
|
||||
Public _blue As friendly_fighter ' Blue Fighter Information
|
||||
Public _red As friendly_fighter ' Red Fighter Information
|
||||
Public _referee As person ' Referee Information
|
||||
|
||||
'--[MATCH SETTINGS]---------------
|
||||
|
||||
Private _match_id As Integer ' Match Identification Number
|
||||
Private _max_rounds As Integer ' Maximum Round Number
|
||||
Private _round_number As Integer ' Round Number
|
||||
|
||||
Private _matchTimer As match_timer ' Timer For Playing The Rounds
|
||||
Private _matchBreak As match_timer ' Timer For Having Break
|
||||
|
||||
Private _max_differenace As Integer ' Max Difference In Score
|
||||
Private _enaMaxSdiff As Boolean ' End Match When Difference Reached
|
||||
Private _enaSudenDth As Boolean ' Enable Forth Round When Score Are Equal
|
||||
|
||||
'--[CONSTRUCTORS]-------------------------------------------------
|
||||
|
||||
ReadOnly Property Round As Integer
|
||||
Get
|
||||
Return _round_number
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Time As match_timer
|
||||
Get
|
||||
Return _matchTimer
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Break As match_timer
|
||||
Get
|
||||
Return _matchBreak
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'--[CONSTRUCTORS]-------------------------------------------------
|
||||
|
||||
' Incase you want to create instant match
|
||||
Public Sub New(Blue As Integer, Red As Integer, Referee As Integer, Rounds As Integer)
|
||||
|
||||
' Match Fighters
|
||||
_blue = New friendly_fighter(Blue)
|
||||
_red = New friendly_fighter(Red)
|
||||
|
||||
' Match Referee
|
||||
_referee = New person(Referee)
|
||||
|
||||
' Match Round Timer
|
||||
_matchTimer = New match_timer(My.Settings.match_round_time_minutes, My.Settings.match_round_time_seconds)
|
||||
|
||||
' Match Break Timer
|
||||
_matchBreak = New match_timer(My.Settings.match_break_time_minutes, My.Settings.match_break_time_seconds)
|
||||
|
||||
' Sudden Death Option
|
||||
_enaSudenDth = My.Settings.match_enable_sudden_death
|
||||
|
||||
' Max Score Difference Option
|
||||
_enaMaxSdiff = My.Settings.match_enable_max_difference
|
||||
|
||||
End Sub
|
||||
|
||||
'-----------------------------------------------------------------
|
||||
' READING MATCH NUMBER
|
||||
'-----------------------------------------------------------------
|
||||
|
||||
' THIS FUNCTION GETS THE NEWLY CREATED MATCH NUMBER
|
||||
|
||||
Private Sub GetMatchData()
|
||||
|
||||
Dim QRY As String = "SELECT ecn, ern, emn, blue_fighter, red_fighter FROM test.event_matches where emn = " & _match_id & " and started = 0 and ended = 0 and (not isnull(red_fighter)) and (not isnull(blue_fighter)) order by ern, emn asc"
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
|
||||
Try
|
||||
_blue = New friendly_fighter(RDR("blue_fighter"))
|
||||
Catch ex As Exception
|
||||
_blue = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
_red = New friendly_fighter(RDR("red_fighter"))
|
||||
Catch ex As Exception
|
||||
_red = Nothing
|
||||
End Try
|
||||
|
||||
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
' THIS FUNCTION RETURNS AVAILABLE NUMBER FOR A NEW MATCH
|
||||
|
||||
Private Function GetAvailableNewMatchID() As Integer
|
||||
|
||||
' Select the Unstarted Matches From The Match Sequence
|
||||
Dim QRY As String = ("
|
||||
select
|
||||
person.id as 'pid',
|
||||
person.fname,
|
||||
person.mname,
|
||||
person.lname,
|
||||
TIMESTAMPDIFF(YEAR, person.date_of_birth, CURDATE()) as 'age',
|
||||
person.date_of_birth,
|
||||
person.category,
|
||||
person.weight,
|
||||
person.weight_class,
|
||||
person.gender,
|
||||
person.picture,
|
||||
clubs.title as 'club',
|
||||
clubs.logo as 'logo',
|
||||
countries.iso3 as 'country',
|
||||
countries.flatflag as 'flag'
|
||||
FROM
|
||||
person
|
||||
left join
|
||||
clubs on person.club = clubs.id
|
||||
left join
|
||||
countries on person.country = countries.id
|
||||
where
|
||||
person.id=1
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim NUM As Integer
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
Try
|
||||
NUM = RDR("ID")
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return NUM
|
||||
|
||||
End Function
|
||||
|
||||
Public Sub StartMatch()
|
||||
|
||||
' Update The Table With The Winner ID
|
||||
Dim QRY As String = ("
|
||||
SET SQL_SAFE_UPDATES = 0;
|
||||
|
||||
UPDATE
|
||||
`event_matches`
|
||||
SET
|
||||
`started` = 1
|
||||
WHERE
|
||||
`emn` = " & _match_id & ";
|
||||
")
|
||||
|
||||
' Executing The Command
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub EndMatch()
|
||||
|
||||
' Testing This Condition
|
||||
If _match_id = 0 Or _match_id = Nothing Then Exit Sub
|
||||
|
||||
' Update The Table With The Winner ID
|
||||
Dim QRY As String = ("
|
||||
SET SQL_SAFE_UPDATES = 0;
|
||||
|
||||
UPDATE
|
||||
`event_matches`
|
||||
SET
|
||||
`ended` = 1
|
||||
WHERE
|
||||
`emn` = " & _match_id & ";
|
||||
")
|
||||
|
||||
' Executing The Command
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
'-----------------------------------------------------------------
|
||||
' METHODES OF ENDING A MATCH
|
||||
'-----------------------------------------------------------------
|
||||
|
||||
' THIS SUB ENDS THE MATCH AUTOMATICALLY BY CALCULATING THE POINTS
|
||||
Private Sub AutoEndMatch()
|
||||
|
||||
' Winner ID Holder
|
||||
Dim WinnerID As Integer
|
||||
|
||||
' This Is Where We Do Decision Making
|
||||
If _blue.Score > _red.Score Then
|
||||
WinnerID = _blue.Person.ID ' Blue Fighter Wins
|
||||
ElseIf _blue.Score < _red.Score Then
|
||||
WinnerID = _red.Person.ID ' Red Fighter Wins
|
||||
End If
|
||||
|
||||
' Update The Table With The Winner ID
|
||||
Dim QRY As String = ("
|
||||
SET SQL_SAFE_UPDATES = 0;
|
||||
|
||||
UPDATE
|
||||
`event_matches`
|
||||
SET
|
||||
`blue_score` = " & _blue.Score & ",
|
||||
`blue_foul` = " & _blue.Gamjum & ",
|
||||
`red_score` = " & _red.Score & ",
|
||||
`red_foul` = " & _red.Gamjum & ",
|
||||
`winner` = " & WinnerID & ",
|
||||
`ended` = 1
|
||||
WHERE
|
||||
`emn` = " & _match_id & ";
|
||||
")
|
||||
|
||||
' Executing The Command
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
' THIS SUB ENDS THE MATCH MANUALLY BY THE MAIN REFEREE IF NEEDED TO
|
||||
Private Sub ManualEndMatch(WinnerID As Integer, WinnerBy As String, Note As String)
|
||||
|
||||
' Update The Table With The Winner ID
|
||||
Dim QRY As String = ("
|
||||
SET SQL_SAFE_UPDATES = 0;
|
||||
|
||||
UPDATE
|
||||
`event_matches`
|
||||
SET
|
||||
`blue_score` = " & _blue.Score & ",
|
||||
`blue_foul` = " & _blue.Gamjum & ",
|
||||
`red_score` = " & _red.Score & ",
|
||||
`red_foul` = " & _red.Gamjum & ",
|
||||
`winner` = " & WinnerID & ",
|
||||
`notes` = '" & Note & "',
|
||||
`winnerBy` = '" & WinnerBy & "',
|
||||
`ended` = 1
|
||||
WHERE
|
||||
`emn` = " & _match_id & ";
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
446
Visual Studio Code/Timer Library/forms/friendly/frm_friendly_match.designer.vb
generated
Normal file
@ -0,0 +1,446 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_friendly_match
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.txt_rounds = New System.Windows.Forms.MaskedTextBox()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.chk_sudden_death = New System.Windows.Forms.CheckBox()
|
||||
Me.txt_break_time = New System.Windows.Forms.MaskedTextBox()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.txt_round_time = New System.Windows.Forms.MaskedTextBox()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.cbo_blue = New System.Windows.Forms.ComboBox()
|
||||
Me.cbo_red = New System.Windows.Forms.ComboBox()
|
||||
Me.cbo_referee = New System.Windows.Forms.ComboBox()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.pb_blue_picture = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_red_picture = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_blue_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_red_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.btn_start = New System.Windows.Forms.Button()
|
||||
Me.pb_referee_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_referee_picture = New System.Windows.Forms.PictureBox()
|
||||
Me.btn_back = New System.Windows.Forms.Button()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
CType(Me.pb_blue_picture, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_picture, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_referee_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_referee_picture, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.BackColor = System.Drawing.Color.Blue
|
||||
Me.Label1.ForeColor = System.Drawing.Color.White
|
||||
Me.Label1.Location = New System.Drawing.Point(10, 30)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(120, 28)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Blue Fighter :"
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.BackColor = System.Drawing.Color.Red
|
||||
Me.Label2.ForeColor = System.Drawing.Color.White
|
||||
Me.Label2.Location = New System.Drawing.Point(10, 65)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(120, 28)
|
||||
Me.Label2.TabIndex = 1
|
||||
Me.Label2.Text = "Red Fighter :"
|
||||
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.Button1)
|
||||
Me.GroupBox1.Controls.Add(Me.txt_rounds)
|
||||
Me.GroupBox1.Controls.Add(Me.Label5)
|
||||
Me.GroupBox1.Controls.Add(Me.chk_sudden_death)
|
||||
Me.GroupBox1.Controls.Add(Me.txt_break_time)
|
||||
Me.GroupBox1.Controls.Add(Me.Label6)
|
||||
Me.GroupBox1.Controls.Add(Me.txt_round_time)
|
||||
Me.GroupBox1.Controls.Add(Me.Label4)
|
||||
Me.GroupBox1.Controls.Add(Me.Label3)
|
||||
Me.GroupBox1.ForeColor = System.Drawing.Color.White
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(10, 160)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(390, 175)
|
||||
Me.GroupBox1.TabIndex = 4
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "[ MATCH SETTINGS ]"
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Button1.ForeColor = System.Drawing.Color.White
|
||||
Me.Button1.Location = New System.Drawing.Point(255, 30)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(120, 130)
|
||||
Me.Button1.TabIndex = 17
|
||||
Me.Button1.Text = "Set Hardware"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txt_rounds
|
||||
'
|
||||
Me.txt_rounds.BackColor = System.Drawing.Color.White
|
||||
Me.txt_rounds.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_rounds.Location = New System.Drawing.Point(160, 30)
|
||||
Me.txt_rounds.Mask = "0"
|
||||
Me.txt_rounds.Name = "txt_rounds"
|
||||
Me.txt_rounds.Size = New System.Drawing.Size(85, 26)
|
||||
Me.txt_rounds.TabIndex = 16
|
||||
Me.txt_rounds.Text = "3"
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.Label5.ForeColor = System.Drawing.Color.White
|
||||
Me.Label5.Location = New System.Drawing.Point(10, 135)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(145, 26)
|
||||
Me.Label5.TabIndex = 15
|
||||
Me.Label5.Text = "Sudden Deth :"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'chk_sudden_death
|
||||
'
|
||||
Me.chk_sudden_death.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.chk_sudden_death.Checked = True
|
||||
Me.chk_sudden_death.CheckState = System.Windows.Forms.CheckState.Checked
|
||||
Me.chk_sudden_death.Location = New System.Drawing.Point(160, 135)
|
||||
Me.chk_sudden_death.Name = "chk_sudden_death"
|
||||
Me.chk_sudden_death.Size = New System.Drawing.Size(85, 26)
|
||||
Me.chk_sudden_death.TabIndex = 14
|
||||
Me.chk_sudden_death.Text = "Enable"
|
||||
Me.chk_sudden_death.UseVisualStyleBackColor = False
|
||||
'
|
||||
'txt_break_time
|
||||
'
|
||||
Me.txt_break_time.BackColor = System.Drawing.Color.White
|
||||
Me.txt_break_time.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_break_time.Location = New System.Drawing.Point(160, 100)
|
||||
Me.txt_break_time.Mask = "00:00"
|
||||
Me.txt_break_time.Name = "txt_break_time"
|
||||
Me.txt_break_time.Size = New System.Drawing.Size(85, 26)
|
||||
Me.txt_break_time.TabIndex = 10
|
||||
Me.txt_break_time.Text = "0100"
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.Label6.ForeColor = System.Drawing.Color.White
|
||||
Me.Label6.Location = New System.Drawing.Point(10, 100)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(145, 26)
|
||||
Me.Label6.TabIndex = 9
|
||||
Me.Label6.Text = "Break Time :"
|
||||
Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_round_time
|
||||
'
|
||||
Me.txt_round_time.BackColor = System.Drawing.Color.White
|
||||
Me.txt_round_time.ForeColor = System.Drawing.Color.Black
|
||||
Me.txt_round_time.Location = New System.Drawing.Point(160, 65)
|
||||
Me.txt_round_time.Mask = "00:00"
|
||||
Me.txt_round_time.Name = "txt_round_time"
|
||||
Me.txt_round_time.Size = New System.Drawing.Size(85, 26)
|
||||
Me.txt_round_time.TabIndex = 8
|
||||
Me.txt_round_time.Text = "0200"
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.Label4.ForeColor = System.Drawing.Color.White
|
||||
Me.Label4.Location = New System.Drawing.Point(10, 65)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(145, 26)
|
||||
Me.Label4.TabIndex = 7
|
||||
Me.Label4.Text = "Round Time :"
|
||||
Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.Label3.ForeColor = System.Drawing.Color.White
|
||||
Me.Label3.Location = New System.Drawing.Point(10, 30)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(145, 26)
|
||||
Me.Label3.TabIndex = 5
|
||||
Me.Label3.Text = "Max Round :"
|
||||
Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label7.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label7.Location = New System.Drawing.Point(10, 100)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(120, 28)
|
||||
Me.Label7.TabIndex = 5
|
||||
Me.Label7.Text = "Referee :"
|
||||
Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'cbo_blue
|
||||
'
|
||||
Me.cbo_blue.FormattingEnabled = True
|
||||
Me.cbo_blue.Location = New System.Drawing.Point(135, 30)
|
||||
Me.cbo_blue.Name = "cbo_blue"
|
||||
Me.cbo_blue.Size = New System.Drawing.Size(245, 28)
|
||||
Me.cbo_blue.TabIndex = 7
|
||||
'
|
||||
'cbo_red
|
||||
'
|
||||
Me.cbo_red.FormattingEnabled = True
|
||||
Me.cbo_red.Location = New System.Drawing.Point(135, 65)
|
||||
Me.cbo_red.Name = "cbo_red"
|
||||
Me.cbo_red.Size = New System.Drawing.Size(245, 28)
|
||||
Me.cbo_red.TabIndex = 8
|
||||
'
|
||||
'cbo_referee
|
||||
'
|
||||
Me.cbo_referee.FormattingEnabled = True
|
||||
Me.cbo_referee.Location = New System.Drawing.Point(135, 100)
|
||||
Me.cbo_referee.Name = "cbo_referee"
|
||||
Me.cbo_referee.Size = New System.Drawing.Size(245, 28)
|
||||
Me.cbo_referee.TabIndex = 9
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.Label1)
|
||||
Me.GroupBox2.Controls.Add(Me.cbo_referee)
|
||||
Me.GroupBox2.Controls.Add(Me.Label2)
|
||||
Me.GroupBox2.Controls.Add(Me.cbo_red)
|
||||
Me.GroupBox2.Controls.Add(Me.Label7)
|
||||
Me.GroupBox2.Controls.Add(Me.cbo_blue)
|
||||
Me.GroupBox2.ForeColor = System.Drawing.Color.White
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(10, 10)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(390, 140)
|
||||
Me.GroupBox2.TabIndex = 10
|
||||
Me.GroupBox2.TabStop = False
|
||||
Me.GroupBox2.Text = "[ COMPETITORS ]"
|
||||
'
|
||||
'pb_blue_picture
|
||||
'
|
||||
Me.pb_blue_picture.BackColor = System.Drawing.Color.Blue
|
||||
Me.pb_blue_picture.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_blue_picture.Location = New System.Drawing.Point(410, 70)
|
||||
Me.pb_blue_picture.Name = "pb_blue_picture"
|
||||
Me.pb_blue_picture.Size = New System.Drawing.Size(200, 210)
|
||||
Me.pb_blue_picture.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_picture.TabIndex = 11
|
||||
Me.pb_blue_picture.TabStop = False
|
||||
'
|
||||
'pb_red_picture
|
||||
'
|
||||
Me.pb_red_picture.BackColor = System.Drawing.Color.Red
|
||||
Me.pb_red_picture.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_red_picture.Location = New System.Drawing.Point(820, 70)
|
||||
Me.pb_red_picture.Name = "pb_red_picture"
|
||||
Me.pb_red_picture.Size = New System.Drawing.Size(200, 210)
|
||||
Me.pb_red_picture.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_picture.TabIndex = 12
|
||||
Me.pb_red_picture.TabStop = False
|
||||
'
|
||||
'pb_blue_flag
|
||||
'
|
||||
Me.pb_blue_flag.BackColor = System.Drawing.Color.Blue
|
||||
Me.pb_blue_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_blue_flag.Location = New System.Drawing.Point(410, 286)
|
||||
Me.pb_blue_flag.Name = "pb_blue_flag"
|
||||
Me.pb_blue_flag.Size = New System.Drawing.Size(200, 105)
|
||||
Me.pb_blue_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_flag.TabIndex = 13
|
||||
Me.pb_blue_flag.TabStop = False
|
||||
'
|
||||
'pb_red_flag
|
||||
'
|
||||
Me.pb_red_flag.BackColor = System.Drawing.Color.Red
|
||||
Me.pb_red_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_red_flag.Location = New System.Drawing.Point(820, 285)
|
||||
Me.pb_red_flag.Name = "pb_red_flag"
|
||||
Me.pb_red_flag.Size = New System.Drawing.Size(200, 105)
|
||||
Me.pb_red_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_flag.TabIndex = 14
|
||||
Me.pb_red_flag.TabStop = False
|
||||
'
|
||||
'btn_start
|
||||
'
|
||||
Me.btn_start.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_start.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_start.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_start.Location = New System.Drawing.Point(210, 345)
|
||||
Me.btn_start.Name = "btn_start"
|
||||
Me.btn_start.Size = New System.Drawing.Size(190, 45)
|
||||
Me.btn_start.TabIndex = 15
|
||||
Me.btn_start.Text = "Start"
|
||||
Me.btn_start.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pb_referee_flag
|
||||
'
|
||||
Me.pb_referee_flag.BackColor = System.Drawing.Color.Yellow
|
||||
Me.pb_referee_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_referee_flag.Location = New System.Drawing.Point(615, 286)
|
||||
Me.pb_referee_flag.Name = "pb_referee_flag"
|
||||
Me.pb_referee_flag.Size = New System.Drawing.Size(200, 105)
|
||||
Me.pb_referee_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_referee_flag.TabIndex = 17
|
||||
Me.pb_referee_flag.TabStop = False
|
||||
'
|
||||
'pb_referee_picture
|
||||
'
|
||||
Me.pb_referee_picture.BackColor = System.Drawing.Color.Yellow
|
||||
Me.pb_referee_picture.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_referee_picture.Location = New System.Drawing.Point(615, 70)
|
||||
Me.pb_referee_picture.Name = "pb_referee_picture"
|
||||
Me.pb_referee_picture.Size = New System.Drawing.Size(201, 210)
|
||||
Me.pb_referee_picture.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_referee_picture.TabIndex = 16
|
||||
Me.pb_referee_picture.TabStop = False
|
||||
'
|
||||
'btn_back
|
||||
'
|
||||
Me.btn_back.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_back.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_back.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_back.Location = New System.Drawing.Point(10, 345)
|
||||
Me.btn_back.Name = "btn_back"
|
||||
Me.btn_back.Size = New System.Drawing.Size(190, 45)
|
||||
Me.btn_back.TabIndex = 18
|
||||
Me.btn_back.Text = "< Back"
|
||||
Me.btn_back.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.BackColor = System.Drawing.Color.Blue
|
||||
Me.Label8.ForeColor = System.Drawing.Color.White
|
||||
Me.Label8.Location = New System.Drawing.Point(410, 10)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(200, 55)
|
||||
Me.Label8.TabIndex = 19
|
||||
Me.Label8.Text = "BLUE CORNER" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(CHONG)"
|
||||
Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.BackColor = System.Drawing.Color.Red
|
||||
Me.Label9.ForeColor = System.Drawing.Color.White
|
||||
Me.Label9.Location = New System.Drawing.Point(820, 10)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(200, 55)
|
||||
Me.Label9.TabIndex = 20
|
||||
Me.Label9.Text = "RED CORNER" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(HONG)"
|
||||
Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.BackColor = System.Drawing.Color.Yellow
|
||||
Me.Label10.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label10.Location = New System.Drawing.Point(615, 10)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(200, 55)
|
||||
Me.Label10.TabIndex = 21
|
||||
Me.Label10.Text = "REFEREE" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(SIMPAN)"
|
||||
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'frm_friendly_match
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(10.0!, 20.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(1032, 401)
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.Label9)
|
||||
Me.Controls.Add(Me.Label10)
|
||||
Me.Controls.Add(Me.btn_back)
|
||||
Me.Controls.Add(Me.pb_referee_flag)
|
||||
Me.Controls.Add(Me.pb_referee_picture)
|
||||
Me.Controls.Add(Me.btn_start)
|
||||
Me.Controls.Add(Me.pb_red_flag)
|
||||
Me.Controls.Add(Me.pb_blue_flag)
|
||||
Me.Controls.Add(Me.pb_red_picture)
|
||||
Me.Controls.Add(Me.pb_blue_picture)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Margin = New System.Windows.Forms.Padding(5)
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "frm_friendly_match"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Create New Match"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
CType(Me.pb_blue_picture, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_picture, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_referee_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_referee_picture, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents txt_break_time As System.Windows.Forms.MaskedTextBox
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
Friend WithEvents txt_round_time As System.Windows.Forms.MaskedTextBox
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label7 As System.Windows.Forms.Label
|
||||
Friend WithEvents cbo_blue As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents cbo_red As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents cbo_referee As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents chk_sudden_death As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents pb_blue_picture As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents pb_red_picture As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents pb_blue_flag As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents pb_red_flag As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents txt_rounds As System.Windows.Forms.MaskedTextBox
|
||||
Friend WithEvents btn_start As System.Windows.Forms.Button
|
||||
Friend WithEvents pb_referee_flag As PictureBox
|
||||
Friend WithEvents pb_referee_picture As PictureBox
|
||||
Friend WithEvents btn_back As Button
|
||||
Friend WithEvents Label8 As Label
|
||||
Friend WithEvents Label9 As Label
|
||||
Friend WithEvents Label10 As Label
|
||||
Friend WithEvents Button1 As Button
|
||||
End Class
|
||||
@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@ -0,0 +1,217 @@
|
||||
Imports System.ComponentModel
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class frm_friendly_match
|
||||
|
||||
Public FriendlyMatch As friendly_match
|
||||
Public red As friendly_fighter
|
||||
Public blue As friendly_fighter
|
||||
Public referee As person
|
||||
|
||||
Private Sub frm_new_match_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
SubPopulateComboBox(GetPersonList(), cbo_blue)
|
||||
SubPopulateComboBox(GetPersonList(), cbo_referee)
|
||||
SubPopulateComboBox(GetPersonList(), cbo_red)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_blue_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_blue.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
|
||||
blue = New friendly_fighter(cbo_blue.SelectedValue)
|
||||
|
||||
Try
|
||||
pb_blue_picture.Image = Image.FromStream(blue.Person.PICTURE)
|
||||
Catch ex As Exception
|
||||
pb_blue_picture.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_blue_flag.Image = Image.FromStream(blue.Person.TEAM.Country.Flag)
|
||||
Catch ex As Exception
|
||||
pb_blue_flag.Image = Nothing
|
||||
End Try
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_red_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_red.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
|
||||
red = New friendly_fighter(cbo_red.SelectedValue)
|
||||
|
||||
Try
|
||||
pb_red_picture.Image = Image.FromStream(red.Person.PICTURE)
|
||||
Catch ex As Exception
|
||||
pb_red_picture.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_red_flag.Image = Image.FromStream(red.Person.TEAM.Country.Flag)
|
||||
Catch ex As Exception
|
||||
pb_red_flag.Image = Nothing
|
||||
End Try
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbo_referee_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_referee.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
|
||||
referee = New person(cbo_referee.SelectedValue)
|
||||
|
||||
Try
|
||||
pb_referee_picture.Image = Image.FromStream(referee.PICTURE)
|
||||
Catch ex As Exception
|
||||
pb_referee_picture.Image = Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
pb_referee_flag.Image = Image.FromStream(referee.TEAM.Country.Flag)
|
||||
Catch ex As Exception
|
||||
pb_referee_flag.Image = Nothing
|
||||
End Try
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_back_Click(sender As Object, e As EventArgs) Handles btn_back.Click
|
||||
|
||||
frm_main.Show()
|
||||
Me.Close()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_new_match_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
|
||||
|
||||
frm_main.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub pb_blue_picture_Click(sender As Object, e As EventArgs) Handles pb_blue_picture.Click
|
||||
|
||||
If IsNothing(pb_blue_picture.Image) Then
|
||||
|
||||
' Open Picture File
|
||||
ResizePicture(pb_blue_picture, 500, 500)
|
||||
|
||||
' Store The Picture
|
||||
blue.Person.UpdatePicture(pb_blue_picture)
|
||||
|
||||
ElseIf Not IsNothing(pb_blue_picture.Image) Then
|
||||
|
||||
Dim iPictureUpdate As DialogResult = MessageBox.Show("Would You Like To Update The Players Picture ?", "Picture Update", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
|
||||
If iPictureUpdate = DialogResult.Yes Then
|
||||
|
||||
' Open Picture File
|
||||
ResizePicture(pb_blue_picture, 500, 500)
|
||||
|
||||
' Store The Picture
|
||||
blue.Person.UpdatePicture(pb_blue_picture)
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub pb_referee_picture_Click(sender As Object, e As EventArgs) Handles pb_referee_picture.Click
|
||||
|
||||
If IsNothing(pb_referee_picture.Image) Then
|
||||
|
||||
' Open Picture File
|
||||
ResizePicture(pb_referee_picture, 500, 500)
|
||||
|
||||
' Store The Picture
|
||||
referee.UpdatePicture(pb_referee_picture)
|
||||
|
||||
ElseIf Not IsNothing(pb_referee_picture.Image) Then
|
||||
|
||||
Dim iPictureUpdate As DialogResult = MessageBox.Show("Would You Like To Update The Players Picture ?", "Picture Update", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
|
||||
If iPictureUpdate = DialogResult.Yes Then
|
||||
|
||||
' Open Picture File
|
||||
ResizePicture(pb_referee_picture, 500, 500)
|
||||
|
||||
' Store The Picture
|
||||
referee.UpdatePicture(pb_referee_picture)
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub pb_red_picture_Click(sender As Object, e As EventArgs) Handles pb_red_picture.Click
|
||||
|
||||
If IsNothing(pb_red_picture.Image) Then
|
||||
|
||||
' Open Picture File
|
||||
ResizePicture(pb_red_picture, 500, 500)
|
||||
|
||||
' Store The Picture
|
||||
red.Person.UpdatePicture(pb_red_picture)
|
||||
|
||||
ElseIf Not IsNothing(pb_red_picture.Image) Then
|
||||
|
||||
Dim iPictureUpdate As DialogResult = MessageBox.Show("Would You Like To Update The Players Picture ?", "Picture Update", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
|
||||
If iPictureUpdate = DialogResult.Yes Then
|
||||
|
||||
' Open Picture File
|
||||
ResizePicture(pb_red_picture, 500, 500)
|
||||
|
||||
' Store The Picture
|
||||
red.Person.UpdatePicture(pb_red_picture)
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_start_Click(sender As Object, e As EventArgs) Handles btn_start.Click
|
||||
|
||||
' checking routine
|
||||
If CheckEntry() = True Then
|
||||
FriendlyMatch = New friendly_match(blue.Person.ID, red.Person.ID, referee.ID, 3)
|
||||
frm_friendly_scorecontrol.Show()
|
||||
Me.Hide()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Function CheckEntry() As Boolean
|
||||
|
||||
If blue.Person.ID = red.Person.ID Then
|
||||
MsgBox("Blue & Red Fighters Can't Be The Same Person", vbOKOnly + vbCritical, "Fighters Selection Error")
|
||||
Return False
|
||||
ElseIf blue.Person.ID = referee.ID Then
|
||||
MsgBox("Blue Fighter & Referee Can't Be The Same Person", vbOKOnly + vbCritical, "Fighter Referee Selection Error")
|
||||
Return False
|
||||
ElseIf red.Person.ID = referee.ID Then
|
||||
MsgBox("Red Fighter & Referee Cant Be The Same Person", vbOKOnly + vbCritical, "Fighter Referee Selection Error")
|
||||
Return False
|
||||
Else
|
||||
Return True
|
||||
End If
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
811
Visual Studio Code/Timer Library/forms/friendly/frm_friendly_scorecontrol.Designer.vb
generated
Normal file
@ -0,0 +1,811 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_friendly_scorecontrol
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Me.lbl_blue_gender = New System.Windows.Forms.Label()
|
||||
Me.btn_end = New System.Windows.Forms.Button()
|
||||
Me.btn_start = New System.Windows.Forms.Button()
|
||||
Me.round_countdown = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.btn_red_ngf = New System.Windows.Forms.Button()
|
||||
Me.btn_red_pgf = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_ngf = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_pgf = New System.Windows.Forms.Button()
|
||||
Me.tmr_display = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.break_countdown = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.lbl_red_gender = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_weight_category = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_weight_category = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_weight_class = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_weight_class = New System.Windows.Forms.Label()
|
||||
Me.btn_dec_match = New System.Windows.Forms.Button()
|
||||
Me.btn_inc_match = New System.Windows.Forms.Button()
|
||||
Me.pb_red_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_blue_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.btn_red_dhkn = New System.Windows.Forms.Button()
|
||||
Me.btn_red_dhkp = New System.Windows.Forms.Button()
|
||||
Me.btn_red_sbkn = New System.Windows.Forms.Button()
|
||||
Me.btn_red_sbkp = New System.Windows.Forms.Button()
|
||||
Me.btn_red_dbkn = New System.Windows.Forms.Button()
|
||||
Me.btn_red_dbkp = New System.Windows.Forms.Button()
|
||||
Me.btn_red_shkn = New System.Windows.Forms.Button()
|
||||
Me.btn_red_shkp = New System.Windows.Forms.Button()
|
||||
Me.lbl_round = New System.Windows.Forms.Label()
|
||||
Me.pb_red_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_red_gamjum = New System.Windows.Forms.Label()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_code_3 = New System.Windows.Forms.Label()
|
||||
Me.btn_blue_dbkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_dbkp = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_sbkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_sbkp = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_dhkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_dhkp = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_shkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_shkp = New System.Windows.Forms.Button()
|
||||
Me.lbl_match_number = New System.Windows.Forms.Label()
|
||||
Me.lbl_time = New System.Windows.Forms.Label()
|
||||
Me.lbl_court_number = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_team = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_score = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_fighter_name = New System.Windows.Forms.Label()
|
||||
Me.pb_blue_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_blue_gamjum = New System.Windows.Forms.Label()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_code_3 = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_team = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_score = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_fighter_name = New System.Windows.Forms.Label()
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbl_blue_gender
|
||||
'
|
||||
Me.lbl_blue_gender.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_gender.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_gender.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_blue_gender.Location = New System.Drawing.Point(135, 335)
|
||||
Me.lbl_blue_gender.Name = "lbl_blue_gender"
|
||||
Me.lbl_blue_gender.Size = New System.Drawing.Size(235, 30)
|
||||
Me.lbl_blue_gender.TabIndex = 123
|
||||
Me.lbl_blue_gender.Text = "Gender"
|
||||
Me.lbl_blue_gender.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_end
|
||||
'
|
||||
Me.btn_end.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_end.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_end.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_end.Location = New System.Drawing.Point(375, 330)
|
||||
Me.btn_end.Name = "btn_end"
|
||||
Me.btn_end.Size = New System.Drawing.Size(85, 30)
|
||||
Me.btn_end.TabIndex = 110
|
||||
Me.btn_end.Text = "END"
|
||||
Me.btn_end.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_start
|
||||
'
|
||||
Me.btn_start.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_start.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_start.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_start.Location = New System.Drawing.Point(375, 295)
|
||||
Me.btn_start.Name = "btn_start"
|
||||
Me.btn_start.Size = New System.Drawing.Size(85, 30)
|
||||
Me.btn_start.TabIndex = 109
|
||||
Me.btn_start.Text = "START"
|
||||
Me.btn_start.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_ngf
|
||||
'
|
||||
Me.btn_red_ngf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_ngf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_ngf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_ngf.Location = New System.Drawing.Point(705, 340)
|
||||
Me.btn_red_ngf.Name = "btn_red_ngf"
|
||||
Me.btn_red_ngf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_red_ngf.TabIndex = 114
|
||||
Me.btn_red_ngf.Text = "-"
|
||||
Me.btn_red_ngf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_pgf
|
||||
'
|
||||
Me.btn_red_pgf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_pgf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_pgf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_pgf.Location = New System.Drawing.Point(705, 310)
|
||||
Me.btn_red_pgf.Name = "btn_red_pgf"
|
||||
Me.btn_red_pgf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_red_pgf.TabIndex = 113
|
||||
Me.btn_red_pgf.Text = "+"
|
||||
Me.btn_red_pgf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_ngf
|
||||
'
|
||||
Me.btn_blue_ngf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_ngf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_ngf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_ngf.Location = New System.Drawing.Point(105, 340)
|
||||
Me.btn_blue_ngf.Name = "btn_blue_ngf"
|
||||
Me.btn_blue_ngf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_blue_ngf.TabIndex = 112
|
||||
Me.btn_blue_ngf.Text = "-"
|
||||
Me.btn_blue_ngf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_pgf
|
||||
'
|
||||
Me.btn_blue_pgf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_pgf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_pgf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_pgf.Location = New System.Drawing.Point(105, 310)
|
||||
Me.btn_blue_pgf.Name = "btn_blue_pgf"
|
||||
Me.btn_blue_pgf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_blue_pgf.TabIndex = 111
|
||||
Me.btn_blue_pgf.Text = "+"
|
||||
Me.btn_blue_pgf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'tmr_display
|
||||
'
|
||||
Me.tmr_display.Enabled = True
|
||||
Me.tmr_display.Interval = 1
|
||||
'
|
||||
'lbl_red_gender
|
||||
'
|
||||
Me.lbl_red_gender.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_gender.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_gender.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_red_gender.Location = New System.Drawing.Point(465, 335)
|
||||
Me.lbl_red_gender.Name = "lbl_red_gender"
|
||||
Me.lbl_red_gender.Size = New System.Drawing.Size(235, 30)
|
||||
Me.lbl_red_gender.TabIndex = 124
|
||||
Me.lbl_red_gender.Text = "Gender"
|
||||
Me.lbl_red_gender.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_weight_category
|
||||
'
|
||||
Me.lbl_red_weight_category.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_weight_category.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_weight_category.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_red_weight_category.Location = New System.Drawing.Point(635, 140)
|
||||
Me.lbl_red_weight_category.Name = "lbl_red_weight_category"
|
||||
Me.lbl_red_weight_category.Size = New System.Drawing.Size(95, 30)
|
||||
Me.lbl_red_weight_category.TabIndex = 122
|
||||
Me.lbl_red_weight_category.Text = "Category"
|
||||
Me.lbl_red_weight_category.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_weight_category
|
||||
'
|
||||
Me.lbl_blue_weight_category.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_weight_category.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_weight_category.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_blue_weight_category.Location = New System.Drawing.Point(105, 140)
|
||||
Me.lbl_blue_weight_category.Name = "lbl_blue_weight_category"
|
||||
Me.lbl_blue_weight_category.Size = New System.Drawing.Size(95, 30)
|
||||
Me.lbl_blue_weight_category.TabIndex = 121
|
||||
Me.lbl_blue_weight_category.Text = "Category"
|
||||
Me.lbl_blue_weight_category.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_weight_class
|
||||
'
|
||||
Me.lbl_red_weight_class.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_weight_class.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_weight_class.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_red_weight_class.Location = New System.Drawing.Point(425, 140)
|
||||
Me.lbl_red_weight_class.Name = "lbl_red_weight_class"
|
||||
Me.lbl_red_weight_class.Size = New System.Drawing.Size(120, 30)
|
||||
Me.lbl_red_weight_class.TabIndex = 120
|
||||
Me.lbl_red_weight_class.Text = "Weight Class"
|
||||
Me.lbl_red_weight_class.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_weight_class
|
||||
'
|
||||
Me.lbl_blue_weight_class.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_weight_class.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_weight_class.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_blue_weight_class.Location = New System.Drawing.Point(290, 140)
|
||||
Me.lbl_blue_weight_class.Name = "lbl_blue_weight_class"
|
||||
Me.lbl_blue_weight_class.Size = New System.Drawing.Size(120, 30)
|
||||
Me.lbl_blue_weight_class.TabIndex = 119
|
||||
Me.lbl_blue_weight_class.Text = "Weight Class"
|
||||
Me.lbl_blue_weight_class.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_dec_match
|
||||
'
|
||||
Me.btn_dec_match.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_dec_match.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_dec_match.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_dec_match.Location = New System.Drawing.Point(800, 50)
|
||||
Me.btn_dec_match.Name = "btn_dec_match"
|
||||
Me.btn_dec_match.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_dec_match.TabIndex = 118
|
||||
Me.btn_dec_match.Text = "-"
|
||||
Me.btn_dec_match.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_inc_match
|
||||
'
|
||||
Me.btn_inc_match.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_inc_match.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_inc_match.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_inc_match.Location = New System.Drawing.Point(800, 15)
|
||||
Me.btn_inc_match.Name = "btn_inc_match"
|
||||
Me.btn_inc_match.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_inc_match.TabIndex = 117
|
||||
Me.btn_inc_match.Text = "+"
|
||||
Me.btn_inc_match.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pb_red_logo
|
||||
'
|
||||
Me.pb_red_logo.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_red_logo.Location = New System.Drawing.Point(740, 200)
|
||||
Me.pb_red_logo.Name = "pb_red_logo"
|
||||
Me.pb_red_logo.Size = New System.Drawing.Size(90, 90)
|
||||
Me.pb_red_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_logo.TabIndex = 116
|
||||
Me.pb_red_logo.TabStop = False
|
||||
'
|
||||
'pb_blue_logo
|
||||
'
|
||||
Me.pb_blue_logo.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_blue_logo.Location = New System.Drawing.Point(5, 200)
|
||||
Me.pb_blue_logo.Name = "pb_blue_logo"
|
||||
Me.pb_blue_logo.Size = New System.Drawing.Size(90, 90)
|
||||
Me.pb_blue_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_logo.TabIndex = 115
|
||||
Me.pb_blue_logo.TabStop = False
|
||||
'
|
||||
'btn_red_dhkn
|
||||
'
|
||||
Me.btn_red_dhkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_dhkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_dhkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_dhkn.Location = New System.Drawing.Point(630, 450)
|
||||
Me.btn_red_dhkn.Name = "btn_red_dhkn"
|
||||
Me.btn_red_dhkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_dhkn.TabIndex = 108
|
||||
Me.btn_red_dhkn.Text = "Direct HK -"
|
||||
Me.btn_red_dhkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_dhkp
|
||||
'
|
||||
Me.btn_red_dhkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_dhkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_dhkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_dhkp.Location = New System.Drawing.Point(630, 420)
|
||||
Me.btn_red_dhkp.Name = "btn_red_dhkp"
|
||||
Me.btn_red_dhkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_dhkp.TabIndex = 107
|
||||
Me.btn_red_dhkp.Text = "Direct HK +"
|
||||
Me.btn_red_dhkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_sbkn
|
||||
'
|
||||
Me.btn_red_sbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_sbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_sbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_sbkn.Location = New System.Drawing.Point(525, 450)
|
||||
Me.btn_red_sbkn.Name = "btn_red_sbkn"
|
||||
Me.btn_red_sbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_sbkn.TabIndex = 106
|
||||
Me.btn_red_sbkn.Text = "Spin BK -"
|
||||
Me.btn_red_sbkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_sbkp
|
||||
'
|
||||
Me.btn_red_sbkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_sbkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_sbkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_sbkp.Location = New System.Drawing.Point(525, 420)
|
||||
Me.btn_red_sbkp.Name = "btn_red_sbkp"
|
||||
Me.btn_red_sbkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_sbkp.TabIndex = 105
|
||||
Me.btn_red_sbkp.Text = "Spin BK +"
|
||||
Me.btn_red_sbkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_dbkn
|
||||
'
|
||||
Me.btn_red_dbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_dbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_dbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_dbkn.Location = New System.Drawing.Point(420, 450)
|
||||
Me.btn_red_dbkn.Name = "btn_red_dbkn"
|
||||
Me.btn_red_dbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_dbkn.TabIndex = 104
|
||||
Me.btn_red_dbkn.Text = "Direct BK -"
|
||||
Me.btn_red_dbkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_dbkp
|
||||
'
|
||||
Me.btn_red_dbkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_dbkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_dbkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_dbkp.Location = New System.Drawing.Point(420, 420)
|
||||
Me.btn_red_dbkp.Name = "btn_red_dbkp"
|
||||
Me.btn_red_dbkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_dbkp.TabIndex = 103
|
||||
Me.btn_red_dbkp.Text = "Direct BK +"
|
||||
Me.btn_red_dbkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_shkn
|
||||
'
|
||||
Me.btn_red_shkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_shkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_shkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_shkn.Location = New System.Drawing.Point(735, 450)
|
||||
Me.btn_red_shkn.Name = "btn_red_shkn"
|
||||
Me.btn_red_shkn.Size = New System.Drawing.Size(95, 25)
|
||||
Me.btn_red_shkn.TabIndex = 102
|
||||
Me.btn_red_shkn.Text = "Spin HK -"
|
||||
Me.btn_red_shkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_shkp
|
||||
'
|
||||
Me.btn_red_shkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_shkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_shkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_shkp.Location = New System.Drawing.Point(735, 420)
|
||||
Me.btn_red_shkp.Name = "btn_red_shkp"
|
||||
Me.btn_red_shkp.Size = New System.Drawing.Size(95, 25)
|
||||
Me.btn_red_shkp.TabIndex = 101
|
||||
Me.btn_red_shkp.Text = "Spin HK +"
|
||||
Me.btn_red_shkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lbl_round
|
||||
'
|
||||
Me.lbl_round.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lbl_round.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_round.Font = New System.Drawing.Font("Microsoft Sans Serif", 48.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_round.ForeColor = System.Drawing.Color.Lime
|
||||
Me.lbl_round.Location = New System.Drawing.Point(375, 185)
|
||||
Me.lbl_round.Name = "lbl_round"
|
||||
Me.lbl_round.Size = New System.Drawing.Size(85, 100)
|
||||
Me.lbl_round.TabIndex = 100
|
||||
Me.lbl_round.Text = "1"
|
||||
Me.lbl_round.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'pb_red_flag
|
||||
'
|
||||
Me.pb_red_flag.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_red_flag.Location = New System.Drawing.Point(740, 135)
|
||||
Me.pb_red_flag.Name = "pb_red_flag"
|
||||
Me.pb_red_flag.Size = New System.Drawing.Size(90, 60)
|
||||
Me.pb_red_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_flag.TabIndex = 99
|
||||
Me.pb_red_flag.TabStop = False
|
||||
'
|
||||
'lbl_red_gamjum
|
||||
'
|
||||
Me.lbl_red_gamjum.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_gamjum.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_gamjum.Font = New System.Drawing.Font("Microsoft Sans Serif", 52.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_gamjum.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_gamjum.Location = New System.Drawing.Point(740, 340)
|
||||
Me.lbl_red_gamjum.Name = "lbl_red_gamjum"
|
||||
Me.lbl_red_gamjum.Size = New System.Drawing.Size(90, 75)
|
||||
Me.lbl_red_gamjum.TabIndex = 98
|
||||
Me.lbl_red_gamjum.Text = "00"
|
||||
Me.lbl_red_gamjum.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.ForeColor = System.Drawing.Color.White
|
||||
Me.Label5.Location = New System.Drawing.Point(740, 295)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(90, 40)
|
||||
Me.Label5.TabIndex = 97
|
||||
Me.Label5.Text = "GAMJUM"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_code_3
|
||||
'
|
||||
Me.lbl_red_code_3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_code_3.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_code_3.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_code_3.Location = New System.Drawing.Point(740, 90)
|
||||
Me.lbl_red_code_3.Name = "lbl_red_code_3"
|
||||
Me.lbl_red_code_3.Size = New System.Drawing.Size(90, 40)
|
||||
Me.lbl_red_code_3.TabIndex = 96
|
||||
Me.lbl_red_code_3.Text = "ISO3"
|
||||
Me.lbl_red_code_3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_blue_dbkn
|
||||
'
|
||||
Me.btn_blue_dbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dbkn.Location = New System.Drawing.Point(315, 450)
|
||||
Me.btn_blue_dbkn.Name = "btn_blue_dbkn"
|
||||
Me.btn_blue_dbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dbkn.TabIndex = 95
|
||||
Me.btn_blue_dbkn.Text = "- Direct BK"
|
||||
Me.btn_blue_dbkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_dbkp
|
||||
'
|
||||
Me.btn_blue_dbkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dbkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dbkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dbkp.Location = New System.Drawing.Point(315, 420)
|
||||
Me.btn_blue_dbkp.Name = "btn_blue_dbkp"
|
||||
Me.btn_blue_dbkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dbkp.TabIndex = 94
|
||||
Me.btn_blue_dbkp.Text = "+ Direct BK"
|
||||
Me.btn_blue_dbkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_sbkn
|
||||
'
|
||||
Me.btn_blue_sbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_sbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_sbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_sbkn.Location = New System.Drawing.Point(210, 450)
|
||||
Me.btn_blue_sbkn.Name = "btn_blue_sbkn"
|
||||
Me.btn_blue_sbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_sbkn.TabIndex = 93
|
||||
Me.btn_blue_sbkn.Text = "- Spin BK"
|
||||
Me.btn_blue_sbkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_sbkp
|
||||
'
|
||||
Me.btn_blue_sbkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_sbkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_sbkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_sbkp.Location = New System.Drawing.Point(210, 420)
|
||||
Me.btn_blue_sbkp.Name = "btn_blue_sbkp"
|
||||
Me.btn_blue_sbkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_sbkp.TabIndex = 92
|
||||
Me.btn_blue_sbkp.Text = "+ Spin BK"
|
||||
Me.btn_blue_sbkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_dhkn
|
||||
'
|
||||
Me.btn_blue_dhkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dhkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dhkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dhkn.Location = New System.Drawing.Point(105, 450)
|
||||
Me.btn_blue_dhkn.Name = "btn_blue_dhkn"
|
||||
Me.btn_blue_dhkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dhkn.TabIndex = 91
|
||||
Me.btn_blue_dhkn.Text = "- Direct HK"
|
||||
Me.btn_blue_dhkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_dhkp
|
||||
'
|
||||
Me.btn_blue_dhkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dhkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dhkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dhkp.Location = New System.Drawing.Point(105, 420)
|
||||
Me.btn_blue_dhkp.Name = "btn_blue_dhkp"
|
||||
Me.btn_blue_dhkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dhkp.TabIndex = 90
|
||||
Me.btn_blue_dhkp.Text = "+ Direct HK"
|
||||
Me.btn_blue_dhkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_shkn
|
||||
'
|
||||
Me.btn_blue_shkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_shkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_shkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_shkn.Location = New System.Drawing.Point(5, 450)
|
||||
Me.btn_blue_shkn.Name = "btn_blue_shkn"
|
||||
Me.btn_blue_shkn.Size = New System.Drawing.Size(95, 25)
|
||||
Me.btn_blue_shkn.TabIndex = 89
|
||||
Me.btn_blue_shkn.Text = "- Spin HK"
|
||||
Me.btn_blue_shkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_shkp
|
||||
'
|
||||
Me.btn_blue_shkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_shkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_shkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_shkp.Location = New System.Drawing.Point(5, 420)
|
||||
Me.btn_blue_shkp.Name = "btn_blue_shkp"
|
||||
Me.btn_blue_shkp.Size = New System.Drawing.Size(95, 25)
|
||||
Me.btn_blue_shkp.TabIndex = 88
|
||||
Me.btn_blue_shkp.Text = "+ Spin HK"
|
||||
Me.btn_blue_shkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lbl_match_number
|
||||
'
|
||||
Me.lbl_match_number.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_match_number.Font = New System.Drawing.Font("Microsoft Sans Serif", 75.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_match_number.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_match_number.Location = New System.Drawing.Point(555, 5)
|
||||
Me.lbl_match_number.Name = "lbl_match_number"
|
||||
Me.lbl_match_number.Size = New System.Drawing.Size(275, 80)
|
||||
Me.lbl_match_number.TabIndex = 87
|
||||
Me.lbl_match_number.Text = "M000"
|
||||
Me.lbl_match_number.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_time
|
||||
'
|
||||
Me.lbl_time.Font = New System.Drawing.Font("Microsoft Sans Serif", 85.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_time.ForeColor = System.Drawing.Color.Lime
|
||||
Me.lbl_time.Location = New System.Drawing.Point(285, -5)
|
||||
Me.lbl_time.Name = "lbl_time"
|
||||
Me.lbl_time.Size = New System.Drawing.Size(265, 95)
|
||||
Me.lbl_time.TabIndex = 86
|
||||
Me.lbl_time.Text = "00:00"
|
||||
Me.lbl_time.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_court_number
|
||||
'
|
||||
Me.lbl_court_number.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_court_number.Font = New System.Drawing.Font("Microsoft Sans Serif", 75.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_court_number.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_court_number.Location = New System.Drawing.Point(5, 5)
|
||||
Me.lbl_court_number.Name = "lbl_court_number"
|
||||
Me.lbl_court_number.Size = New System.Drawing.Size(275, 80)
|
||||
Me.lbl_court_number.TabIndex = 85
|
||||
Me.lbl_court_number.Text = "C000"
|
||||
Me.lbl_court_number.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_team
|
||||
'
|
||||
Me.lbl_red_team.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_team.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_team.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_team.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_team.Location = New System.Drawing.Point(420, 375)
|
||||
Me.lbl_red_team.Name = "lbl_red_team"
|
||||
Me.lbl_red_team.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_red_team.TabIndex = 84
|
||||
Me.lbl_red_team.Text = "BLUE TEAM"
|
||||
Me.lbl_red_team.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_score
|
||||
'
|
||||
Me.lbl_red_score.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_score.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_score.Font = New System.Drawing.Font("Microsoft Sans Serif", 170.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_score.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_score.Location = New System.Drawing.Point(420, 135)
|
||||
Me.lbl_red_score.Name = "lbl_red_score"
|
||||
Me.lbl_red_score.Size = New System.Drawing.Size(315, 235)
|
||||
Me.lbl_red_score.TabIndex = 83
|
||||
Me.lbl_red_score.Text = "00"
|
||||
Me.lbl_red_score.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_fighter_name
|
||||
'
|
||||
Me.lbl_red_fighter_name.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_fighter_name.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_fighter_name.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_red_fighter_name.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_fighter_name.Location = New System.Drawing.Point(420, 90)
|
||||
Me.lbl_red_fighter_name.Name = "lbl_red_fighter_name"
|
||||
Me.lbl_red_fighter_name.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_red_fighter_name.TabIndex = 82
|
||||
Me.lbl_red_fighter_name.Text = "RED FIGHTER"
|
||||
Me.lbl_red_fighter_name.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'pb_blue_flag
|
||||
'
|
||||
Me.pb_blue_flag.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pb_blue_flag.Location = New System.Drawing.Point(5, 135)
|
||||
Me.pb_blue_flag.Name = "pb_blue_flag"
|
||||
Me.pb_blue_flag.Size = New System.Drawing.Size(90, 60)
|
||||
Me.pb_blue_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_flag.TabIndex = 81
|
||||
Me.pb_blue_flag.TabStop = False
|
||||
'
|
||||
'lbl_blue_gamjum
|
||||
'
|
||||
Me.lbl_blue_gamjum.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_gamjum.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_gamjum.Font = New System.Drawing.Font("Microsoft Sans Serif", 52.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_gamjum.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_gamjum.Location = New System.Drawing.Point(5, 340)
|
||||
Me.lbl_blue_gamjum.Name = "lbl_blue_gamjum"
|
||||
Me.lbl_blue_gamjum.Size = New System.Drawing.Size(90, 75)
|
||||
Me.lbl_blue_gamjum.TabIndex = 80
|
||||
Me.lbl_blue_gamjum.Text = "00"
|
||||
Me.lbl_blue_gamjum.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label11.ForeColor = System.Drawing.Color.White
|
||||
Me.Label11.Location = New System.Drawing.Point(5, 295)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(90, 40)
|
||||
Me.Label11.TabIndex = 79
|
||||
Me.Label11.Text = "GAMJUM"
|
||||
Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_code_3
|
||||
'
|
||||
Me.lbl_blue_code_3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_code_3.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_code_3.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_code_3.Location = New System.Drawing.Point(5, 90)
|
||||
Me.lbl_blue_code_3.Name = "lbl_blue_code_3"
|
||||
Me.lbl_blue_code_3.Size = New System.Drawing.Size(90, 40)
|
||||
Me.lbl_blue_code_3.TabIndex = 78
|
||||
Me.lbl_blue_code_3.Text = "ISO3"
|
||||
Me.lbl_blue_code_3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_team
|
||||
'
|
||||
Me.lbl_blue_team.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_team.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_team.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_team.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_team.Location = New System.Drawing.Point(100, 375)
|
||||
Me.lbl_blue_team.Name = "lbl_blue_team"
|
||||
Me.lbl_blue_team.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_blue_team.TabIndex = 77
|
||||
Me.lbl_blue_team.Text = "BLUE TEAM"
|
||||
Me.lbl_blue_team.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_score
|
||||
'
|
||||
Me.lbl_blue_score.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_score.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_score.Font = New System.Drawing.Font("Microsoft Sans Serif", 170.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_score.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_score.Location = New System.Drawing.Point(100, 135)
|
||||
Me.lbl_blue_score.Name = "lbl_blue_score"
|
||||
Me.lbl_blue_score.Size = New System.Drawing.Size(315, 235)
|
||||
Me.lbl_blue_score.TabIndex = 76
|
||||
Me.lbl_blue_score.Text = "00"
|
||||
Me.lbl_blue_score.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_fighter_name
|
||||
'
|
||||
Me.lbl_blue_fighter_name.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_fighter_name.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_fighter_name.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lbl_blue_fighter_name.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_fighter_name.Location = New System.Drawing.Point(100, 90)
|
||||
Me.lbl_blue_fighter_name.Name = "lbl_blue_fighter_name"
|
||||
Me.lbl_blue_fighter_name.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_blue_fighter_name.TabIndex = 75
|
||||
Me.lbl_blue_fighter_name.Text = "BLUE FIGHTER"
|
||||
Me.lbl_blue_fighter_name.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'frm_friendly_scorecontrol
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(836, 481)
|
||||
Me.Controls.Add(Me.lbl_blue_gender)
|
||||
Me.Controls.Add(Me.btn_end)
|
||||
Me.Controls.Add(Me.btn_start)
|
||||
Me.Controls.Add(Me.btn_red_ngf)
|
||||
Me.Controls.Add(Me.btn_red_pgf)
|
||||
Me.Controls.Add(Me.btn_blue_ngf)
|
||||
Me.Controls.Add(Me.btn_blue_pgf)
|
||||
Me.Controls.Add(Me.lbl_red_gender)
|
||||
Me.Controls.Add(Me.lbl_red_weight_category)
|
||||
Me.Controls.Add(Me.lbl_blue_weight_category)
|
||||
Me.Controls.Add(Me.lbl_red_weight_class)
|
||||
Me.Controls.Add(Me.lbl_blue_weight_class)
|
||||
Me.Controls.Add(Me.btn_dec_match)
|
||||
Me.Controls.Add(Me.btn_inc_match)
|
||||
Me.Controls.Add(Me.pb_red_logo)
|
||||
Me.Controls.Add(Me.pb_blue_logo)
|
||||
Me.Controls.Add(Me.btn_red_dhkn)
|
||||
Me.Controls.Add(Me.btn_red_dhkp)
|
||||
Me.Controls.Add(Me.btn_red_sbkn)
|
||||
Me.Controls.Add(Me.btn_red_sbkp)
|
||||
Me.Controls.Add(Me.btn_red_dbkn)
|
||||
Me.Controls.Add(Me.btn_red_dbkp)
|
||||
Me.Controls.Add(Me.btn_red_shkn)
|
||||
Me.Controls.Add(Me.btn_red_shkp)
|
||||
Me.Controls.Add(Me.lbl_round)
|
||||
Me.Controls.Add(Me.pb_red_flag)
|
||||
Me.Controls.Add(Me.lbl_red_gamjum)
|
||||
Me.Controls.Add(Me.Label5)
|
||||
Me.Controls.Add(Me.lbl_red_code_3)
|
||||
Me.Controls.Add(Me.btn_blue_dbkn)
|
||||
Me.Controls.Add(Me.btn_blue_dbkp)
|
||||
Me.Controls.Add(Me.btn_blue_sbkn)
|
||||
Me.Controls.Add(Me.btn_blue_sbkp)
|
||||
Me.Controls.Add(Me.btn_blue_dhkn)
|
||||
Me.Controls.Add(Me.btn_blue_dhkp)
|
||||
Me.Controls.Add(Me.btn_blue_shkn)
|
||||
Me.Controls.Add(Me.btn_blue_shkp)
|
||||
Me.Controls.Add(Me.lbl_match_number)
|
||||
Me.Controls.Add(Me.lbl_time)
|
||||
Me.Controls.Add(Me.lbl_court_number)
|
||||
Me.Controls.Add(Me.lbl_red_team)
|
||||
Me.Controls.Add(Me.lbl_red_score)
|
||||
Me.Controls.Add(Me.lbl_red_fighter_name)
|
||||
Me.Controls.Add(Me.pb_blue_flag)
|
||||
Me.Controls.Add(Me.lbl_blue_gamjum)
|
||||
Me.Controls.Add(Me.Label11)
|
||||
Me.Controls.Add(Me.lbl_blue_code_3)
|
||||
Me.Controls.Add(Me.lbl_blue_team)
|
||||
Me.Controls.Add(Me.lbl_blue_score)
|
||||
Me.Controls.Add(Me.lbl_blue_fighter_name)
|
||||
Me.ForeColor = System.Drawing.Color.White
|
||||
Me.Name = "frm_friendly_scorecontrol"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "testForm"
|
||||
CType(Me.pb_red_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_blue_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents lbl_blue_gender As Label
|
||||
Friend WithEvents btn_end As Button
|
||||
Friend WithEvents btn_start As Button
|
||||
Friend WithEvents round_countdown As Timer
|
||||
Friend WithEvents btn_red_ngf As Button
|
||||
Friend WithEvents btn_red_pgf As Button
|
||||
Friend WithEvents btn_blue_ngf As Button
|
||||
Friend WithEvents btn_blue_pgf As Button
|
||||
Friend WithEvents tmr_display As Timer
|
||||
Friend WithEvents break_countdown As Timer
|
||||
Friend WithEvents lbl_red_gender As Label
|
||||
Friend WithEvents lbl_red_weight_category As Label
|
||||
Friend WithEvents lbl_blue_weight_category As Label
|
||||
Friend WithEvents lbl_red_weight_class As Label
|
||||
Friend WithEvents lbl_blue_weight_class As Label
|
||||
Friend WithEvents btn_dec_match As Button
|
||||
Friend WithEvents btn_inc_match As Button
|
||||
Friend WithEvents pb_red_logo As PictureBox
|
||||
Friend WithEvents pb_blue_logo As PictureBox
|
||||
Friend WithEvents btn_red_dhkn As Button
|
||||
Friend WithEvents btn_red_dhkp As Button
|
||||
Friend WithEvents btn_red_sbkn As Button
|
||||
Friend WithEvents btn_red_sbkp As Button
|
||||
Friend WithEvents btn_red_dbkn As Button
|
||||
Friend WithEvents btn_red_dbkp As Button
|
||||
Friend WithEvents btn_red_shkn As Button
|
||||
Friend WithEvents btn_red_shkp As Button
|
||||
Friend WithEvents lbl_round As Label
|
||||
Friend WithEvents pb_red_flag As PictureBox
|
||||
Friend WithEvents lbl_red_gamjum As Label
|
||||
Friend WithEvents Label5 As Label
|
||||
Friend WithEvents lbl_red_code_3 As Label
|
||||
Friend WithEvents btn_blue_dbkn As Button
|
||||
Friend WithEvents btn_blue_dbkp As Button
|
||||
Friend WithEvents btn_blue_sbkn As Button
|
||||
Friend WithEvents btn_blue_sbkp As Button
|
||||
Friend WithEvents btn_blue_dhkn As Button
|
||||
Friend WithEvents btn_blue_dhkp As Button
|
||||
Friend WithEvents btn_blue_shkn As Button
|
||||
Friend WithEvents btn_blue_shkp As Button
|
||||
Friend WithEvents lbl_match_number As Label
|
||||
Friend WithEvents lbl_time As Label
|
||||
Friend WithEvents lbl_court_number As Label
|
||||
Friend WithEvents lbl_red_team As Label
|
||||
Friend WithEvents lbl_red_score As Label
|
||||
Friend WithEvents lbl_red_fighter_name As Label
|
||||
Friend WithEvents pb_blue_flag As PictureBox
|
||||
Friend WithEvents lbl_blue_gamjum As Label
|
||||
Friend WithEvents Label11 As Label
|
||||
Friend WithEvents lbl_blue_code_3 As Label
|
||||
Friend WithEvents lbl_blue_team As Label
|
||||
Friend WithEvents lbl_blue_score As Label
|
||||
Friend WithEvents lbl_blue_fighter_name As Label
|
||||
End Class
|
||||
@ -0,0 +1,129 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="round_countdown.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>419, 14</value>
|
||||
</metadata>
|
||||
<metadata name="tmr_display.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>570, 14</value>
|
||||
</metadata>
|
||||
<metadata name="break_countdown.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>684, 14</value>
|
||||
</metadata>
|
||||
</root>
|
||||
@ -0,0 +1,11 @@
|
||||
Imports System.ComponentModel
|
||||
|
||||
Public Class frm_friendly_scorecontrol
|
||||
|
||||
Private Sub frm_friendly_scorecontrol_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
|
||||
|
||||
frm_friendly_match.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
790
Visual Studio Code/Timer Library/forms/frm_scorecontrol.designer.vb
generated
Normal file
@ -0,0 +1,790 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_scorecontrol
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Me.lbl_blue_fighter_name = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_score = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_team = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_code_3 = New System.Windows.Forms.Label()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_kfaul = New System.Windows.Forms.Label()
|
||||
Me.lbl_blue_gfaul = New System.Windows.Forms.Label()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.pb_blue_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_red_team = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_score = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_fighter_name = New System.Windows.Forms.Label()
|
||||
Me.lbl_weight_class = New System.Windows.Forms.Label()
|
||||
Me.lbl_time = New System.Windows.Forms.Label()
|
||||
Me.lbl_match_number = New System.Windows.Forms.Label()
|
||||
Me.btn_blue_shkp = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_shkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_dhkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_dhkp = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_sbkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_sbkp = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_dbkn = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_dbkp = New System.Windows.Forms.Button()
|
||||
Me.pb_red_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_red_gfaul = New System.Windows.Forms.Label()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_kfaul = New System.Windows.Forms.Label()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.lbl_red_code_3 = New System.Windows.Forms.Label()
|
||||
Me.lbl_round = New System.Windows.Forms.Label()
|
||||
Me.btn_red_dhkn = New System.Windows.Forms.Button()
|
||||
Me.Button10 = New System.Windows.Forms.Button()
|
||||
Me.btn_red_sbkn = New System.Windows.Forms.Button()
|
||||
Me.Button12 = New System.Windows.Forms.Button()
|
||||
Me.btn_red_dbkn = New System.Windows.Forms.Button()
|
||||
Me.Button14 = New System.Windows.Forms.Button()
|
||||
Me.btn_red_shkn = New System.Windows.Forms.Button()
|
||||
Me.Button16 = New System.Windows.Forms.Button()
|
||||
Me.tmr_display = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.btn_start = New System.Windows.Forms.Button()
|
||||
Me.btn_end = New System.Windows.Forms.Button()
|
||||
Me.round_countdown = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.btn_blue_pkf = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_nkf = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_ngf = New System.Windows.Forms.Button()
|
||||
Me.btn_blue_pgf = New System.Windows.Forms.Button()
|
||||
Me.btn_red_ngf = New System.Windows.Forms.Button()
|
||||
Me.btn_red_pgf = New System.Windows.Forms.Button()
|
||||
Me.btn_red_nkf = New System.Windows.Forms.Button()
|
||||
Me.btn_red_pkf = New System.Windows.Forms.Button()
|
||||
Me.break_countdown = New System.Windows.Forms.Timer(Me.components)
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbl_blue_fighter_name
|
||||
'
|
||||
Me.lbl_blue_fighter_name.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_fighter_name.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_fighter_name.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_fighter_name.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_fighter_name.Location = New System.Drawing.Point(100, 90)
|
||||
Me.lbl_blue_fighter_name.Name = "lbl_blue_fighter_name"
|
||||
Me.lbl_blue_fighter_name.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_blue_fighter_name.TabIndex = 0
|
||||
Me.lbl_blue_fighter_name.Text = "BLUE FIGHTER"
|
||||
Me.lbl_blue_fighter_name.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_score
|
||||
'
|
||||
Me.lbl_blue_score.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_score.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_score.Font = New System.Drawing.Font("Microsoft Sans Serif", 170.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_score.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_score.Location = New System.Drawing.Point(100, 135)
|
||||
Me.lbl_blue_score.Name = "lbl_blue_score"
|
||||
Me.lbl_blue_score.Size = New System.Drawing.Size(315, 235)
|
||||
Me.lbl_blue_score.TabIndex = 0
|
||||
Me.lbl_blue_score.Text = "00"
|
||||
Me.lbl_blue_score.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_team
|
||||
'
|
||||
Me.lbl_blue_team.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_team.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_team.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_team.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_team.Location = New System.Drawing.Point(100, 375)
|
||||
Me.lbl_blue_team.Name = "lbl_blue_team"
|
||||
Me.lbl_blue_team.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_blue_team.TabIndex = 2
|
||||
Me.lbl_blue_team.Text = "BLUE TEAM"
|
||||
Me.lbl_blue_team.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_code_3
|
||||
'
|
||||
Me.lbl_blue_code_3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_code_3.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_code_3.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_code_3.Location = New System.Drawing.Point(5, 90)
|
||||
Me.lbl_blue_code_3.Name = "lbl_blue_code_3"
|
||||
Me.lbl_blue_code_3.Size = New System.Drawing.Size(90, 40)
|
||||
Me.lbl_blue_code_3.TabIndex = 6
|
||||
Me.lbl_blue_code_3.Text = "CTRY"
|
||||
Me.lbl_blue_code_3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.Color.White
|
||||
Me.Label8.Location = New System.Drawing.Point(5, 200)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(90, 40)
|
||||
Me.Label8.TabIndex = 7
|
||||
Me.Label8.Text = "KFAUL"
|
||||
Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_kfaul
|
||||
'
|
||||
Me.lbl_blue_kfaul.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_kfaul.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_kfaul.Font = New System.Drawing.Font("Microsoft Sans Serif", 52.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_kfaul.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_kfaul.Location = New System.Drawing.Point(5, 245)
|
||||
Me.lbl_blue_kfaul.Name = "lbl_blue_kfaul"
|
||||
Me.lbl_blue_kfaul.Size = New System.Drawing.Size(90, 60)
|
||||
Me.lbl_blue_kfaul.TabIndex = 8
|
||||
Me.lbl_blue_kfaul.Text = "00"
|
||||
Me.lbl_blue_kfaul.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_blue_gfaul
|
||||
'
|
||||
Me.lbl_blue_gfaul.BackColor = System.Drawing.Color.Blue
|
||||
Me.lbl_blue_gfaul.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_blue_gfaul.Font = New System.Drawing.Font("Microsoft Sans Serif", 52.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_blue_gfaul.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_blue_gfaul.Location = New System.Drawing.Point(5, 355)
|
||||
Me.lbl_blue_gfaul.Name = "lbl_blue_gfaul"
|
||||
Me.lbl_blue_gfaul.Size = New System.Drawing.Size(90, 60)
|
||||
Me.lbl_blue_gfaul.TabIndex = 10
|
||||
Me.lbl_blue_gfaul.Text = "00"
|
||||
Me.lbl_blue_gfaul.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Label11.ForeColor = System.Drawing.Color.White
|
||||
Me.Label11.Location = New System.Drawing.Point(5, 310)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(90, 40)
|
||||
Me.Label11.TabIndex = 9
|
||||
Me.Label11.Text = "GFAUL"
|
||||
Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'pb_blue_flag
|
||||
'
|
||||
Me.pb_blue_flag.BackColor = System.Drawing.Color.Blue
|
||||
Me.pb_blue_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_blue_flag.Location = New System.Drawing.Point(5, 135)
|
||||
Me.pb_blue_flag.Name = "pb_blue_flag"
|
||||
Me.pb_blue_flag.Size = New System.Drawing.Size(90, 60)
|
||||
Me.pb_blue_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_blue_flag.TabIndex = 11
|
||||
Me.pb_blue_flag.TabStop = False
|
||||
'
|
||||
'lbl_red_team
|
||||
'
|
||||
Me.lbl_red_team.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_team.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_team.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_team.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_team.Location = New System.Drawing.Point(420, 375)
|
||||
Me.lbl_red_team.Name = "lbl_red_team"
|
||||
Me.lbl_red_team.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_red_team.TabIndex = 14
|
||||
Me.lbl_red_team.Text = "BLUE TEAM"
|
||||
Me.lbl_red_team.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_score
|
||||
'
|
||||
Me.lbl_red_score.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_score.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_score.Font = New System.Drawing.Font("Microsoft Sans Serif", 170.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_score.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_score.Location = New System.Drawing.Point(420, 135)
|
||||
Me.lbl_red_score.Name = "lbl_red_score"
|
||||
Me.lbl_red_score.Size = New System.Drawing.Size(315, 235)
|
||||
Me.lbl_red_score.TabIndex = 13
|
||||
Me.lbl_red_score.Text = "00"
|
||||
Me.lbl_red_score.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_fighter_name
|
||||
'
|
||||
Me.lbl_red_fighter_name.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_fighter_name.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_fighter_name.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_fighter_name.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_fighter_name.Location = New System.Drawing.Point(420, 90)
|
||||
Me.lbl_red_fighter_name.Name = "lbl_red_fighter_name"
|
||||
Me.lbl_red_fighter_name.Size = New System.Drawing.Size(315, 40)
|
||||
Me.lbl_red_fighter_name.TabIndex = 12
|
||||
Me.lbl_red_fighter_name.Text = "RED FIGHTER"
|
||||
Me.lbl_red_fighter_name.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_weight_class
|
||||
'
|
||||
Me.lbl_weight_class.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_weight_class.Font = New System.Drawing.Font("Microsoft Sans Serif", 75.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_weight_class.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_weight_class.Location = New System.Drawing.Point(5, 5)
|
||||
Me.lbl_weight_class.Name = "lbl_weight_class"
|
||||
Me.lbl_weight_class.Size = New System.Drawing.Size(275, 80)
|
||||
Me.lbl_weight_class.TabIndex = 21
|
||||
Me.lbl_weight_class.Text = "C000"
|
||||
Me.lbl_weight_class.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_time
|
||||
'
|
||||
Me.lbl_time.Font = New System.Drawing.Font("Microsoft Sans Serif", 85.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_time.ForeColor = System.Drawing.Color.Lime
|
||||
Me.lbl_time.Location = New System.Drawing.Point(285, -5)
|
||||
Me.lbl_time.Name = "lbl_time"
|
||||
Me.lbl_time.Size = New System.Drawing.Size(265, 95)
|
||||
Me.lbl_time.TabIndex = 22
|
||||
Me.lbl_time.Text = "00:00"
|
||||
Me.lbl_time.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_match_number
|
||||
'
|
||||
Me.lbl_match_number.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_match_number.Font = New System.Drawing.Font("Microsoft Sans Serif", 75.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_match_number.ForeColor = System.Drawing.Color.Yellow
|
||||
Me.lbl_match_number.Location = New System.Drawing.Point(555, 5)
|
||||
Me.lbl_match_number.Name = "lbl_match_number"
|
||||
Me.lbl_match_number.Size = New System.Drawing.Size(275, 80)
|
||||
Me.lbl_match_number.TabIndex = 23
|
||||
Me.lbl_match_number.Text = "M000"
|
||||
Me.lbl_match_number.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_blue_shkp
|
||||
'
|
||||
Me.btn_blue_shkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_shkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_shkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_shkp.Location = New System.Drawing.Point(5, 420)
|
||||
Me.btn_blue_shkp.Name = "btn_blue_shkp"
|
||||
Me.btn_blue_shkp.Size = New System.Drawing.Size(95, 25)
|
||||
Me.btn_blue_shkp.TabIndex = 24
|
||||
Me.btn_blue_shkp.Text = "+ Spin HK"
|
||||
Me.btn_blue_shkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_shkn
|
||||
'
|
||||
Me.btn_blue_shkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_shkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_shkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_shkn.Location = New System.Drawing.Point(5, 450)
|
||||
Me.btn_blue_shkn.Name = "btn_blue_shkn"
|
||||
Me.btn_blue_shkn.Size = New System.Drawing.Size(95, 25)
|
||||
Me.btn_blue_shkn.TabIndex = 25
|
||||
Me.btn_blue_shkn.Text = "- Spin HK"
|
||||
Me.btn_blue_shkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_dhkn
|
||||
'
|
||||
Me.btn_blue_dhkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dhkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dhkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dhkn.Location = New System.Drawing.Point(105, 450)
|
||||
Me.btn_blue_dhkn.Name = "btn_blue_dhkn"
|
||||
Me.btn_blue_dhkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dhkn.TabIndex = 27
|
||||
Me.btn_blue_dhkn.Text = "- Direct HK"
|
||||
Me.btn_blue_dhkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_dhkp
|
||||
'
|
||||
Me.btn_blue_dhkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dhkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dhkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dhkp.Location = New System.Drawing.Point(105, 420)
|
||||
Me.btn_blue_dhkp.Name = "btn_blue_dhkp"
|
||||
Me.btn_blue_dhkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dhkp.TabIndex = 26
|
||||
Me.btn_blue_dhkp.Text = "+ Direct HK"
|
||||
Me.btn_blue_dhkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_sbkn
|
||||
'
|
||||
Me.btn_blue_sbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_sbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_sbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_sbkn.Location = New System.Drawing.Point(210, 450)
|
||||
Me.btn_blue_sbkn.Name = "btn_blue_sbkn"
|
||||
Me.btn_blue_sbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_sbkn.TabIndex = 29
|
||||
Me.btn_blue_sbkn.Text = "- Spin BK"
|
||||
Me.btn_blue_sbkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_sbkp
|
||||
'
|
||||
Me.btn_blue_sbkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_sbkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_sbkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_sbkp.Location = New System.Drawing.Point(210, 420)
|
||||
Me.btn_blue_sbkp.Name = "btn_blue_sbkp"
|
||||
Me.btn_blue_sbkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_sbkp.TabIndex = 28
|
||||
Me.btn_blue_sbkp.Text = "+ Spin BK"
|
||||
Me.btn_blue_sbkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_dbkn
|
||||
'
|
||||
Me.btn_blue_dbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dbkn.Location = New System.Drawing.Point(315, 450)
|
||||
Me.btn_blue_dbkn.Name = "btn_blue_dbkn"
|
||||
Me.btn_blue_dbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dbkn.TabIndex = 31
|
||||
Me.btn_blue_dbkn.Text = "- Direct BK"
|
||||
Me.btn_blue_dbkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_dbkp
|
||||
'
|
||||
Me.btn_blue_dbkp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_dbkp.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_dbkp.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_dbkp.Location = New System.Drawing.Point(315, 420)
|
||||
Me.btn_blue_dbkp.Name = "btn_blue_dbkp"
|
||||
Me.btn_blue_dbkp.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_blue_dbkp.TabIndex = 30
|
||||
Me.btn_blue_dbkp.Text = "+ Direct BK"
|
||||
Me.btn_blue_dbkp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pb_red_flag
|
||||
'
|
||||
Me.pb_red_flag.BackColor = System.Drawing.Color.Red
|
||||
Me.pb_red_flag.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pb_red_flag.Location = New System.Drawing.Point(740, 135)
|
||||
Me.pb_red_flag.Name = "pb_red_flag"
|
||||
Me.pb_red_flag.Size = New System.Drawing.Size(90, 60)
|
||||
Me.pb_red_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_red_flag.TabIndex = 45
|
||||
Me.pb_red_flag.TabStop = False
|
||||
'
|
||||
'lbl_red_gfaul
|
||||
'
|
||||
Me.lbl_red_gfaul.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_gfaul.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_gfaul.Font = New System.Drawing.Font("Microsoft Sans Serif", 52.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_gfaul.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_gfaul.Location = New System.Drawing.Point(740, 355)
|
||||
Me.lbl_red_gfaul.Name = "lbl_red_gfaul"
|
||||
Me.lbl_red_gfaul.Size = New System.Drawing.Size(90, 60)
|
||||
Me.lbl_red_gfaul.TabIndex = 44
|
||||
Me.lbl_red_gfaul.Text = "00"
|
||||
Me.lbl_red_gfaul.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Label5.ForeColor = System.Drawing.Color.White
|
||||
Me.Label5.Location = New System.Drawing.Point(740, 310)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(90, 40)
|
||||
Me.Label5.TabIndex = 43
|
||||
Me.Label5.Text = "GFAUL"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_kfaul
|
||||
'
|
||||
Me.lbl_red_kfaul.BackColor = System.Drawing.Color.Red
|
||||
Me.lbl_red_kfaul.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_kfaul.Font = New System.Drawing.Font("Microsoft Sans Serif", 52.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_kfaul.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_kfaul.Location = New System.Drawing.Point(740, 245)
|
||||
Me.lbl_red_kfaul.Name = "lbl_red_kfaul"
|
||||
Me.lbl_red_kfaul.Size = New System.Drawing.Size(90, 60)
|
||||
Me.lbl_red_kfaul.TabIndex = 42
|
||||
Me.lbl_red_kfaul.Text = "00"
|
||||
Me.lbl_red_kfaul.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Label12.ForeColor = System.Drawing.Color.White
|
||||
Me.Label12.Location = New System.Drawing.Point(740, 200)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(90, 40)
|
||||
Me.Label12.TabIndex = 41
|
||||
Me.Label12.Text = "KFAUL"
|
||||
Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_red_code_3
|
||||
'
|
||||
Me.lbl_red_code_3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_red_code_3.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_red_code_3.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_red_code_3.Location = New System.Drawing.Point(740, 90)
|
||||
Me.lbl_red_code_3.Name = "lbl_red_code_3"
|
||||
Me.lbl_red_code_3.Size = New System.Drawing.Size(90, 40)
|
||||
Me.lbl_red_code_3.TabIndex = 40
|
||||
Me.lbl_red_code_3.Text = "CTRY"
|
||||
Me.lbl_red_code_3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'lbl_round
|
||||
'
|
||||
Me.lbl_round.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lbl_round.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_round.Font = New System.Drawing.Font("Microsoft Sans Serif", 90.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_round.ForeColor = System.Drawing.Color.Lime
|
||||
Me.lbl_round.Location = New System.Drawing.Point(375, 185)
|
||||
Me.lbl_round.Name = "lbl_round"
|
||||
Me.lbl_round.Size = New System.Drawing.Size(85, 105)
|
||||
Me.lbl_round.TabIndex = 46
|
||||
Me.lbl_round.Text = "1"
|
||||
Me.lbl_round.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_red_dhkn
|
||||
'
|
||||
Me.btn_red_dhkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_dhkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_dhkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_dhkn.Location = New System.Drawing.Point(630, 450)
|
||||
Me.btn_red_dhkn.Name = "btn_red_dhkn"
|
||||
Me.btn_red_dhkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_dhkn.TabIndex = 54
|
||||
Me.btn_red_dhkn.Text = "Direct HK -"
|
||||
Me.btn_red_dhkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button10
|
||||
'
|
||||
Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button10.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Button10.ForeColor = System.Drawing.Color.White
|
||||
Me.Button10.Location = New System.Drawing.Point(630, 420)
|
||||
Me.Button10.Name = "Button10"
|
||||
Me.Button10.Size = New System.Drawing.Size(100, 25)
|
||||
Me.Button10.TabIndex = 53
|
||||
Me.Button10.Text = "Direct HK +"
|
||||
Me.Button10.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_sbkn
|
||||
'
|
||||
Me.btn_red_sbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_sbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_sbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_sbkn.Location = New System.Drawing.Point(525, 450)
|
||||
Me.btn_red_sbkn.Name = "btn_red_sbkn"
|
||||
Me.btn_red_sbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_sbkn.TabIndex = 52
|
||||
Me.btn_red_sbkn.Text = "Spin BK -"
|
||||
Me.btn_red_sbkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button12
|
||||
'
|
||||
Me.Button12.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button12.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Button12.ForeColor = System.Drawing.Color.White
|
||||
Me.Button12.Location = New System.Drawing.Point(525, 420)
|
||||
Me.Button12.Name = "Button12"
|
||||
Me.Button12.Size = New System.Drawing.Size(100, 25)
|
||||
Me.Button12.TabIndex = 51
|
||||
Me.Button12.Text = "Spin BK +"
|
||||
Me.Button12.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_dbkn
|
||||
'
|
||||
Me.btn_red_dbkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_dbkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_dbkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_dbkn.Location = New System.Drawing.Point(420, 450)
|
||||
Me.btn_red_dbkn.Name = "btn_red_dbkn"
|
||||
Me.btn_red_dbkn.Size = New System.Drawing.Size(100, 25)
|
||||
Me.btn_red_dbkn.TabIndex = 50
|
||||
Me.btn_red_dbkn.Text = "Direct BK -"
|
||||
Me.btn_red_dbkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button14
|
||||
'
|
||||
Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button14.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Button14.ForeColor = System.Drawing.Color.White
|
||||
Me.Button14.Location = New System.Drawing.Point(420, 420)
|
||||
Me.Button14.Name = "Button14"
|
||||
Me.Button14.Size = New System.Drawing.Size(100, 25)
|
||||
Me.Button14.TabIndex = 49
|
||||
Me.Button14.Text = "Direct BK +"
|
||||
Me.Button14.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_shkn
|
||||
'
|
||||
Me.btn_red_shkn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_shkn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_shkn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_shkn.Location = New System.Drawing.Point(735, 450)
|
||||
Me.btn_red_shkn.Name = "btn_red_shkn"
|
||||
Me.btn_red_shkn.Size = New System.Drawing.Size(95, 25)
|
||||
Me.btn_red_shkn.TabIndex = 48
|
||||
Me.btn_red_shkn.Text = "Spin HK -"
|
||||
Me.btn_red_shkn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button16
|
||||
'
|
||||
Me.Button16.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button16.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Button16.ForeColor = System.Drawing.Color.White
|
||||
Me.Button16.Location = New System.Drawing.Point(735, 420)
|
||||
Me.Button16.Name = "Button16"
|
||||
Me.Button16.Size = New System.Drawing.Size(95, 25)
|
||||
Me.Button16.TabIndex = 47
|
||||
Me.Button16.Text = "Spin HK +"
|
||||
Me.Button16.UseVisualStyleBackColor = True
|
||||
'
|
||||
'tmr_display
|
||||
'
|
||||
Me.tmr_display.Enabled = True
|
||||
Me.tmr_display.Interval = 1
|
||||
'
|
||||
'btn_start
|
||||
'
|
||||
Me.btn_start.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_start.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_start.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_start.Location = New System.Drawing.Point(375, 295)
|
||||
Me.btn_start.Name = "btn_start"
|
||||
Me.btn_start.Size = New System.Drawing.Size(85, 30)
|
||||
Me.btn_start.TabIndex = 55
|
||||
Me.btn_start.Text = "START"
|
||||
Me.btn_start.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_end
|
||||
'
|
||||
Me.btn_end.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_end.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_end.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_end.Location = New System.Drawing.Point(375, 330)
|
||||
Me.btn_end.Name = "btn_end"
|
||||
Me.btn_end.Size = New System.Drawing.Size(85, 30)
|
||||
Me.btn_end.TabIndex = 56
|
||||
Me.btn_end.Text = "END"
|
||||
Me.btn_end.UseVisualStyleBackColor = True
|
||||
'
|
||||
'round_countdown
|
||||
'
|
||||
'
|
||||
'btn_blue_pkf
|
||||
'
|
||||
Me.btn_blue_pkf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_pkf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_pkf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_pkf.Location = New System.Drawing.Point(105, 200)
|
||||
Me.btn_blue_pkf.Name = "btn_blue_pkf"
|
||||
Me.btn_blue_pkf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_blue_pkf.TabIndex = 57
|
||||
Me.btn_blue_pkf.Text = "+"
|
||||
Me.btn_blue_pkf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_nkf
|
||||
'
|
||||
Me.btn_blue_nkf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_nkf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_nkf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_nkf.Location = New System.Drawing.Point(105, 230)
|
||||
Me.btn_blue_nkf.Name = "btn_blue_nkf"
|
||||
Me.btn_blue_nkf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_blue_nkf.TabIndex = 58
|
||||
Me.btn_blue_nkf.Text = "-"
|
||||
Me.btn_blue_nkf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_ngf
|
||||
'
|
||||
Me.btn_blue_ngf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_ngf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_ngf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_ngf.Location = New System.Drawing.Point(105, 340)
|
||||
Me.btn_blue_ngf.Name = "btn_blue_ngf"
|
||||
Me.btn_blue_ngf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_blue_ngf.TabIndex = 60
|
||||
Me.btn_blue_ngf.Text = "-"
|
||||
Me.btn_blue_ngf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_blue_pgf
|
||||
'
|
||||
Me.btn_blue_pgf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_blue_pgf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_blue_pgf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_blue_pgf.Location = New System.Drawing.Point(105, 310)
|
||||
Me.btn_blue_pgf.Name = "btn_blue_pgf"
|
||||
Me.btn_blue_pgf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_blue_pgf.TabIndex = 59
|
||||
Me.btn_blue_pgf.Text = "+"
|
||||
Me.btn_blue_pgf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_ngf
|
||||
'
|
||||
Me.btn_red_ngf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_ngf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_ngf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_ngf.Location = New System.Drawing.Point(705, 340)
|
||||
Me.btn_red_ngf.Name = "btn_red_ngf"
|
||||
Me.btn_red_ngf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_red_ngf.TabIndex = 64
|
||||
Me.btn_red_ngf.Text = "-"
|
||||
Me.btn_red_ngf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_pgf
|
||||
'
|
||||
Me.btn_red_pgf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_pgf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_pgf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_pgf.Location = New System.Drawing.Point(705, 310)
|
||||
Me.btn_red_pgf.Name = "btn_red_pgf"
|
||||
Me.btn_red_pgf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_red_pgf.TabIndex = 63
|
||||
Me.btn_red_pgf.Text = "+"
|
||||
Me.btn_red_pgf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_nkf
|
||||
'
|
||||
Me.btn_red_nkf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_nkf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_nkf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_nkf.Location = New System.Drawing.Point(705, 230)
|
||||
Me.btn_red_nkf.Name = "btn_red_nkf"
|
||||
Me.btn_red_nkf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_red_nkf.TabIndex = 62
|
||||
Me.btn_red_nkf.Text = "-"
|
||||
Me.btn_red_nkf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_red_pkf
|
||||
'
|
||||
Me.btn_red_pkf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_red_pkf.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_red_pkf.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_red_pkf.Location = New System.Drawing.Point(705, 200)
|
||||
Me.btn_red_pkf.Name = "btn_red_pkf"
|
||||
Me.btn_red_pkf.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btn_red_pkf.TabIndex = 61
|
||||
Me.btn_red_pkf.Text = "+"
|
||||
Me.btn_red_pkf.UseVisualStyleBackColor = True
|
||||
'
|
||||
'frm_scorecontrol
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 15.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(834, 481)
|
||||
Me.Controls.Add(Me.btn_red_ngf)
|
||||
Me.Controls.Add(Me.btn_red_pgf)
|
||||
Me.Controls.Add(Me.btn_red_nkf)
|
||||
Me.Controls.Add(Me.btn_red_pkf)
|
||||
Me.Controls.Add(Me.btn_blue_ngf)
|
||||
Me.Controls.Add(Me.btn_blue_pgf)
|
||||
Me.Controls.Add(Me.btn_blue_nkf)
|
||||
Me.Controls.Add(Me.btn_blue_pkf)
|
||||
Me.Controls.Add(Me.btn_end)
|
||||
Me.Controls.Add(Me.btn_start)
|
||||
Me.Controls.Add(Me.btn_red_dhkn)
|
||||
Me.Controls.Add(Me.Button10)
|
||||
Me.Controls.Add(Me.btn_red_sbkn)
|
||||
Me.Controls.Add(Me.Button12)
|
||||
Me.Controls.Add(Me.btn_red_dbkn)
|
||||
Me.Controls.Add(Me.Button14)
|
||||
Me.Controls.Add(Me.btn_red_shkn)
|
||||
Me.Controls.Add(Me.Button16)
|
||||
Me.Controls.Add(Me.lbl_round)
|
||||
Me.Controls.Add(Me.pb_red_flag)
|
||||
Me.Controls.Add(Me.lbl_red_gfaul)
|
||||
Me.Controls.Add(Me.Label5)
|
||||
Me.Controls.Add(Me.lbl_red_kfaul)
|
||||
Me.Controls.Add(Me.Label12)
|
||||
Me.Controls.Add(Me.lbl_red_code_3)
|
||||
Me.Controls.Add(Me.btn_blue_dbkn)
|
||||
Me.Controls.Add(Me.btn_blue_dbkp)
|
||||
Me.Controls.Add(Me.btn_blue_sbkn)
|
||||
Me.Controls.Add(Me.btn_blue_sbkp)
|
||||
Me.Controls.Add(Me.btn_blue_dhkn)
|
||||
Me.Controls.Add(Me.btn_blue_dhkp)
|
||||
Me.Controls.Add(Me.btn_blue_shkn)
|
||||
Me.Controls.Add(Me.btn_blue_shkp)
|
||||
Me.Controls.Add(Me.lbl_match_number)
|
||||
Me.Controls.Add(Me.lbl_time)
|
||||
Me.Controls.Add(Me.lbl_weight_class)
|
||||
Me.Controls.Add(Me.lbl_red_team)
|
||||
Me.Controls.Add(Me.lbl_red_score)
|
||||
Me.Controls.Add(Me.lbl_red_fighter_name)
|
||||
Me.Controls.Add(Me.pb_blue_flag)
|
||||
Me.Controls.Add(Me.lbl_blue_gfaul)
|
||||
Me.Controls.Add(Me.Label11)
|
||||
Me.Controls.Add(Me.lbl_blue_kfaul)
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.lbl_blue_code_3)
|
||||
Me.Controls.Add(Me.lbl_blue_team)
|
||||
Me.Controls.Add(Me.lbl_blue_score)
|
||||
Me.Controls.Add(Me.lbl_blue_fighter_name)
|
||||
Me.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "frm_scorecontrol"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "TAKEONE : Score Control"
|
||||
CType(Me.pb_blue_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_red_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents lbl_blue_fighter_name As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_blue_score As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_blue_team As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_blue_code_3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_blue_kfaul As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_blue_gfaul As System.Windows.Forms.Label
|
||||
Friend WithEvents Label11 As System.Windows.Forms.Label
|
||||
Friend WithEvents pb_blue_flag As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents lbl_red_team As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_red_score As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_red_fighter_name As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_weight_class As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_time As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_match_number As System.Windows.Forms.Label
|
||||
Friend WithEvents btn_blue_shkp As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_shkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_dhkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_dhkp As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_sbkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_sbkp As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_dbkn As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_blue_dbkp As System.Windows.Forms.Button
|
||||
Friend WithEvents pb_red_flag As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents lbl_red_gfaul As System.Windows.Forms.Label
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_red_kfaul As System.Windows.Forms.Label
|
||||
Friend WithEvents Label12 As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_red_code_3 As System.Windows.Forms.Label
|
||||
Friend WithEvents lbl_round As System.Windows.Forms.Label
|
||||
Friend WithEvents btn_red_dhkn As System.Windows.Forms.Button
|
||||
Friend WithEvents Button10 As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_red_sbkn As System.Windows.Forms.Button
|
||||
Friend WithEvents Button12 As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_red_dbkn As System.Windows.Forms.Button
|
||||
Friend WithEvents Button14 As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_red_shkn As System.Windows.Forms.Button
|
||||
Friend WithEvents Button16 As System.Windows.Forms.Button
|
||||
Friend WithEvents tmr_display As System.Windows.Forms.Timer
|
||||
Friend WithEvents btn_start As Button
|
||||
Friend WithEvents btn_end As Button
|
||||
Friend WithEvents round_countdown As System.Windows.Forms.Timer
|
||||
Friend WithEvents btn_blue_pkf As Button
|
||||
Friend WithEvents btn_blue_nkf As Button
|
||||
Friend WithEvents btn_blue_ngf As Button
|
||||
Friend WithEvents btn_blue_pgf As Button
|
||||
Friend WithEvents btn_red_ngf As Button
|
||||
Friend WithEvents btn_red_pgf As Button
|
||||
Friend WithEvents btn_red_nkf As Button
|
||||
Friend WithEvents btn_red_pkf As Button
|
||||
Friend WithEvents break_countdown As System.Windows.Forms.Timer
|
||||
End Class
|
||||
132
Visual Studio Code/Timer Library/forms/frm_scorecontrol.resx
Normal file
@ -0,0 +1,132 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="tmr_display.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<metadata name="round_countdown.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>131, 17</value>
|
||||
</metadata>
|
||||
<metadata name="break_countdown.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>270, 14</value>
|
||||
</metadata>
|
||||
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>42</value>
|
||||
</metadata>
|
||||
</root>
|
||||
227
Visual Studio Code/Timer Library/forms/frm_scorecontrol.vb
Normal file
@ -0,0 +1,227 @@
|
||||
Public Class frm_scorecontrol
|
||||
|
||||
Dim TAKEONE As match
|
||||
Dim START_BUTTON As Boolean = False
|
||||
|
||||
Private Sub tmr_display_Tick(sender As Object, e As EventArgs) Handles tmr_display.Tick
|
||||
|
||||
If START_BUTTON = True Then
|
||||
|
||||
' Board Display
|
||||
lbl_time.Text = TAKEONE.RoundTime.Time
|
||||
lbl_round.Text = TAKEONE.Round
|
||||
lbl_match_number.Text = "EXHIB"
|
||||
lbl_weight_class.Text = "OPEN"
|
||||
|
||||
' Blue Fighter Data Display
|
||||
lbl_blue_score.Text = TAKEONE.Blue.Points.Score.ToString("00")
|
||||
lbl_blue_kfaul.Text = TAKEONE.Blue.Points.KFaul.ToString("00")
|
||||
lbl_blue_gfaul.Text = TAKEONE.Blue.Points.GFaul.ToString("00")
|
||||
lbl_blue_team.Text = TAKEONE.Blue.Team
|
||||
lbl_blue_fighter_name.Text = TAKEONE.Blue.Name
|
||||
'pb_blue_flag.Image = Image.FromStream(TAKEONE.Blue.Flag)
|
||||
|
||||
' Red Fighter Data Display
|
||||
lbl_red_score.Text = TAKEONE.Red.Points.Score.ToString("00")
|
||||
lbl_red_kfaul.Text = TAKEONE.Red.Points.KFaul.ToString("00")
|
||||
lbl_red_gfaul.Text = TAKEONE.Red.Points.GFaul.ToString("00")
|
||||
lbl_red_team.Text = TAKEONE.Red.Team
|
||||
lbl_red_fighter_name.Text = TAKEONE.Red.Name
|
||||
'pb_red_flag.Image = Image.FromStream(TAKEONE.red.Flag)
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_start_Click(sender As Object, e As EventArgs) Handles btn_start.Click
|
||||
|
||||
If btn_start.Text = "START" Then
|
||||
|
||||
TAKEONE = New match(1, 2, 3, 2, 0, 1, 0, True)
|
||||
START_BUTTON = True
|
||||
round_countdown.Interval = 1000
|
||||
round_countdown.Enabled = True
|
||||
btn_start.Text = "PAUSE"
|
||||
|
||||
ElseIf btn_start.Text = "PAUSE" Then
|
||||
|
||||
btn_start.Text = "RESUME"
|
||||
round_countdown.Enabled = False
|
||||
|
||||
ElseIf btn_start.Text = "RESUME" Then
|
||||
|
||||
btn_start.Text = "PAUSE"
|
||||
round_countdown.Enabled = True
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_shkp_Click(sender As Object, e As EventArgs) Handles btn_blue_shkp.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_SCORE(4)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_dhkp_Click(sender As Object, e As EventArgs) Handles btn_blue_dhkp.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_SCORE(3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_sbkp_Click(sender As Object, e As EventArgs) Handles btn_blue_sbkp.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_SCORE(3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_dbkp_Click(sender As Object, e As EventArgs) Handles btn_blue_dbkp.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_SCORE(1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_SCORE(1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_SCORE(3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_SCORE(3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Button16_Click(sender As Object, e As EventArgs) Handles Button16.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_SCORE(4)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub timer_countdown_Tick(sender As Object, e As EventArgs) Handles round_countdown.Tick
|
||||
|
||||
If TAKEONE.RoundTime.Status = False Then
|
||||
TAKEONE.RoundTime.CountDown()
|
||||
ElseIf TAKEONE.RoundTime.Status = True And TAKEONE.MaxRound < TAKEONE.Round Then
|
||||
btn_start.Text = "BEGIN"
|
||||
round_countdown.Enabled = False
|
||||
ElseIf TAKEONE.RoundTime.Status = True And TAKEONE.MaxRound = TAKEONE.Round Then
|
||||
btn_start.Text = "START"
|
||||
round_countdown.Enabled = False
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_shkn_Click(sender As Object, e As EventArgs) Handles btn_blue_shkn.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_SCORE(-4)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_dhkn_Click(sender As Object, e As EventArgs) Handles btn_blue_dhkn.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_SCORE(-3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_sbkn_Click(sender As Object, e As EventArgs) Handles btn_blue_sbkn.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_SCORE(-3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_dbkn_Click(sender As Object, e As EventArgs) Handles btn_blue_dbkn.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_SCORE(-1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_dbkn_Click(sender As Object, e As EventArgs) Handles btn_red_dbkn.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_SCORE(-1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_sbkn_Click(sender As Object, e As EventArgs) Handles btn_red_sbkn.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_SCORE(-3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_dhkn_Click(sender As Object, e As EventArgs) Handles btn_red_dhkn.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_SCORE(-3)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_shkn_Click(sender As Object, e As EventArgs) Handles btn_red_shkn.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_SCORE(-4)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_pkf_Click(sender As Object, e As EventArgs) Handles btn_blue_pkf.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_KFAUL(1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_nkf_Click(sender As Object, e As EventArgs) Handles btn_blue_nkf.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_KFAUL(-1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_pgf_Click(sender As Object, e As EventArgs) Handles btn_blue_pgf.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_GFAUL(1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_blue_ngf_Click(sender As Object, e As EventArgs) Handles btn_blue_ngf.Click
|
||||
|
||||
TAKEONE.Blue.Points.ADJ_GFAUL(-1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_pkf_Click(sender As Object, e As EventArgs) Handles btn_red_pkf.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_KFAUL(1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_nkf_Click(sender As Object, e As EventArgs) Handles btn_red_nkf.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_KFAUL(-1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_pgf_Click(sender As Object, e As EventArgs) Handles btn_red_pgf.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_GFAUL(1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_red_ngf_Click(sender As Object, e As EventArgs) Handles btn_red_ngf.Click
|
||||
|
||||
TAKEONE.Red.Points.ADJ_GFAUL(-1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_end_Click(sender As Object, e As EventArgs) Handles btn_end.Click
|
||||
|
||||
btn_start.Text = "START"
|
||||
TAKEONE.RoundTime = New match.timer(TAKEONE.MaxRoundMin, TAKEONE.MaxRoundSec)
|
||||
round_countdown.Enabled = False
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
317
Visual Studio Code/Timer Library/forms/main/frm_main.designer.vb
generated
Normal file
@ -0,0 +1,317 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_main
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frm_main))
|
||||
Me.lst_events = New System.Windows.Forms.ListBox()
|
||||
Me.btn_create_event = New System.Windows.Forms.Button()
|
||||
Me.btn_friendly_match = New System.Windows.Forms.Button()
|
||||
Me.btn_manage_event = New System.Windows.Forms.Button()
|
||||
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
|
||||
Me.btn_history_view = New System.Windows.Forms.Button()
|
||||
Me.btn_system_settings = New System.Windows.Forms.Button()
|
||||
Me.btn_delete_event = New System.Windows.Forms.Button()
|
||||
Me.btn_person_data = New System.Windows.Forms.Button()
|
||||
Me.btn_update_club_logo = New System.Windows.Forms.Button()
|
||||
Me.btn_update_country_flag = New System.Windows.Forms.Button()
|
||||
Me.pb_event_logo = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_event_country_flag = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_country_iso3 = New System.Windows.Forms.Label()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.btn_add_club = New System.Windows.Forms.Button()
|
||||
Me.PictureBox2 = New System.Windows.Forms.PictureBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_event_logo, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_event_country_flag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lst_events
|
||||
'
|
||||
Me.lst_events.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lst_events.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lst_events.Font = New System.Drawing.Font("Tahoma", 16.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lst_events.ForeColor = System.Drawing.Color.White
|
||||
Me.lst_events.FormattingEnabled = True
|
||||
Me.lst_events.ItemHeight = 19
|
||||
Me.lst_events.Location = New System.Drawing.Point(260, 50)
|
||||
Me.lst_events.Name = "lst_events"
|
||||
Me.lst_events.Size = New System.Drawing.Size(375, 420)
|
||||
Me.lst_events.TabIndex = 0
|
||||
'
|
||||
'btn_create_event
|
||||
'
|
||||
Me.btn_create_event.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_create_event.Font = New System.Drawing.Font("Tahoma", 16.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_create_event.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_create_event.Location = New System.Drawing.Point(10, 140)
|
||||
Me.btn_create_event.Name = "btn_create_event"
|
||||
Me.btn_create_event.Size = New System.Drawing.Size(240, 50)
|
||||
Me.btn_create_event.TabIndex = 1
|
||||
Me.btn_create_event.Text = "CREATE EVENT"
|
||||
Me.btn_create_event.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_friendly_match
|
||||
'
|
||||
Me.btn_friendly_match.FlatAppearance.MouseOverBackColor = System.Drawing.Color.Maroon
|
||||
Me.btn_friendly_match.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_friendly_match.Font = New System.Drawing.Font("Tahoma", 16.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_friendly_match.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_friendly_match.Location = New System.Drawing.Point(10, 85)
|
||||
Me.btn_friendly_match.Name = "btn_friendly_match"
|
||||
Me.btn_friendly_match.Size = New System.Drawing.Size(240, 50)
|
||||
Me.btn_friendly_match.TabIndex = 2
|
||||
Me.btn_friendly_match.Text = "FRIENDLY MATCH"
|
||||
Me.btn_friendly_match.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_manage_event
|
||||
'
|
||||
Me.btn_manage_event.FlatAppearance.MouseOverBackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
|
||||
Me.btn_manage_event.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_manage_event.Font = New System.Drawing.Font("Tahoma", 16.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_manage_event.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_manage_event.Location = New System.Drawing.Point(10, 195)
|
||||
Me.btn_manage_event.Name = "btn_manage_event"
|
||||
Me.btn_manage_event.Size = New System.Drawing.Size(240, 50)
|
||||
Me.btn_manage_event.TabIndex = 4
|
||||
Me.btn_manage_event.Text = "MANAGE EVENT"
|
||||
Me.btn_manage_event.UseVisualStyleBackColor = True
|
||||
'
|
||||
'PictureBox1
|
||||
'
|
||||
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
|
||||
Me.PictureBox1.Location = New System.Drawing.Point(10, 15)
|
||||
Me.PictureBox1.Name = "PictureBox1"
|
||||
Me.PictureBox1.Size = New System.Drawing.Size(240, 60)
|
||||
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.PictureBox1.TabIndex = 11
|
||||
Me.PictureBox1.TabStop = False
|
||||
'
|
||||
'btn_history_view
|
||||
'
|
||||
Me.btn_history_view.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_history_view.Font = New System.Drawing.Font("Tahoma", 16.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_history_view.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_history_view.Location = New System.Drawing.Point(10, 305)
|
||||
Me.btn_history_view.Name = "btn_history_view"
|
||||
Me.btn_history_view.Size = New System.Drawing.Size(240, 50)
|
||||
Me.btn_history_view.TabIndex = 12
|
||||
Me.btn_history_view.Text = "HISTORY OF EVENTS"
|
||||
Me.btn_history_view.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_system_settings
|
||||
'
|
||||
Me.btn_system_settings.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_system_settings.Font = New System.Drawing.Font("Tahoma", 16.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_system_settings.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_system_settings.Location = New System.Drawing.Point(645, 415)
|
||||
Me.btn_system_settings.Name = "btn_system_settings"
|
||||
Me.btn_system_settings.Size = New System.Drawing.Size(180, 50)
|
||||
Me.btn_system_settings.TabIndex = 13
|
||||
Me.btn_system_settings.Text = "SETTINGS"
|
||||
Me.btn_system_settings.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_delete_event
|
||||
'
|
||||
Me.btn_delete_event.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_delete_event.Font = New System.Drawing.Font("Tahoma", 16.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_delete_event.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_delete_event.Location = New System.Drawing.Point(10, 250)
|
||||
Me.btn_delete_event.Name = "btn_delete_event"
|
||||
Me.btn_delete_event.Size = New System.Drawing.Size(240, 50)
|
||||
Me.btn_delete_event.TabIndex = 3
|
||||
Me.btn_delete_event.Text = "CANCEL EVENT"
|
||||
Me.btn_delete_event.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_person_data
|
||||
'
|
||||
Me.btn_person_data.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_person_data.Font = New System.Drawing.Font("Tahoma", 16.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_person_data.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_person_data.Location = New System.Drawing.Point(10, 360)
|
||||
Me.btn_person_data.Name = "btn_person_data"
|
||||
Me.btn_person_data.Size = New System.Drawing.Size(240, 50)
|
||||
Me.btn_person_data.TabIndex = 14
|
||||
Me.btn_person_data.Text = "ADD A PERSON"
|
||||
Me.btn_person_data.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_update_club_logo
|
||||
'
|
||||
Me.btn_update_club_logo.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_update_club_logo.Font = New System.Drawing.Font("Tahoma", 16.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_update_club_logo.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_update_club_logo.Location = New System.Drawing.Point(645, 305)
|
||||
Me.btn_update_club_logo.Name = "btn_update_club_logo"
|
||||
Me.btn_update_club_logo.Size = New System.Drawing.Size(180, 50)
|
||||
Me.btn_update_club_logo.TabIndex = 15
|
||||
Me.btn_update_club_logo.Text = "Clubs Logo"
|
||||
Me.btn_update_club_logo.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_update_country_flag
|
||||
'
|
||||
Me.btn_update_country_flag.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_update_country_flag.Font = New System.Drawing.Font("Tahoma", 16.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_update_country_flag.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_update_country_flag.Location = New System.Drawing.Point(645, 360)
|
||||
Me.btn_update_country_flag.Name = "btn_update_country_flag"
|
||||
Me.btn_update_country_flag.Size = New System.Drawing.Size(180, 50)
|
||||
Me.btn_update_country_flag.TabIndex = 16
|
||||
Me.btn_update_country_flag.Text = "Country Flags"
|
||||
Me.btn_update_country_flag.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pb_event_logo
|
||||
'
|
||||
Me.pb_event_logo.Location = New System.Drawing.Point(645, 10)
|
||||
Me.pb_event_logo.Name = "pb_event_logo"
|
||||
Me.pb_event_logo.Size = New System.Drawing.Size(180, 180)
|
||||
Me.pb_event_logo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_event_logo.TabIndex = 17
|
||||
Me.pb_event_logo.TabStop = False
|
||||
'
|
||||
'pb_event_country_flag
|
||||
'
|
||||
Me.pb_event_country_flag.Location = New System.Drawing.Point(645, 200)
|
||||
Me.pb_event_country_flag.Name = "pb_event_country_flag"
|
||||
Me.pb_event_country_flag.Size = New System.Drawing.Size(55, 35)
|
||||
Me.pb_event_country_flag.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pb_event_country_flag.TabIndex = 18
|
||||
Me.pb_event_country_flag.TabStop = False
|
||||
'
|
||||
'lbl_country_iso3
|
||||
'
|
||||
Me.lbl_country_iso3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.lbl_country_iso3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.lbl_country_iso3.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.lbl_country_iso3.ForeColor = System.Drawing.Color.White
|
||||
Me.lbl_country_iso3.Location = New System.Drawing.Point(705, 200)
|
||||
Me.lbl_country_iso3.Name = "lbl_country_iso3"
|
||||
Me.lbl_country_iso3.Size = New System.Drawing.Size(120, 35)
|
||||
Me.lbl_country_iso3.TabIndex = 80
|
||||
Me.lbl_country_iso3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.BackColor = System.Drawing.Color.Black
|
||||
Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label10.ForeColor = System.Drawing.Color.White
|
||||
Me.Label10.Location = New System.Drawing.Point(260, 10)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(375, 40)
|
||||
Me.Label10.TabIndex = 84
|
||||
Me.Label10.Text = "< SELECT AN EVENT >"
|
||||
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btn_add_club
|
||||
'
|
||||
Me.btn_add_club.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_add_club.Font = New System.Drawing.Font("Tahoma", 16.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_add_club.ForeColor = System.Drawing.Color.White
|
||||
Me.btn_add_club.Location = New System.Drawing.Point(10, 415)
|
||||
Me.btn_add_club.Name = "btn_add_club"
|
||||
Me.btn_add_club.Size = New System.Drawing.Size(240, 50)
|
||||
Me.btn_add_club.TabIndex = 85
|
||||
Me.btn_add_club.Text = "ADD A CLUB"
|
||||
Me.btn_add_club.UseVisualStyleBackColor = True
|
||||
'
|
||||
'PictureBox2
|
||||
'
|
||||
Me.PictureBox2.Image = Global.TAKEONE_EMASS.My.Resources.Resources.user_group_icon
|
||||
Me.PictureBox2.Location = New System.Drawing.Point(645, 240)
|
||||
Me.PictureBox2.Name = "PictureBox2"
|
||||
Me.PictureBox2.Size = New System.Drawing.Size(55, 55)
|
||||
Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.PictureBox2.TabIndex = 86
|
||||
Me.PictureBox2.TabStop = False
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Label1.ForeColor = System.Drawing.Color.White
|
||||
Me.Label1.Location = New System.Drawing.Point(705, 240)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(120, 55)
|
||||
Me.Label1.TabIndex = 87
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'frm_main
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(834, 481)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.PictureBox2)
|
||||
Me.Controls.Add(Me.btn_add_club)
|
||||
Me.Controls.Add(Me.Label10)
|
||||
Me.Controls.Add(Me.lbl_country_iso3)
|
||||
Me.Controls.Add(Me.pb_event_country_flag)
|
||||
Me.Controls.Add(Me.pb_event_logo)
|
||||
Me.Controls.Add(Me.btn_update_country_flag)
|
||||
Me.Controls.Add(Me.btn_update_club_logo)
|
||||
Me.Controls.Add(Me.btn_person_data)
|
||||
Me.Controls.Add(Me.btn_system_settings)
|
||||
Me.Controls.Add(Me.btn_history_view)
|
||||
Me.Controls.Add(Me.PictureBox1)
|
||||
Me.Controls.Add(Me.btn_manage_event)
|
||||
Me.Controls.Add(Me.btn_delete_event)
|
||||
Me.Controls.Add(Me.btn_friendly_match)
|
||||
Me.Controls.Add(Me.btn_create_event)
|
||||
Me.Controls.Add(Me.lst_events)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "frm_main"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "TAKEONE - Event Managment And Scoring System"
|
||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_event_logo, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pb_event_country_flag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents lst_events As ListBox
|
||||
Friend WithEvents btn_create_event As Button
|
||||
Friend WithEvents btn_friendly_match As Button
|
||||
Friend WithEvents btn_manage_event As Button
|
||||
Friend WithEvents PictureBox1 As PictureBox
|
||||
Friend WithEvents btn_history_view As Button
|
||||
Friend WithEvents btn_system_settings As Button
|
||||
Friend WithEvents btn_delete_event As Button
|
||||
Friend WithEvents btn_person_data As Button
|
||||
Friend WithEvents btn_update_club_logo As Button
|
||||
Friend WithEvents btn_update_country_flag As Button
|
||||
Friend WithEvents pb_event_logo As PictureBox
|
||||
Friend WithEvents pb_event_country_flag As PictureBox
|
||||
Friend WithEvents lbl_country_iso3 As Label
|
||||
Friend WithEvents Label10 As Label
|
||||
Friend WithEvents btn_add_club As Button
|
||||
Friend WithEvents PictureBox2 As PictureBox
|
||||
Friend WithEvents Label1 As Label
|
||||
End Class
|
||||
384
Visual Studio Code/Timer Library/forms/main/frm_main.resx
Normal file
@ -0,0 +1,384 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAAhcAAACCCAYAAAD17eqRAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAACH
|
||||
DwAAjA8AAP1SAACBQAAAfXkAAOmLAAA85QAAGcxzPIV3AAAKOWlDQ1BQaG90b3Nob3AgSUNDIHByb2Zp
|
||||
bGUAAEjHnZZ3VFTXFofPvXd6oc0wAlKG3rvAANJ7k15FYZgZYCgDDjM0sSGiAhFFRJoiSFDEgNFQJFZE
|
||||
sRAUVLAHJAgoMRhFVCxvRtaLrqy89/Ly++Osb+2z97n77L3PWhcAkqcvl5cGSwGQyhPwgzyc6RGRUXTs
|
||||
AIABHmCAKQBMVka6X7B7CBDJy82FniFyAl8EAfB6WLwCcNPQM4BOB/+fpFnpfIHomAARm7M5GSwRF4g4
|
||||
JUuQLrbPipgalyxmGCVmvihBEcuJOWGRDT77LLKjmNmpPLaIxTmns1PZYu4V8bZMIUfEiK+ICzO5nCwR
|
||||
3xKxRoowlSviN+LYVA4zAwAUSWwXcFiJIjYRMYkfEuQi4uUA4EgJX3HcVyzgZAvEl3JJS8/hcxMSBXQd
|
||||
li7d1NqaQffkZKVwBALDACYrmcln013SUtOZvBwAFu/8WTLi2tJFRbY0tba0NDQzMv2qUP91829K3NtF
|
||||
ehn4uWcQrf+L7a/80hoAYMyJarPziy2uCoDOLQDI3fti0zgAgKSobx3Xv7oPTTwviQJBuo2xcVZWlhGX
|
||||
wzISF/QP/U+Hv6GvvmckPu6P8tBdOfFMYYqALq4bKy0lTcinZ6QzWRy64Z+H+B8H/nUeBkGceA6fwxNF
|
||||
hImmjMtLELWbx+YKuGk8Opf3n5r4D8P+pMW5FonS+BFQY4yA1HUqQH7tBygKESDR+8Vd/6NvvvgwIH55
|
||||
4SqTi3P/7zf9Z8Gl4iWDm/A5ziUohM4S8jMX98TPEqABAUgCKpAHykAd6ABDYAasgC1wBG7AG/iDEBAJ
|
||||
VgMWSASpgA+yQB7YBApBMdgJ9oBqUAcaQTNoBcdBJzgFzoNL4Bq4AW6D+2AUTIBnYBa8BgsQBGEhMkSB
|
||||
5CEVSBPSh8wgBmQPuUG+UBAUCcVCCRAPEkJ50GaoGCqDqqF6qBn6HjoJnYeuQIPQXWgMmoZ+h97BCEyC
|
||||
qbASrAUbwwzYCfaBQ+BVcAK8Bs6FC+AdcCXcAB+FO+Dz8DX4NjwKP4PnEIAQERqiihgiDMQF8UeikHiE
|
||||
j6xHipAKpAFpRbqRPuQmMorMIG9RGBQFRUcZomxRnqhQFAu1BrUeVYKqRh1GdaB6UTdRY6hZ1Ec0Ga2I
|
||||
1kfboL3QEegEdBa6EF2BbkK3oy+ib6Mn0K8xGAwNo42xwnhiIjFJmLWYEsw+TBvmHGYQM46Zw2Kx8lh9
|
||||
rB3WH8vECrCF2CrsUexZ7BB2AvsGR8Sp4Mxw7rgoHA+Xj6vAHcGdwQ3hJnELeCm8Jt4G749n43PwpfhG
|
||||
fDf+On4Cv0CQJmgT7AghhCTCJkIloZVwkfCA8JJIJKoRrYmBRC5xI7GSeIx4mThGfEuSIemRXEjRJCFp
|
||||
B+kQ6RzpLuklmUzWIjuSo8gC8g5yM/kC+RH5jQRFwkjCS4ItsUGiRqJDYkjiuSReUlPSSXK1ZK5kheQJ
|
||||
yeuSM1J4KS0pFymm1HqpGqmTUiNSc9IUaVNpf+lU6RLpI9JXpKdksDJaMm4ybJkCmYMyF2TGKQhFneJC
|
||||
YVE2UxopFykTVAxVm+pFTaIWU7+jDlBnZWVkl8mGyWbL1sielh2lITQtmhcthVZKO04bpr1borTEaQln
|
||||
yfYlrUuGlszLLZVzlOPIFcm1yd2WeydPl3eTT5bfJd8p/1ABpaCnEKiQpbBf4aLCzFLqUtulrKVFS48v
|
||||
vacIK+opBimuVTyo2K84p6Ss5KGUrlSldEFpRpmm7KicpFyufEZ5WoWiYq/CVSlXOavylC5Ld6Kn0Cvp
|
||||
vfRZVUVVT1Whar3qgOqCmrZaqFq+WpvaQ3WCOkM9Xr1cvUd9VkNFw08jT6NF454mXpOhmai5V7NPc15L
|
||||
Wytca6tWp9aUtpy2l3audov2Ax2yjoPOGp0GnVu6GF2GbrLuPt0berCehV6iXo3edX1Y31Kfq79Pf9AA
|
||||
bWBtwDNoMBgxJBk6GWYathiOGdGMfI3yjTqNnhtrGEcZ7zLuM/5oYmGSYtJoct9UxtTbNN+02/R3Mz0z
|
||||
llmN2S1zsrm7+QbzLvMXy/SXcZbtX3bHgmLhZ7HVosfig6WVJd+y1XLaSsMq1qrWaoRBZQQwShiXrdHW
|
||||
ztYbrE9Zv7WxtBHYHLf5zdbQNtn2iO3Ucu3lnOWNy8ft1OyYdvV2o/Z0+1j7A/ajDqoOTIcGh8eO6o5s
|
||||
xybHSSddpySno07PnU2c+c7tzvMuNi7rXM65Iq4erkWuA24ybqFu1W6P3NXcE9xb3Gc9LDzWepzzRHv6
|
||||
eO7yHPFS8mJ5NXvNelt5r/Pu9SH5BPtU+zz21fPl+3b7wX7efrv9HqzQXMFb0ekP/L38d/s/DNAOWBPw
|
||||
YyAmMCCwJvBJkGlQXlBfMCU4JvhI8OsQ55DSkPuhOqHC0J4wybDosOaw+XDX8LLw0QjjiHUR1yIVIrmR
|
||||
XVHYqLCopqi5lW4r96yciLaILoweXqW9KnvVldUKq1NWn46RjGHGnIhFx4bHHol9z/RnNjDn4rziauNm
|
||||
WS6svaxnbEd2OXuaY8cp40zG28WXxU8l2CXsTphOdEisSJzhunCruS+SPJPqkuaT/ZMPJX9KCU9pS8Wl
|
||||
xqae5Mnwknm9acpp2WmD6frphemja2zW7Fkzy/fhN2VAGasyugRU0c9Uv1BHuEU4lmmfWZP5Jiss60S2
|
||||
dDYvuz9HL2d7zmSue+63a1FrWWt78lTzNuWNrXNaV78eWh+3vmeD+oaCDRMbPTYe3kTYlLzpp3yT/LL8
|
||||
V5vDN3cXKBVsLBjf4rGlpVCikF84stV2a9021DbutoHt5turtn8sYhddLTYprih+X8IqufqN6TeV33za
|
||||
Eb9joNSydP9OzE7ezuFdDrsOl0mX5ZaN7/bb3VFOLy8qf7UnZs+VimUVdXsJe4V7Ryt9K7uqNKp2Vr2v
|
||||
Tqy+XeNc01arWLu9dn4fe9/Qfsf9rXVKdcV17w5wD9yp96jvaNBqqDiIOZh58EljWGPft4xvm5sUmoqb
|
||||
PhziHRo9HHS4t9mqufmI4pHSFrhF2DJ9NProje9cv+tqNWytb6O1FR8Dx4THnn4f+/3wcZ/jPScYJ1p/
|
||||
0Pyhtp3SXtQBdeR0zHYmdo52RXYNnvQ+2dNt293+o9GPh06pnqo5LXu69AzhTMGZT2dzz86dSz83cz7h
|
||||
/HhPTM/9CxEXbvUG9g5c9Ll4+ZL7pQt9Tn1nL9tdPnXF5srJq4yrndcsr3X0W/S3/2TxU/uA5UDHdavr
|
||||
XTesb3QPLh88M+QwdP6m681Lt7xuXbu94vbgcOjwnZHokdE77DtTd1PuvriXeW/h/sYH6AdFD6UeVjxS
|
||||
fNTws+7PbaOWo6fHXMf6Hwc/vj/OGn/2S8Yv7ycKnpCfVEyqTDZPmU2dmnafvvF05dOJZ+nPFmYKf5X+
|
||||
tfa5zvMffnP8rX82YnbiBf/Fp99LXsq/PPRq2aueuYC5R69TXy/MF72Rf3P4LeNt37vwd5MLWe+x7ys/
|
||||
6H7o/ujz8cGn1E+f/gUDmPP8usTo0wAAAAlwSFlzAAALEwAACxMBAJqcGAAAMeFJREFUeF7tnQmYXEW1
|
||||
x0U2RRZB8SFPWSJhE2RHFFlFREA2RVYBfQooCgg+HrgAAirik6cCsuTxDAiKbA8SDYvIIjwCQTHITpAt
|
||||
RiKQycxkkkkymen3/7e3OqdrTnffpe7t29Onvu/3TXfdqnPOre6p+ve9daveVKlUDMMwDMMwUnHxTy9a
|
||||
/7lnn52P19XU19c3ohY0DMMwDMNohS8smCZPmjRFLWwYhmEYhtGK6dOnz8HfWoqExpvUwoZhGIZhGM24
|
||||
9557nsLfunTlhAlH4o+JC8MwDMMwksFbH/hbl6K86vFRFQzDMAzDMBpx9cSrTsPfuuRuhzjqKhiGYRiG
|
||||
YTTiissu34VPg+B1LfE98/GyVq6ukmEYhmEY5UDOaZC3HNqJ/2QI06+u/eWF+FNXru6NYRiGYRjtRz6F
|
||||
4d9yaBd33H77VPytS1HeqLKjMgzDMAzDaB9ysqR2y6EdRFcn6lIz0aNmGoZhGIZRPJGQqCXtlkPRxJ1n
|
||||
IVEzDcMwjObMGbfBGmBjsCXYGewasT3YDLwXLK/VNQzCKxSzZs1ajNdNE289tPPqxUNTp87E37rUSvSo
|
||||
mYZhGEZVQKwGdgengMvA3WAmWAwqMRgBfwP/ByaAY8HWYDnNn9EdaEtmN0vRxE7VVt5o61k0mmchUTMN
|
||||
wzC6EQz664FjwEQwA2iCIQT94GbwebCWFosxdtFWtmyUeGWDYgQvR9nhapj+4B/nqRLak/Ua1YlW26xL
|
||||
0VWMUWV91EzDMIxuAAP78oBXJn4M/go0IZA3w+A2cBh4ixanMXbgwO7PX2iWtNsPvEXi7+khU7NbKDfd
|
||||
eOMv8HdU0gSMf3VFEzpOpPCY9FsrYBiG0Q1gAF8W7AGuBD1AG/DbxWvgHGBXM8Yo2uqWjZJ2+6GROJBJ
|
||||
EwrMayZI3J4gDv+xU38CJ8v74kNe1agZMgzDGMtgwObkyx+CfwBtYC8Tg4BXU96tnYvRufgDv3zEs9Ut
|
||||
DX/Ap1igWIkG/WqKBERdPR5vNnE0OlYrr90OiURR9XgjgWTiwjCMrgCD8wrgcPAA0AbxsrMAfAvY7ZIx
|
||||
CAdxd4vEH+B9/Hka0RWM6jEpOvwrENJHoyRtEV+ISNEj52rI5K95UXthGIYxVsBgvCY4C7wKtEE7LX8H
|
||||
08CtgE9/8OrCf4KzI34ELgecrPkImAM0O0l5EeypnavRmfAKhhzE5ZUBH/+KhSwrb5P4NuIIC18U+Ldd
|
||||
5K0ZKSwodtxtEZ6HP8+j9sIwDKPTwQC8PrgE8LaCNkgn4WHwfXAU4OOjK2k+W4F6FDp7gW+D+0Dcx1g1
|
||||
rgBv0/wYnYWc/9DsUVN/ZUw5wdOJDg7y/hULDvaasKBft26FP4+CSMEj45LCgjHI975vUvfGMAyjE8GA
|
||||
uwHg46NLgDYoJ+UOsIzmKyuwuwrgrZrfgjTxPgner9k2OgP/Foc/wDt4dUMKBDefglco3FUDectC4o67
|
||||
RDvu9gfrUET4okAKGTl3QwoJ+o7iraZG/kdlGIZhdAoYZMeBkKLCcb7mLzTww1U8LwC9kd+4zAcHaDaN
|
||||
cuMLi2ZXLfxbFLziIEWF9lQIkWKAiUKhkYCRyNjcLRZpy101cVc+pADxUTMNwzDKDAbWd4GLQJZbDM2Y
|
||||
DTbVfOcBfK0O+CRLkts5XP3zVM2eUU44eHNAllcV5G0OiTZfgvUaXSlwuIHfpWbixUfGRXEhhYXzG4mO
|
||||
anICxEGx4+Zo1Bk2DMMoMxhMVwSng3lAG3BDwqsDX9TiyAv44+2dFyL/cTlXs2WUDw680a2IWtKuPsjb
|
||||
EzI1u/rAY04cuHkTkThRy/v4PqVIiV5Xy0VXK0bZptCgX3c1o3bAMAyjzGAQ3Q88LwbVovg1WE2LKQ/g
|
||||
iyt1anE04zzNllE+/Cc/kOqOu1sTFArySgJTo6sczHdXOXiFwYmL6O+o8hKKG/9qh0xRDNWy8qoF/bEu
|
||||
RY2Lmf6cWBrlyDAMo0xg4NwEcIKlNqgWBR8F/ZAWX2jghzurajG04hTNnpEf7te6G2i1Mj6+YHC3Fji/
|
||||
wokClqE9d5XAJR6XkzApJKQ9d0tC5mlPcjjkbQ9/fgcTz0teLVGEUS0xNlm2zpFhGEZZwGC5EvgBCD1Z
|
||||
My1D4AzwZi3eEMA2lybnUySa/zgcrNk1wsOB1F0tYIojLqLBt2mSg3SzwdxPTlgQWY/25BUPig0pKpic
|
||||
wHHixiX/SokvjFzyhQWpvTAMwygLGCQ/Ctq1kVgr7gLBl+WGTQqLayMfaeGKnh/Q7BthkVcV4k6alLcV
|
||||
tOSuWOBltXwcMcLkJls6WvlxieLICQsib49IseKQYsolTViQujeGYRjtBAPjO8DPo4GyzHCDsb21c0gD
|
||||
bDUTFjcCLgwW98kYirJVNT9GGOSkTA6ucW+JNBv0KVY0O61uRUhxIPFvqfiJdf1bJu683KRMH9bB31pq
|
||||
FDMZlWEYhtEOMCAeBDhoawNmWeFy3yto5xMX1G8mLL4jym0PXhHHmlFdLMnIB3dFgVcatF/tjeBArP36
|
||||
9688+HA+hKzHQb1VHcal+WJK8niqxM3LoN3otVqOqJmGYRhFgYFwVXCVGBg7jT+B8dq5tQL1mgmL05Xy
|
||||
a4DfiDLN+KRf32g/8uoFb0M0m3CZFQoMeQWDoqLRlY7QqJmGYRhFgAFwNxD313iZ4bobn9XOsREo30xY
|
||||
fEWrQ3BsGcC1PlpNdJ0J7PaI0RbUTMMwjDzBoMet0LkiJVeZ1AbGTuUXYGXtnCUo00hYDIMvaXV8UG4X
|
||||
wF1afRuSn2h1DSNv1EzDMIy8wID3PsBty7XBcCwwA2yjnTvBsWbC4gitTiNQnsugc2t335aDVzc21Ooa
|
||||
Rp6omYZhGHmAge4zoC8a+MYyfLLjFFC3syreNxIWLP8ZWTYuqHeIsKNxk1bPMPJEzTQMwwgJBjjeBrlY
|
||||
DHjdwhTwL1EbvAX8MsqXUFjs57dZHFBvZTA5stOI68CyWn3DyAs10zAMIxQY2P4VTI0Gum5kANwJZok8
|
||||
Bxe9+pjWbs1AHU7q5B4kmk0HJ8ruo9U3jLx505x18CUcGxyjnWAewNc7wWLhOxRvgEzPzOcBYjpAxBiK
|
||||
iZqvNMDWfp7tvPgzaDlZz4Gy64m6pcaPPRQY3HYG/4gGO6MePmGyu9ZujUB5iop9wZ+BZpNwkuxPQN13
|
||||
Fe/fIt/nAXzsBc4OwMc1+0WCGI73YkpL0HaHvbU8+2Wi9vi0iYsUwNfXPN8h+bTms50gptKKC9hZH8wV
|
||||
dvNiNlhHi6ERKN/V4gIdzXEg7qqS3QbnnXxQazcNlOX6Fl8FTwPNnoOrc+7k1eU8j68BTjTNbV8UAvs/
|
||||
BlpcSeF295trPooC/qeLeLLwds1+WmBvS89+meh1cZq4SAF8/cXzHZLfaD7bCWIqpbiAjRXBI8JmXgyC
|
||||
2AOBA3W6Ulygg+Fg9lPR4Rj1vA62U9rtzYDLn3MX2D3Bl8B/gQcAN03TbEl+BvyrFVsA+TTJOHk8NLAf
|
||||
SlwQiqHCtrr3gW8TF8nRxcXI3Fc7inknHSg7yELEBfxs63z2bDC+MvziY2psSRiaNkWexxKwlua7XSCe
|
||||
mrjo//ye6jnEYXDCWfI8Q4iLS4S9yuK7rlX9JqLn75V5J+4v4ySHaf5bgXo1cdGz7aa6vzYxPPOpunP0
|
||||
Y08LOpe3glYTDLudQfCSgEuec+6FVjYOs8Fe3uewIvgu8BfaSnT1LSmwH1JckFtA3RM3RQG/Ji6So4uL
|
||||
TkvzTj1YdpBFiYtLnc95p3wKWWFS76c/LM/l68hS/bcDxLNUXBz7CWSlSwuv/p48x0ziAvUPFbYqCy76
|
||||
d2RnT7Qj7YKzka3G0ArUXSoutt8UWeVJFBguNoKknkNS0LmsBhaKzsbIl9vAu7zPYCvwRHRc0gNyfWoE
|
||||
9kOLCzJqGfQigF8TF8kxcZEG+Hgr6HU+F99Z3cMlSFp41XnyXJ5AlhpDO0A8pRIXqLsxGHC2+o9DTEML
|
||||
cShbWjTpchkfuQ6k/tWEul0nLgg6mJu8DscIz6h1NPB6OcBJdY1uoZwrP6c8gI88xAUXF0s08TUE8Gni
|
||||
IjkmLtIAH0c6f3N3/gBGy/nIDpNG/vFipWf8eHk+2yJbjaNoEEtpxAXqvQ084ezM3eUDlZHZL+BQtrTk
|
||||
T3dWejbZUMY3DbwVh9Q44oD63SouDvU6HCMsfPz0w16bc9XTh6LjGr8HRTwtkoe4ILx19B7NZ17An4mL
|
||||
5Ji4SAN83O38LbjwZGSFTbzN4uyDnyFLjaNoEEuZxMXEmo1x4ytDD3H+a7Y0/MqTVbFYs7vOBq+AzPNe
|
||||
YKNbxQUXduK8Ar/jMbJzL6guyiXa+yjAx1q18ryKcR5YXtbJC/jJS1wQiqfCHtWHLxMXyTFxkRTYHyd8
|
||||
VYZnPILssGnxnVfL8+HjlSsiW42nSBBHKcQF6nxB1K8MTjgT2RlT3+uVvoN3lHHxdstWOKLGkATY6Upx
|
||||
QdDJXO91OkZ2+DTIcqKNOXl2YnRMg1vBbyk/l7yBvzzFBblE85sH8GXiIjkmLpIC++c6X33HfBRZOaTB
|
||||
gcrcHTeT55Rqr4HQII62iwuU3xLwkdBq/XknHlCpDA/jUIY0tNB/4mgE7I8jagxJga1uFhef9DodIz2c
|
||||
c/BVr303BI9Hx7XyvFpREyJFAZ95iwtylOY7NPBj4iI5Ji6SANtvBjOdr0U3cBfjfNL8C06Q5zQFWWpM
|
||||
RYI42iouUHY1MMPVnbvn1pWRObNwKFta8KOTZDzkP5CtxpAG2OtmccHJha+KTsdIBx9R3dtrWwq3/ui4
|
||||
z0ywsyxfJPBdhLhgm3xA8x8S+DBxkRwTF0mA7b2cn54tNq5eSs8rDT/5gDynYfBuZKtxFQViaJu4QLll
|
||||
wI2uXs9GG1aWTL8bh7KlRdf/l4wldjxJgM2uFRcEHc33vY7HSMYbYAfRnlz6+wzA5b218twkbXX5GRQN
|
||||
/BchLsjzIOig7QP7Ji6SY+IiCbB9g/MzcPbnkJVv6jt0J3leQX9NpwExtFNcnCzqVBZecz6ys6WhqZOr
|
||||
IkXY/QMIPlEMNrtdXKwL/EWcjHj8DdSWv8Zr7ip7VXRM43zQ9p1PEUNR4oLcCnJbYAu2TVwkx8RFXGCX
|
||||
m5Qtcn6WTLsN2fkmbxB+BllqbEWBGNoiLlDmQ6C2Qdy80w5FdrY0/ML0ytwd3i/jeAG8E4fUGLIAu10t
|
||||
Lgg6m/0At1p/Iup8jNZQWPBDcW3Ihcl+Fx3z4S2CVCvI5gFiKVJckG9ocYQAtk1cJMfERVxg9yTno3e/
|
||||
7bNPIoyRRl5/xV/zonZptB3Af+HiAsffAfhIaLV87yfR9hlvR3Fp7979Pyhj6AOb4JAaQ1Zgu+vFhQQd
|
||||
z5rg04ADEC9ra51Tt8P1HKSwYJv9MTrmMwd8SLZxu0E8RYsLTl7dQ4slK7Br4iI5uriYu9c2qRg44wjY
|
||||
SpcW3XSRajMOPZtvJDvIvMRFbZOywf8+C1nFJE84XYYsNb4igP9CxQWOcZ7Fba5sz2YbVYaffhCHMqSF
|
||||
8yv9X9pX+ud8lly3dYb9IOJiyaN3qd//TOy5tWwLulHPIS/QCXGTLu7UqXVQ3Qp3Sq1NVMRrCotGT4Tw
|
||||
6kZuwjgtiKlocUG4Edx7tXiyAJtjXVxwwjX3bgnJtS7OOnGRloADThaCiwvYrNukbOTVvyK7mMRNuJxv
|
||||
wCXHc19drxHwXbS4+JYoVxWgWdP87x4nfZO6R/vyAD6CiAsuFObs5AWSeg55g87oN0Dr+LoNLue9q2iX
|
||||
VsKidnWjTCCudogL8jAIOm8K9sa6uLhFsx8KExdNgM2fOfvzvnYQsgpM+KXtrRrJCQdqnHkD34WJC+Tv
|
||||
DnhVoVpu4KzsE2g5CdTZiyhk9VP4MXHRAnRwX/Q6vG6FX3TXJquAR8UxCX+l88s0qi3LAGJrl7ggQf+v
|
||||
Yc/ERQbYAXJxojTUVksMOOBMApqvOKwBc+pJpgH23gJy2aQsblrwoxNl29yBLDXWvIHvQsQF8t4NZrsy
|
||||
XDmzMp+38NKnoftuwD9R3fyV34FCFheCnzzExR+B9v3PBNyo55A36OD28jq8buRS0R7LgtvFMQknb7Z1
|
||||
/lUrEF87xQUJtsAWbJm4yICaGQd0SLuCaodXxKXyokEsR7i4Qm9SFjdxnoGLAXD1yEI37nHAb+7iAu+X
|
||||
Bfe54z1bb1IZfv5RVkudhp99uNKz7abS5zMg6D96M+ArD3FxL7JUf50IOrhtvQ6v2+AAVlvmH68vFMd8
|
||||
SvNUSCMQY7vFRbAFtmDHxEUG1Mw4oJMb6+Li9y4uruTYrtR3+M6yfXJ77KoZ8FuEuPi+OFZZPOVKVkmd
|
||||
+MRN7ye2kf7mgELvU8OfiYsWoIN7j9fhdROLgFzL4iBxzOfHst3KCuP04m4HQRbYgg0TFxlQM+OATm7M
|
||||
igvEsT7glYJqXPwFnCYtmnxFtW3I8EuPR7nJkjdf4DlkqTHnCfzmKi7weh+RX5l//per5VOnwYFK/+f3
|
||||
lL64VkZtslxRwKeJixagg3u71+F1E98V7bAW4KOlWrnHQCk2MWwF4iyDuCCZF9hCfRMXGVAz44BObiyL
|
||||
i3NcTH1Hp9+krP/flg5waR9jHXljZqVnk7rVJD+MbDXuvIDP3MQF/q4Lelx+32d3q4qDLGngzKOlH/Jv
|
||||
yFbPLU/g18RFC9DBdau44GOAK4l2uFYck3Adh21km5UZxFoWcUEyXelFfRMXGVAz44BObkyKC8TATcpq
|
||||
izctuoFXI5Onkb/PqMxZb+lEwr4jdomOJE9cmdLZAVcgS409L+AzF3EBVgDTXB5Xzhx+5cmodLpEEefs
|
||||
RfwQ2ep55Q18m7hoATq493odXrdQexQar7f3jkkKebIpFIi3TOIi0wJbqGviIgNqZhzQyY1VcfFxF88/
|
||||
Nyl7DdnJ08KJ58nzqjL84l+io8nS0N3XSTv9oPaLpwjgLy9xcZF4j/P8VVQyXeITPdIemAzatt8CfJu4
|
||||
aAE6uA96HV43wB1NVxZt8L/imGQQtH3jwiQg3jKJC5J6gS3UM3GRATUzDujkxqq4+LWLZ+AsLp2RLvF2
|
||||
irPjSL3C56LBytxd6ta8OBK5avx5AH95iIva1SGy4CenRqXSpeEn7q+KQWHzMbAKDqnnVATwb+KiBejg
|
||||
jvY6vG7genH+qwP+wtbKXSzbqhNAzGUTFyTVAluoY+IiA2pmHNDJjTlxAf/cz6K2SdnQtCnITp5GZj4t
|
||||
z6lGllsjCy48Wdq6C1nqOeQB/OUhLmr0f3GvqoBKm7hy6tw9tpQ2/wHWxSH1fIoCMeQhLvg47TEB+TRc
|
||||
qPEXATq487wOrxuozQHC60O8Y5KtZVt1Aoi5jOKCJL69hDomLjKgZsYBndJYFBcnuliqG2Wl3KTMuyXy
|
||||
LFj65EnKWyPDzzwkbdLeOshWzyM08JWbuOAVmZFXn49KpEgDPZW+I3eTNheCUiw0hDjyEBeheQku1PiL
|
||||
AB3cb70OrxvYR5z/Gd4xR9t3Q04D4g4lLq4HI15eVhItsIXyY11ccE2QlwLygIyzLugkoFMai+LiMRfL
|
||||
4IT0m5R5t0ROBfe791k2P/MG0W8hSz2P0MBXPuJi3PjK0IO3RkdTJIi/gTMOr7e5zgaH44h6HkWDWExc
|
||||
NAGdETcvmwv8Tm+sI8XFv3vHHLVVOzsJxB1KXBwDzvbyspJogS2UHeviIjR1fUld0ElApzSmxAV8b1OL
|
||||
A4Ne2l/TvDJRs/NP1gFfde+z3BpZ+KsfSrszQKbnuOMCP7mIi8HLqY/SpwWX/EedPXAustVzaAeIJ4i4
|
||||
4FUr7pIbiv4TPinbrJ3iYiuvc+oWjhVtcIR3zHG0bKtOAXGHFBcUn42WQk9L7AW2UM7ERTJMXGjA9yUu
|
||||
jnknp9+kzHsU8iFk0fbaIPOtkZGev/trXuyMbPV8QgI/wcXFvBP3r1SWLI6OJE9coMzZiuBE3ELEVlwQ
|
||||
TxBxETrxcV8XF2inuDjX65y6hR+INtjaO+bgAjuj2qzsIO5g4iKytwbgJXetTFomgZZ9BcqYuEiGiQsf
|
||||
+PU2Kbsa2ekSr0w4O+BEZDkfQW6NDJx+mLT/P8gadT6hgZ8g4mL4uWmVRTdfUmXkjb9FucnTkkfvqvRs
|
||||
WieyuJlXoY/nxgExmbhoADqiZcAM0TF1E7VNCPH6rYDbrftl2raZXBYQd1BxEdnk/jMLxbEQtLytjDIm
|
||||
LpJh4sIHfg9zMczdaXMElW6TMu+WCK9UrI1s5yPIrZGhe6+XPuaBtyF71DmFBD6CiIsQaXjmU/5juX8D
|
||||
pVwLAHGZuGgAOqL9vI6pm+gBbxZtMVUcc3TckyIEcQcXF5HdL3jHs8LHfz8mffjguImLZJi48IHfu1wM
|
||||
WTYp826J3I8s6SPIrZHK0MLK3F23kH6CbTHcCPgoh7jof6PSd8hH5LnPB6XthBGbiQsFdEJrg7+KTqkb
|
||||
qU0sxOvve8fI/rLNOgXEnYu4iGz/3CuTlTdAw6fucMzERTJMXEjgkwPA0kH/GU6TSJf6Dt1JnktteV8H
|
||||
8oLcGuGCU84OuBtZdX5CAx+lEBcjr71cmbvn1vLcZ4O2bEMfB8TW1eICnQ0n5HFDLs4r2BscBzj4sFPX
|
||||
Oqdu4jTRTjt6x8i3ZVt2Cog7T3HBW0h/FmVCMA2om8Ih38RFMkxcSODzO85/31G7IytdGp7xR3kedbdE
|
||||
HMgLcmtE8bUesut8hQT2y3NbhCtxbr6RPP9SzrcgiKurxAU6l5UBH628B8wCS4DWCRnjNrhPtNuygMtU
|
||||
y+O/l23bKSDu3MRFZH8cCP348mUNfJm4SIaJCwf8cZOyl53/Rb++ENnp0uBl35TnoS7RjPwwt0aQvLU0
|
||||
zkbWKH+hgP3SiAumxbf9XJ47+RUo1ZMiBDF1jbhAx7IueE50NEZzeM+/NlcIry8Wx8gQWEO2cSeAmHMV
|
||||
FwTH9vHKhmDUo7/IM3GRDBMXDvj7mPPNX8NpNylj6jt4R3kexyOrkc8gt0YWXvcj6e9FkNvgCtulEhdM
|
||||
C352ujx/8k1kq/G3C8TUFeICnQqf/HhIdDJGPL4u2lB7JLVhP1JWEHPu4oLg+Dle+axwk7gtPB8mLpJh
|
||||
4sIBf9c53wNnUrimS95timHwLmQ38hnk1sjI3Ff9xzF3RbbqMyuwHUZcLOivxk3SLq1eS6g/77RD5PmT
|
||||
Uk2CQzzdIi528zoZIx5PgtqPArx+RBwj02U7dwKIuShxwVtJvxPlQ8BJxqsLHyYukmHigsDXGmDpJmUP
|
||||
/xbZ6dLgZd+Q59D0XimOB7s1MnDGEdJvbm0H20HEhfysByecGeVmSPPm+JNo+Wju5jiinkfRIJZuERen
|
||||
e52MEZ/a45B4/RnvGNlLtnXZQbyFiAuCMu8Er4g6IZgMqoIPf01cJMPEBYGv2hWE3n23y/RLuveAHeQ5
|
||||
tLyUiTJBbo0M3X+z9DsAVka26jMLsBtcXGTeVyRK1XUvdtp8qd1/3iJ6Jw6p51IkiMPEhdEK/qpx7bgc
|
||||
4PLU8jhvN5VuPlEjEGth4oKg3PZgkagXguoCW/hr4iIZJi4IfP3Z+R28gk99pUvDT0+V8S8BDW+JOFAm
|
||||
yK0RLp/tbTX+OeSqPrMAu+HFBaAoGJn1bHQ0fVoy7bZKz0Z1t4juBSvgkHo+RYEYgogL3kbi5mWhWPzb
|
||||
/5ZtFUJc7Ol1MkYythdtebh3jBwm27vMINZCxQVB2eO9ulmpLrAFTFwkw8QF/Gxd88lNyv4+A9npkrd5
|
||||
1u3IUn1KUC7YrZEFP/269P8HZKk+swC7uYgL0ve5PSqVwYGoRPq06Iaf+LbVx8uKBDEEERcUBM5ODoQQ
|
||||
F1zLwu9ojPjU+g285tog/qA2E5TycWsfxFm4uCAof5VXPytci2W2l5eWsoqLh8EBAdlTxlkXdBLQKXWy
|
||||
uLjY+Zx30oHISp+8WyJ94KWYcOJntV6WWyPDf/2z9E/eh2z1vNMCm7mJCzL/gq9EJbIl2vFsn4Bs9ZyK
|
||||
AP67QlwQdCxzgNaBGfGobVSG1zt7x0ipdvxtBOJsl7jgAlt/EfXLRFnFxS2a/VComXFAp9SR4gI+uEnZ
|
||||
XOdz8R1XITtd8m6JpCbTrREk/voX9s5BlnruaYHNPMRFbTItWTzlyqhUhjS0sNL/5X2lD96m4spo6nnl
|
||||
DXznIS44t2Z6QKbAhRp/EtBR3el1XEYyHgfLifa8VhwjXPei9PuNIMa2iAuCOhuAXmGjLJi4SAI6pU4V
|
||||
F0s3KfvI5pkuyXu3JDKR5dbIoht+LG3xqkhtU6QQwF4e4uIa8Af3vmfLjau7pmZN3Ja+d7/tpZ85IPjV
|
||||
nDjAbx7iQl2grd2go/qu13EZyTlFtOeawF+18wmgLlVdFhBf28QFQb39PTtlwMRFEtDJdaq4+J3zt+BH
|
||||
3BE9faIgGH7ygSCM9M6OrKZIfa/5S2IH/bUOe3mIi4lgLcD9Qap5vQd9qLo5WdbEdUd6tt1U+noSrIpD
|
||||
6vnlBXx2k7jIY9XEbmM+qC3lj9cHi2OOC2S7lw3E11ZxQVD3e56tdmPiIgno5DpOXMD+umDpRMoMm5SV
|
||||
LQ186yjZjr9AltoGaYC9XMQFsmh7Z8DbF9X8gTMO/2fhjKm6Nf248dLfZLAsDqnnmAfw103iYjVge4lk
|
||||
514gt2OfKI459pZtXyYQWxnEBRfYukvYajcmLpKATq4TxcVZzlffZ3dD1thJQ/93i2zHBSDYL3XYyk1c
|
||||
ELz+usivLPzF96vls6bBn58r/ZHzkT3q/PIC/rpGXBB0VrYEeBjksuDcDO5ZcYz0gHVl25cFxNV2cUFQ
|
||||
/13gb8JeOzFxkQR0ch0lLmCbm5RxPkLVF/fmGFOJa17Ub0f+BeSqbZEU2MpbXCwDbnbHesaPryz5053V
|
||||
OlnTwFnHSJ/kCGSPOsc8gK9uExdluxxdNLyt4c+TSMNiINe+2AwMRMccDbcKbyeIqRTigsDGDoBtqdkv
|
||||
EhMXSUAn12niYg/nh/MTMs1xKGlacPFpsi0fQJbaFkmBrVzFBcH7VcEMd3zu7ltWRl57mdWypQX9lb5j
|
||||
6naQXQhqHXeewE+3iYsdvc6rG+B6COeBjUU7rAIOAY8CrU4cXgLvEDa1pcH5qFvdZ9BuEFNpxAWBna94
|
||||
dtuBiYskoJPrNHHBbbmrfga+fRSyxl4afvEx2ZZkPLLV9kgC7OQuLgjyNgfzXZn+4/fGyLoQh7Klkdkv
|
||||
VOZ+bCvp+1WwNg7V+Q8NfHSbuOACUCF+uXcC3NPiJNBwyX0c43LeFwKtfhx+D+TjqWeKY47Tpc92g3hK
|
||||
JS4IbF3j2S4aExdJQCfXMeICdlcH/MVa9TM0dTKyx2bq/8LHZXuehyy1TZIAO4WIC4L8o0SZ6uO+IdKS
|
||||
x+/zn6iZBt6KQ6NiCAXsd5W4IOiwfu51YGONJ8BnwfLa+Wug7NVR3TRcIuxwa3u/fUcAVwIc5bcdIJYy
|
||||
iou3Aa4jovkpAhMXSUAn10ni4ivOR+8+2TYpK3tadNNFsj1ngsxrXsBGYeKC4Nilolxl8e9/iezsydtT
|
||||
g1wLctsUCrbzEBfPgGNCAzfqOSQFHdZ+Xgc2VngA7AsSf19Q57DIRlpOFbZ4NWSKOEYWgA9Jn+0CcZRO
|
||||
XBDY2xD0C/tFYuIiCeiQOklcPOp8DF7ODe/GcOp7vdKzxcayTevWe08DbBQtLlYEvLJQLTv3g+/PtMiY
|
||||
TN68FJLbZWXYzkNc5AKSeg5JQYe1IuDTDFpn1olMAh/WzjUOqMv2uCOylQXey3U2VwJ3i2OEy69vIn23
|
||||
A8RQSnFBYPMgz0dRlFVcUJRybk9I2FFX4xwVeFzQIXWEuIDNrWr2uUlZgF04y54Gzjxatil/9qttExfY
|
||||
KFRcEBxfB3B1zWr5vsN2rlTm9+JQxjQ8XJl36sEyDq578kkcUePIAux2nbgg6GAuBX5H1mnwVy6fV1fP
|
||||
sRWoyysMxwHOzdDsJ4U7dX5K2NcEBjc4e4+Mo2jgv7TigsDuBZ6fIiiruMgDdtLVOEcFHhd0SJ0iLi5y
|
||||
9ueduD+y0qeRmU+rq2vmQWVBX+Q1eRp6cJJs00GwGrLV9okD6hcuLgjKfBzUFj0b+M7nkR0g9b9R6fvM
|
||||
R2Qs88D7cUSNIy2wGURccLE3CqKgnHSgPH+6Uc8hDehgxsJTI1/Uzq0VqEdRcQx4PrITEj5Wua/wpQmM
|
||||
p8GaMqYige+yiwsusHWP8FMEJi6SgA6p9OIC9nh5vcfZX3w7zadM+MXbu+92MtZc4RbiqdOSxZXeT2wj
|
||||
7R2LXLWN4oD6bREXBOVqC5+RTO0i0vArT1b3lhG2XwC1R/9CAHtBxEUeaWTuq/LcmaWeQxrQwXDi4V9F
|
||||
h9OJNHwKRAPl8xQVEgqM/YRfCgzeupFlOHlxDRlfUcBvqcUFge1/AbOEr7wxcZEEdEidIC4Odbbn7rhZ
|
||||
pk3KvKsBudP/eU6VSJ8GLz1D2nsQWWobxQH12ykuuPjZ7a5ez6YbVpY8/gccyp6Gpk2p9Gy0oYzpbhD7
|
||||
KYBWwFZXiguCTuY0r9PpJLgDae0R0GawHChCVEi4zHptMTi85q/xq6JjjodBpiuWaYDP0osLAvu8usbP
|
||||
WfMdGhMXSUCH1AniYukmZf/5VWSlTwPfPFLGyS3budpnHtT8DL8wPfKePA2//ISMl9QW+UkK6rZNXBCU
|
||||
XQO87Oryqgx3Pw2RFv36QhkT+Rmy1TiSAlvdLC7WAJwwpnVAnUDT+RY4zjU9jgJpRcVC8Ai4D7wc5SWB
|
||||
czC486KLh1eLzo6OOQoXGPDXEeKCwAfXKdF8h8bERRLQIZVaXMAWJwQu3aTs6anITpdG3phZ6dmk7hfu
|
||||
rshW/WYFtu93fvhkQ5bEz8XZAqn31UDdtooLgvLbgUWuPucMhHqkeP75X5ZxkeORrcaRBNjpWnFB0NFc
|
||||
4XU8ncRfwKiBGXkUFYeCp4BWrxUvghNA3d4/eM8BI81TJVyka1WwNTgC/BHI44UKDPjqGHFB4Oc6z28e
|
||||
mLhIAjqksouLM53dviOzbVK2cOJ5MsbnQJ5rI3zB+eJeIZw/kTYtuvkSGfcskGpXUNRru7ggqHO8qB/u
|
||||
seJFg5X+L+0jYxsCmQUkbHS7uNjc63g6jWfAp8CaYG3A2x9pRcV0cDhoeLsFx3j1IcuKno3gPiSFTPKE
|
||||
n04TF9wY7knhNw9MXCQBHVJpxQXs8D79i85u1k3Keg/cQcbIywmq3xDAPvfY4K6mVX9DD96K7JSp/41K
|
||||
z5Z1a17shVzVbzNQrxTigqDe1TUb48ZXd4MNkUbmzPIn7PIx2PVxSI0jDqjf1eKCoLPhEtZ+B9RN8MmE
|
||||
vUCsHyQsB3h1Q7OVBQ6guT+mCh8dJS4IfG0E5gnfoTFxkQR0SGUWFx91Nns2y7ZJ2ZJpt8n4FoN3IVv1
|
||||
Gwr4uMb55JoVWRIf33S2wHXIUn02A/XKJC5WAo87O3ziI9TaJcMzHqn0bLOJjPEJsAoOqbG0AnVNXIzD
|
||||
/6LeCY1luCT3TeCDWps0A3W46NZrQLObFYoWftiq7xDAfseJCwJ/B3v+Q2LiIgnokMosLrisc9XmwLey
|
||||
bVLGTc6cLXA9slSfIYGfpTu4brFxddXNtIlPRDhbgPurJP6io05pxAVB3fGgz9nqO/qjmZ4Ekmnonl/j
|
||||
H2S8jHMSSLWEOup1vbgg6HAe8jqgsQyv1KSaPI163CL8/shOXswGm2v+QwDbHSkuCHzmcUuKmLhIAjqk
|
||||
UooL2Hg7WLpJ2YOTkJ0u8VI5H310tsAeyFb9hgR+eFvnFeeX+4WkTlyfY5+6y/1fRq7qtxGoUypxQVD/
|
||||
QGGrMv+CE5AdJg1eebaMk3wP2WoczUA9ExcAHc4eXgc0VnkMrKC1QTNQZ1twe2SjCHpB6iXNmwG7nSwu
|
||||
+FjxH0QMoTBxkQR0SGUVFyc4e717b5vpiYKF1/xAxsZFljJvAhYX+Pqe882dTrOkwcu+Ic9jGrJUn41A
|
||||
ndKJCwIbFwh7lUWTr0B2mMQrXtI2OAzZahyNQB0TFxHodO7yOqGxSKKnjFB+K3CLqF8kfEz4IC2uLMBm
|
||||
x4oLAr9rgVdFHCEwcZEEdEhlFRd/cvYGL/smstKnvoN3lLF9A1mqzzyAvw2F70wbd3E1yjnr1V3q50in
|
||||
+tVA+bKKi+XAvc4mJ68OP/swDgVIC/oqfUftLuPlMupQq3osGihv4iICnc52gHMRtA5prHCwdu4+KNdO
|
||||
USGpWysjBLDX0eKCwPdOgAuVaXGlwcRFEtAh1cRF36E7VTdXSoO3xkDWS+VbCFuVRbdeqvqMg7d1OR9N
|
||||
XEvzmSfw+aCLYf73jlPjjEvvAXVPvFyg+WsEytfERVk+awfsrAVedXZ5nkNTJ6v+k7L4NxP89U34OO+7
|
||||
tTg0UHapuIDw0Xy0jbuvk+eFcPVzCAk6nk5e9yIOl2rn7cDxsogKH841SPWYug/sdLy4IPB/ihdPFkxc
|
||||
JAEdUk1cBCSruPipZy8U/6v5yxv4PdaLIxQcjGN3JihbExcBCSIuCGztBJYI23nyMHiLFocPytXERdnx
|
||||
Y88DdDxctfN10RGNNfhr92PKeW8GyigqJJNB5qXvYYNrmxwQgHU0+0UB/3wkeG8RTxaCbSlAYG81z36Z
|
||||
2MfFOSrwuKBDKpW4QF1uUlbbojswe2s+8wZ+VwO8HK/FlJXal6AVKFtqcUFg7xTPfp5co8Xgg3ImLjzQ
|
||||
+RwItMFtrMBbDf8DuIonlwe/GWS9HTQHXAZOBueDvDaFO0v7zAwjDWpmHNAhbQumB+YczVccUHcXz1Yo
|
||||
uJlVYRM5feD7QhFLSM7T/Gmg7G5e3RCk/qw1YG8ZMEHYz5vazpSNQJm1vTqlRYs/LzCIXesNaobOK4D7
|
||||
X9Tt0Ir3y4OfAK1OFgbBO6Uvw0iLmmkYhpEXGMBWB2k26+oWngCfBQ0vp+MYL9unXYq8Gadq/gwjKWqm
|
||||
YRhGnmAQ45bXIWfkjwWmgn1By6XCUYZzG/qBZicL3OFR9WkYSVAzDcMw8gYD2ZnewNbNTARxRMUGUdm8
|
||||
hBm3gg86AdHoTtRMwzCMvMEgtizIY0XETuT9Whs5cDxvUSF5rxaDYSRBzTQMwygCDGTvAT1iYOtW1AXa
|
||||
kF+kqHCM12IxjCSomYZhGEWBwWx/b3DrRu4AK4o2WR8ULSoc9sSIkRk10zAMo0gwoF3gDXDdCNevuBjc
|
||||
CBZHeUUzT/t8DCMpaqZhGEaRYFDLa0dKIxm3aJ+PYSRFzTQMwygaDGxrg9lioDOK5wjtszGMpKiZhmEY
|
||||
7QCD20cBl9DWBj4jX54Hy2mfi2EkRc1Mwh233z511qxZi8lzzz47/1fX/vJCrRy5+KcXrc8yrjxhfa2s
|
||||
zxWXXb7LQ1Onzuzr6xshfM08raxD83fvPfc8xXytPKFNWV5y5YQJR2p1HEnaIi6MZ/r06XNok39bnXMc
|
||||
eB4uTp9G9hu1S6t42NZsF/k5NGsX6adZnoZrJ37Gfp4sp0EfrOe+X6zX6vMmcWOTsE7S77JDa8+bbrzx
|
||||
F1pZB9ub5XhOLs+1y9UTrzpNli0DGOC+KQY8ozg+rX0ehpEGNTMu7BTxt8KOjq9bDahRB1pN7CCjzq4S
|
||||
2VHrEHby7ITxusI6rh7zmnXKjfxFf9U67LwZjzs3Jpbn+2a+XPm4bREX2uF5RgNIRQ6caeF5MEbXHkx8
|
||||
TxoJL9mWrmyz8oTHokG3wr8sz/NpNqA5P1G9hnkatI2/1eSEAfNa1aN9FyfbRLZLq8E3bmwOlk/zXSYy
|
||||
Tp6Xa89W4oK4tuH5RG3T9P+gnWCQ49LWk8SgZ+RP0+3iDSMpamZcXCcZ5xce8TviaGBq2TG7DlgO1pMn
|
||||
TZrCPHawLs+nkb8obrWOxHXkrTp9krQt4sIYSDTIVUWSPJ4Fv32akaSsIxJCiQSR5ieubyck+FlEg2ks
|
||||
ceHijL5T1bzou1YdxF2eRtJ20XzF+S6T6Hhd3bi47w9tuBhCf1dDgsGO20o/JwY/Iz+mgGW1z8Ew0qJm
|
||||
xsV1ikzshFv9gnIdMZO7tMvXzQYfKQjkr2Rnq5lQ8P05kRK3c44GjFjiImlbxMUNBEwcGNgGPJcQV0WS
|
||||
DIyyLVnegbdqeZKk/RxN/MQWF5EAq/AzcHmynI+zL+NkOzvBKL93PknakGi+nI1m32X//8B9DxyybCPk
|
||||
VZJm/3NlAQPeZmAgGgCNfHgErKS1v2FkQc1MAn8RcdBzHXGzTssfONjxtxro/U7V5cfp1KU/Fx/LSzvN
|
||||
0AaCZiRpizg4weJ+sfKv+0UdVyA1I04bOmRbMg4H3qrliWuHuO1HpB9+Pxx83ypOJyT4+dI3X3NAbVVP
|
||||
i9PZYH6z70uSNiSazTg2XJmofvV9VD62b3c7hCnu/0C7wcB3iBgIjbDMAGtq7W4YWVEz46J1kK7z00ja
|
||||
ETvc4JL1toi7ChB3YHadd2RHLeNI2hZxYH1nw52vywsxOCT5PNJ8dtFnk+hWjuYnrm8nLvhatlerei5O
|
||||
+b1wIq7VvISk7aL5crG2Emvu/0BeFaPfuL7TfIZlAAPgD8WA2A64SuYc8FLELNAr0OqUndfA+7T2NowQ
|
||||
qJlxYWdH2ClGHVasKxdJOzd3v5iJnb28vBvZVOv5/pydqJNW60jcOTXz4UjaFnFw58m/tBUJjZaDUFyS
|
||||
fB6uLBP9O1q1v4uZPlie59LsXr8WU9w42f6yTPQ5t6wn45TfL6boO6PWIy42JtkujcRfI1+tvsvE/z+g
|
||||
H75udX6OuO1YNjAIcoLn5dGgGBqKg+ngFvBjcDL4DPgw4L4eb9NikqAM41sDvA9sA/YAR4DTwSXgVsDb
|
||||
D68DLYaimQ/UvUwMIxRqZlw44LGjIuzIW/1CZefmymvHm8EBiR0q67IjZsfaqjP2/bHDd/Xj/PJ3dVv5
|
||||
IUnbIg6M0YkK2uVrnjdfh5jTkeTzkGUlrSYFsp7fNs0GbC2muHG674d7Tz9x6hH6YNuyrd33K86Ex0bt
|
||||
wnytPOExxip9NSsvYUzuO0CSfNdkrNrxsoMB8Ysg6ZUCrpnxIrgTXAQoHg4AW4K3a37yhD7BdoDi4yxw
|
||||
LXgMFLXc9wKwuxabYYREzTQMwygjGBg5OJ8C7gV9wA2aM8E94ApwKuBmaJuCFTQ7ZQNxLg84gfVQ8F3A
|
||||
R3EpiqQwyAr3Ltla828YoVEzDcMwOgEMlh0hHtKC81sF7ACOBdzU7H4gRVUc5gEKlpU1H4aRB2qmYRiG
|
||||
UV4gFNYDvDrzbXA9eArwlgfFhLsVdDOgKFlVs2EY+VF50/8DJZ+bS16RxNEAAAAASUVORK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
||||
134
Visual Studio Code/Timer Library/forms/main/frm_main.vb
Normal file
@ -0,0 +1,134 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Public Class frm_main
|
||||
|
||||
Public Server As Boolean = False
|
||||
|
||||
Private Sub frm_event_managment_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
EnableIfDatabase()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_system_settings_Click(sender As Object, e As EventArgs) Handles btn_system_settings.Click
|
||||
|
||||
Me.Hide()
|
||||
frm_settings.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_run_event_Click(sender As Object, e As EventArgs) Handles btn_manage_event.Click
|
||||
|
||||
If Not SelectedEvent.ID = 0 Then
|
||||
frm_event_control.Show()
|
||||
Me.Hide()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_person_data_Click(sender As Object, e As EventArgs) Handles btn_person_data.Click
|
||||
|
||||
frm_add_person.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_create_event_Click(sender As Object, e As EventArgs) Handles btn_create_event.Click
|
||||
|
||||
frm_create_event.Show()
|
||||
Me.Hide()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_history_view_Click(sender As Object, e As EventArgs) Handles btn_history_view.Click
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub lst_events_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lst_events.SelectedIndexChanged
|
||||
|
||||
Try
|
||||
SelectedEvent = New platformevent(lst_events.SelectedValue)
|
||||
lbl_country_iso3.Text = SelectedEvent.Country.ISO3
|
||||
pb_event_logo.Image = Image.FromStream(SelectedEvent.Logo)
|
||||
pb_event_country_flag.Image = Image.FromStream(SelectedEvent.Country.Flag)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_update_club_logo_Click(sender As Object, e As EventArgs) Handles btn_update_club_logo.Click
|
||||
|
||||
frm_update_logo.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_update_country_flag_Click(sender As Object, e As EventArgs) Handles btn_update_country_flag.Click
|
||||
|
||||
frm_update_flag.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_delete_event_Click(sender As Object, e As EventArgs) Handles btn_delete_event.Click
|
||||
|
||||
If Not lst_events.SelectedValue = 0 Then
|
||||
|
||||
Dim iCancelEvent As DialogResult = MessageBox.Show("Would You Like To Cancel The Event ?", "Event Cancelation", MessageBoxButtons.YesNo, MessageBoxIcon.Stop)
|
||||
|
||||
If iCancelEvent = DialogResult.Yes Then
|
||||
|
||||
Try
|
||||
EventList(lst_events)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_friendly_match_Click(sender As Object, e As EventArgs) Handles btn_friendly_match.Click
|
||||
|
||||
frm_friendly_match.Show()
|
||||
Me.Hide()
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub EnableIfDatabase()
|
||||
|
||||
If (CON_TEST(My.Settings.server, My.Settings.port, My.Settings.database, My.Settings.userid, My.Settings.password)) Then
|
||||
|
||||
EventList(lst_events)
|
||||
btn_create_event.Enabled = True
|
||||
btn_delete_event.Enabled = True
|
||||
btn_friendly_match.Enabled = True
|
||||
btn_history_view.Enabled = True
|
||||
btn_manage_event.Enabled = True
|
||||
btn_person_data.Enabled = True
|
||||
btn_system_settings.Enabled = True
|
||||
btn_update_club_logo.Enabled = True
|
||||
btn_update_country_flag.Enabled = True
|
||||
btn_add_club.Enabled = True
|
||||
|
||||
Else
|
||||
|
||||
btn_create_event.Enabled = False
|
||||
btn_delete_event.Enabled = False
|
||||
btn_friendly_match.Enabled = False
|
||||
btn_history_view.Enabled = False
|
||||
btn_manage_event.Enabled = False
|
||||
btn_person_data.Enabled = False
|
||||
btn_add_club.Enabled = False
|
||||
btn_update_club_logo.Enabled = False
|
||||
btn_update_country_flag.Enabled = False
|
||||
btn_system_settings.Enabled = True
|
||||
Me.Hide()
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
544
Visual Studio Code/Timer Library/forms/main/frm_settings.designer.vb
generated
Normal file
@ -0,0 +1,544 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frm_settings
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.btn_load_file = New System.Windows.Forms.Button()
|
||||
Me.btn_save_intro = New System.Windows.Forms.Button()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.txt_path = New System.Windows.Forms.TextBox()
|
||||
Me.chk_intro = New System.Windows.Forms.CheckBox()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.txt_storage_path = New System.Windows.Forms.TextBox()
|
||||
Me.ComboBox3 = New System.Windows.Forms.ComboBox()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.ComboBox4 = New System.Windows.Forms.ComboBox()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.ComboBox2 = New System.Windows.Forms.ComboBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.ComboBox1 = New System.Windows.Forms.ComboBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.chk_video_capture = New System.Windows.Forms.CheckBox()
|
||||
Me.btn_capture_path = New System.Windows.Forms.Button()
|
||||
Me.btn_save_capture_settings = New System.Windows.Forms.Button()
|
||||
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.txt_server = New System.Windows.Forms.TextBox()
|
||||
Me.btn_save_connection = New System.Windows.Forms.Button()
|
||||
Me.txt_user = New System.Windows.Forms.TextBox()
|
||||
Me.txt_password = New System.Windows.Forms.TextBox()
|
||||
Me.txt_database = New System.Windows.Forms.TextBox()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.txt_port = New System.Windows.Forms.TextBox()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.Label15 = New System.Windows.Forms.Label()
|
||||
Me.Label16 = New System.Windows.Forms.Label()
|
||||
Me.chk_database_enable = New System.Windows.Forms.CheckBox()
|
||||
Me.GroupBox4 = New System.Windows.Forms.GroupBox()
|
||||
Me.ComboBox7 = New System.Windows.Forms.ComboBox()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.ComboBox6 = New System.Windows.Forms.ComboBox()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.ComboBox5 = New System.Windows.Forms.ComboBox()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
Me.GroupBox3.SuspendLayout()
|
||||
Me.GroupBox4.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'btn_load_file
|
||||
'
|
||||
Me.btn_load_file.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_load_file.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_load_file.Location = New System.Drawing.Point(10, 95)
|
||||
Me.btn_load_file.Name = "btn_load_file"
|
||||
Me.btn_load_file.Size = New System.Drawing.Size(175, 45)
|
||||
Me.btn_load_file.TabIndex = 2
|
||||
Me.btn_load_file.Text = "BROWSE"
|
||||
Me.btn_load_file.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_save_intro
|
||||
'
|
||||
Me.btn_save_intro.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_save_intro.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_save_intro.Location = New System.Drawing.Point(190, 95)
|
||||
Me.btn_save_intro.Name = "btn_save_intro"
|
||||
Me.btn_save_intro.Size = New System.Drawing.Size(175, 45)
|
||||
Me.btn_save_intro.TabIndex = 3
|
||||
Me.btn_save_intro.Text = "SAVE"
|
||||
Me.btn_save_intro.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.Label6)
|
||||
Me.GroupBox1.Controls.Add(Me.txt_path)
|
||||
Me.GroupBox1.Controls.Add(Me.chk_intro)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_load_file)
|
||||
Me.GroupBox1.Controls.Add(Me.btn_save_intro)
|
||||
Me.GroupBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox1.ForeColor = System.Drawing.Color.White
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(10, 10)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(375, 150)
|
||||
Me.GroupBox1.TabIndex = 4
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "[ MAIN SETTINGS ]"
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.Location = New System.Drawing.Point(10, 60)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(105, 30)
|
||||
Me.Label6.TabIndex = 17
|
||||
Me.Label6.Text = "Intro Path :"
|
||||
Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_path
|
||||
'
|
||||
Me.txt_path.Location = New System.Drawing.Point(120, 60)
|
||||
Me.txt_path.Name = "txt_path"
|
||||
Me.txt_path.Size = New System.Drawing.Size(245, 26)
|
||||
Me.txt_path.TabIndex = 16
|
||||
'
|
||||
'chk_intro
|
||||
'
|
||||
Me.chk_intro.Location = New System.Drawing.Point(10, 30)
|
||||
Me.chk_intro.Name = "chk_intro"
|
||||
Me.chk_intro.Size = New System.Drawing.Size(250, 24)
|
||||
Me.chk_intro.TabIndex = 5
|
||||
Me.chk_intro.Text = "Enable StartUp Intro Video"
|
||||
Me.chk_intro.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.Label5)
|
||||
Me.GroupBox2.Controls.Add(Me.txt_storage_path)
|
||||
Me.GroupBox2.Controls.Add(Me.ComboBox3)
|
||||
Me.GroupBox2.Controls.Add(Me.Label3)
|
||||
Me.GroupBox2.Controls.Add(Me.ComboBox4)
|
||||
Me.GroupBox2.Controls.Add(Me.Label4)
|
||||
Me.GroupBox2.Controls.Add(Me.ComboBox2)
|
||||
Me.GroupBox2.Controls.Add(Me.Label2)
|
||||
Me.GroupBox2.Controls.Add(Me.ComboBox1)
|
||||
Me.GroupBox2.Controls.Add(Me.Label1)
|
||||
Me.GroupBox2.Controls.Add(Me.chk_video_capture)
|
||||
Me.GroupBox2.Controls.Add(Me.btn_capture_path)
|
||||
Me.GroupBox2.Controls.Add(Me.btn_save_capture_settings)
|
||||
Me.GroupBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox2.ForeColor = System.Drawing.Color.White
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(10, 165)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(375, 295)
|
||||
Me.GroupBox2.TabIndex = 7
|
||||
Me.GroupBox2.TabStop = False
|
||||
Me.GroupBox2.Text = "[ VIDEO SOURCE ]"
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.Location = New System.Drawing.Point(10, 205)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(105, 30)
|
||||
Me.Label5.TabIndex = 15
|
||||
Me.Label5.Text = "Store Path :"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_storage_path
|
||||
'
|
||||
Me.txt_storage_path.Location = New System.Drawing.Point(120, 205)
|
||||
Me.txt_storage_path.Name = "txt_storage_path"
|
||||
Me.txt_storage_path.Size = New System.Drawing.Size(245, 26)
|
||||
Me.txt_storage_path.TabIndex = 14
|
||||
'
|
||||
'ComboBox3
|
||||
'
|
||||
Me.ComboBox3.FormattingEnabled = True
|
||||
Me.ComboBox3.Location = New System.Drawing.Point(120, 170)
|
||||
Me.ComboBox3.Name = "ComboBox3"
|
||||
Me.ComboBox3.Size = New System.Drawing.Size(245, 28)
|
||||
Me.ComboBox3.TabIndex = 13
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.Location = New System.Drawing.Point(10, 170)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(105, 30)
|
||||
Me.Label3.TabIndex = 12
|
||||
Me.Label3.Text = "Source #4 :"
|
||||
Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'ComboBox4
|
||||
'
|
||||
Me.ComboBox4.FormattingEnabled = True
|
||||
Me.ComboBox4.Location = New System.Drawing.Point(120, 135)
|
||||
Me.ComboBox4.Name = "ComboBox4"
|
||||
Me.ComboBox4.Size = New System.Drawing.Size(245, 28)
|
||||
Me.ComboBox4.TabIndex = 11
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.Location = New System.Drawing.Point(10, 135)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(105, 30)
|
||||
Me.Label4.TabIndex = 10
|
||||
Me.Label4.Text = "Source #3 :"
|
||||
Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'ComboBox2
|
||||
'
|
||||
Me.ComboBox2.FormattingEnabled = True
|
||||
Me.ComboBox2.Location = New System.Drawing.Point(120, 100)
|
||||
Me.ComboBox2.Name = "ComboBox2"
|
||||
Me.ComboBox2.Size = New System.Drawing.Size(245, 28)
|
||||
Me.ComboBox2.TabIndex = 9
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.Location = New System.Drawing.Point(10, 100)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(105, 30)
|
||||
Me.Label2.TabIndex = 8
|
||||
Me.Label2.Text = "Source #2 :"
|
||||
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'ComboBox1
|
||||
'
|
||||
Me.ComboBox1.FormattingEnabled = True
|
||||
Me.ComboBox1.Location = New System.Drawing.Point(120, 65)
|
||||
Me.ComboBox1.Name = "ComboBox1"
|
||||
Me.ComboBox1.Size = New System.Drawing.Size(245, 28)
|
||||
Me.ComboBox1.TabIndex = 7
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Location = New System.Drawing.Point(10, 65)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(105, 30)
|
||||
Me.Label1.TabIndex = 6
|
||||
Me.Label1.Text = "Source #1 :"
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'chk_video_capture
|
||||
'
|
||||
Me.chk_video_capture.Location = New System.Drawing.Point(10, 35)
|
||||
Me.chk_video_capture.Name = "chk_video_capture"
|
||||
Me.chk_video_capture.Size = New System.Drawing.Size(250, 24)
|
||||
Me.chk_video_capture.TabIndex = 5
|
||||
Me.chk_video_capture.Text = "Enable Video Capture"
|
||||
Me.chk_video_capture.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_capture_path
|
||||
'
|
||||
Me.btn_capture_path.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_capture_path.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_capture_path.Location = New System.Drawing.Point(10, 240)
|
||||
Me.btn_capture_path.Name = "btn_capture_path"
|
||||
Me.btn_capture_path.Size = New System.Drawing.Size(175, 45)
|
||||
Me.btn_capture_path.TabIndex = 2
|
||||
Me.btn_capture_path.Text = "BROWSE"
|
||||
Me.btn_capture_path.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_save_capture_settings
|
||||
'
|
||||
Me.btn_save_capture_settings.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_save_capture_settings.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_save_capture_settings.Location = New System.Drawing.Point(190, 240)
|
||||
Me.btn_save_capture_settings.Name = "btn_save_capture_settings"
|
||||
Me.btn_save_capture_settings.Size = New System.Drawing.Size(175, 45)
|
||||
Me.btn_save_capture_settings.TabIndex = 3
|
||||
Me.btn_save_capture_settings.Text = "SAVE"
|
||||
Me.btn_save_capture_settings.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GroupBox3
|
||||
'
|
||||
Me.GroupBox3.Controls.Add(Me.Button1)
|
||||
Me.GroupBox3.Controls.Add(Me.txt_server)
|
||||
Me.GroupBox3.Controls.Add(Me.btn_save_connection)
|
||||
Me.GroupBox3.Controls.Add(Me.txt_user)
|
||||
Me.GroupBox3.Controls.Add(Me.txt_password)
|
||||
Me.GroupBox3.Controls.Add(Me.txt_database)
|
||||
Me.GroupBox3.Controls.Add(Me.Label12)
|
||||
Me.GroupBox3.Controls.Add(Me.txt_port)
|
||||
Me.GroupBox3.Controls.Add(Me.Label13)
|
||||
Me.GroupBox3.Controls.Add(Me.Label14)
|
||||
Me.GroupBox3.Controls.Add(Me.Label15)
|
||||
Me.GroupBox3.Controls.Add(Me.Label16)
|
||||
Me.GroupBox3.Controls.Add(Me.chk_database_enable)
|
||||
Me.GroupBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox3.ForeColor = System.Drawing.Color.White
|
||||
Me.GroupBox3.Location = New System.Drawing.Point(395, 165)
|
||||
Me.GroupBox3.Name = "GroupBox3"
|
||||
Me.GroupBox3.Size = New System.Drawing.Size(374, 295)
|
||||
Me.GroupBox3.TabIndex = 16
|
||||
Me.GroupBox3.TabStop = False
|
||||
Me.GroupBox3.Text = "[ DATABASE CONNECTION ]"
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.Button1.Location = New System.Drawing.Point(10, 240)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(175, 45)
|
||||
Me.Button1.TabIndex = 16
|
||||
Me.Button1.Text = "CONNECT"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txt_server
|
||||
'
|
||||
Me.txt_server.Location = New System.Drawing.Point(120, 65)
|
||||
Me.txt_server.Name = "txt_server"
|
||||
Me.txt_server.Size = New System.Drawing.Size(245, 26)
|
||||
Me.txt_server.TabIndex = 29
|
||||
'
|
||||
'btn_save_connection
|
||||
'
|
||||
Me.btn_save_connection.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_save_connection.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.World, CType(0, Byte))
|
||||
Me.btn_save_connection.Location = New System.Drawing.Point(190, 240)
|
||||
Me.btn_save_connection.Name = "btn_save_connection"
|
||||
Me.btn_save_connection.Size = New System.Drawing.Size(175, 45)
|
||||
Me.btn_save_connection.TabIndex = 17
|
||||
Me.btn_save_connection.Text = "SAVE"
|
||||
Me.btn_save_connection.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txt_user
|
||||
'
|
||||
Me.txt_user.Location = New System.Drawing.Point(120, 100)
|
||||
Me.txt_user.Name = "txt_user"
|
||||
Me.txt_user.Size = New System.Drawing.Size(245, 26)
|
||||
Me.txt_user.TabIndex = 28
|
||||
'
|
||||
'txt_password
|
||||
'
|
||||
Me.txt_password.Location = New System.Drawing.Point(120, 135)
|
||||
Me.txt_password.Name = "txt_password"
|
||||
Me.txt_password.Size = New System.Drawing.Size(245, 26)
|
||||
Me.txt_password.TabIndex = 27
|
||||
'
|
||||
'txt_database
|
||||
'
|
||||
Me.txt_database.Location = New System.Drawing.Point(120, 170)
|
||||
Me.txt_database.Name = "txt_database"
|
||||
Me.txt_database.Size = New System.Drawing.Size(245, 26)
|
||||
Me.txt_database.TabIndex = 26
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.Location = New System.Drawing.Point(10, 205)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(105, 30)
|
||||
Me.Label12.TabIndex = 15
|
||||
Me.Label12.Text = "Port :"
|
||||
Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'txt_port
|
||||
'
|
||||
Me.txt_port.Location = New System.Drawing.Point(120, 205)
|
||||
Me.txt_port.Name = "txt_port"
|
||||
Me.txt_port.Size = New System.Drawing.Size(245, 26)
|
||||
Me.txt_port.TabIndex = 14
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.Location = New System.Drawing.Point(10, 170)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(105, 30)
|
||||
Me.Label13.TabIndex = 12
|
||||
Me.Label13.Text = "Database :"
|
||||
Me.Label13.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.Location = New System.Drawing.Point(10, 135)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(105, 30)
|
||||
Me.Label14.TabIndex = 10
|
||||
Me.Label14.Text = "Password :"
|
||||
Me.Label14.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label15
|
||||
'
|
||||
Me.Label15.Location = New System.Drawing.Point(10, 100)
|
||||
Me.Label15.Name = "Label15"
|
||||
Me.Label15.Size = New System.Drawing.Size(105, 30)
|
||||
Me.Label15.TabIndex = 8
|
||||
Me.Label15.Text = "User :"
|
||||
Me.Label15.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Label16
|
||||
'
|
||||
Me.Label16.Location = New System.Drawing.Point(10, 65)
|
||||
Me.Label16.Name = "Label16"
|
||||
Me.Label16.Size = New System.Drawing.Size(105, 30)
|
||||
Me.Label16.TabIndex = 6
|
||||
Me.Label16.Text = "Server :"
|
||||
Me.Label16.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'chk_database_enable
|
||||
'
|
||||
Me.chk_database_enable.Location = New System.Drawing.Point(10, 35)
|
||||
Me.chk_database_enable.Name = "chk_database_enable"
|
||||
Me.chk_database_enable.Size = New System.Drawing.Size(250, 24)
|
||||
Me.chk_database_enable.TabIndex = 5
|
||||
Me.chk_database_enable.Text = "Enable Database"
|
||||
Me.chk_database_enable.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GroupBox4
|
||||
'
|
||||
Me.GroupBox4.Controls.Add(Me.ComboBox7)
|
||||
Me.GroupBox4.Controls.Add(Me.Label9)
|
||||
Me.GroupBox4.Controls.Add(Me.ComboBox6)
|
||||
Me.GroupBox4.Controls.Add(Me.Label8)
|
||||
Me.GroupBox4.Controls.Add(Me.ComboBox5)
|
||||
Me.GroupBox4.Controls.Add(Me.Label7)
|
||||
Me.GroupBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox4.ForeColor = System.Drawing.Color.White
|
||||
Me.GroupBox4.Location = New System.Drawing.Point(395, 10)
|
||||
Me.GroupBox4.Name = "GroupBox4"
|
||||
Me.GroupBox4.Size = New System.Drawing.Size(375, 150)
|
||||
Me.GroupBox4.TabIndex = 18
|
||||
Me.GroupBox4.TabStop = False
|
||||
Me.GroupBox4.Text = "[ SCREEN DISTRIBUTION ]"
|
||||
'
|
||||
'ComboBox7
|
||||
'
|
||||
Me.ComboBox7.FormattingEnabled = True
|
||||
Me.ComboBox7.Location = New System.Drawing.Point(145, 105)
|
||||
Me.ComboBox7.Name = "ComboBox7"
|
||||
Me.ComboBox7.Size = New System.Drawing.Size(220, 28)
|
||||
Me.ComboBox7.TabIndex = 22
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.Location = New System.Drawing.Point(10, 105)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(130, 30)
|
||||
Me.Label9.TabIndex = 21
|
||||
Me.Label9.Text = "Upcoming :"
|
||||
Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'ComboBox6
|
||||
'
|
||||
Me.ComboBox6.FormattingEnabled = True
|
||||
Me.ComboBox6.Location = New System.Drawing.Point(145, 70)
|
||||
Me.ComboBox6.Name = "ComboBox6"
|
||||
Me.ComboBox6.Size = New System.Drawing.Size(220, 28)
|
||||
Me.ComboBox6.TabIndex = 20
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.Location = New System.Drawing.Point(10, 70)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(130, 30)
|
||||
Me.Label8.TabIndex = 19
|
||||
Me.Label8.Text = "Score Board :"
|
||||
Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'ComboBox5
|
||||
'
|
||||
Me.ComboBox5.FormattingEnabled = True
|
||||
Me.ComboBox5.Location = New System.Drawing.Point(145, 35)
|
||||
Me.ComboBox5.Name = "ComboBox5"
|
||||
Me.ComboBox5.Size = New System.Drawing.Size(220, 28)
|
||||
Me.ComboBox5.TabIndex = 18
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.Location = New System.Drawing.Point(10, 35)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(130, 30)
|
||||
Me.Label7.TabIndex = 17
|
||||
Me.Label7.Text = "Score Control :"
|
||||
Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'frm_settings
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ClientSize = New System.Drawing.Size(781, 471)
|
||||
Me.Controls.Add(Me.GroupBox4)
|
||||
Me.Controls.Add(Me.GroupBox3)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "frm_settings"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "TAKEONE SETTINGS"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
Me.GroupBox3.ResumeLayout(False)
|
||||
Me.GroupBox3.PerformLayout()
|
||||
Me.GroupBox4.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents btn_load_file As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_save_intro As System.Windows.Forms.Button
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents chk_intro As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents chk_video_capture As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents btn_capture_path As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_save_capture_settings As System.Windows.Forms.Button
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
Friend WithEvents txt_path As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents txt_storage_path As System.Windows.Forms.TextBox
|
||||
Friend WithEvents ComboBox3 As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents ComboBox4 As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents ComboBox2 As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox3 As GroupBox
|
||||
Friend WithEvents txt_password As TextBox
|
||||
Friend WithEvents txt_database As TextBox
|
||||
Friend WithEvents Label12 As Label
|
||||
Friend WithEvents txt_port As TextBox
|
||||
Friend WithEvents Label13 As Label
|
||||
Friend WithEvents Label14 As Label
|
||||
Friend WithEvents Label15 As Label
|
||||
Friend WithEvents Label16 As Label
|
||||
Friend WithEvents chk_database_enable As CheckBox
|
||||
Friend WithEvents txt_server As TextBox
|
||||
Friend WithEvents txt_user As TextBox
|
||||
Friend WithEvents GroupBox4 As GroupBox
|
||||
Friend WithEvents ComboBox6 As ComboBox
|
||||
Friend WithEvents Label8 As Label
|
||||
Friend WithEvents ComboBox5 As ComboBox
|
||||
Friend WithEvents Label7 As Label
|
||||
Friend WithEvents ComboBox7 As ComboBox
|
||||
Friend WithEvents Label9 As Label
|
||||
Friend WithEvents Button1 As Button
|
||||
Friend WithEvents btn_save_connection As Button
|
||||
End Class
|
||||
120
Visual Studio Code/Timer Library/forms/main/frm_settings.resx
Normal file
@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
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">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<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" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</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>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
95
Visual Studio Code/Timer Library/forms/main/frm_settings.vb
Normal file
@ -0,0 +1,95 @@
|
||||
Imports System.ComponentModel
|
||||
|
||||
Public Class frm_settings
|
||||
|
||||
Private Sub frm_settings_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
|
||||
|
||||
frm_main.EnableIfDatabase()
|
||||
frm_main.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frm_settings_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
Load_Settings()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_save_connection_Click(sender As Object, e As EventArgs) Handles btn_save_connection.Click
|
||||
|
||||
Save_Settings()
|
||||
Me.Close()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Load_Settings()
|
||||
|
||||
' Load Video Intro Settings
|
||||
chk_intro.Checked = My.Settings.video_intro_enable
|
||||
txt_path.Text = My.Settings.video_intro_path
|
||||
|
||||
' Load Database Settings
|
||||
chk_database_enable.Checked = My.Settings.database_enable
|
||||
txt_server.Text = My.Settings.server
|
||||
txt_port.Text = My.Settings.port
|
||||
txt_user.Text = My.Settings.userid
|
||||
txt_password.Text = My.Settings.password
|
||||
txt_database.Text = My.Settings.database
|
||||
|
||||
' Load Video Capture Settings
|
||||
chk_video_capture.Checked = My.Settings.video_capture_enable
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Save_Settings()
|
||||
|
||||
' Video Intro Settings
|
||||
My.Settings.video_intro_enable = chk_intro.Checked
|
||||
My.Settings.video_intro_path = txt_path.Text
|
||||
|
||||
' Database Settings
|
||||
My.Settings.database_enable = chk_database_enable.Checked
|
||||
My.Settings.userid = txt_user.Text
|
||||
My.Settings.password = txt_password.Text
|
||||
My.Settings.database = txt_database.Text
|
||||
My.Settings.port = txt_port.Text
|
||||
My.Settings.server = txt_server.Text
|
||||
|
||||
' Video Capture Settings
|
||||
My.Settings.video_capture_enable = chk_video_capture.Checked
|
||||
|
||||
' Command to Commit Save
|
||||
My.Settings.Save()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub LoadFilePath()
|
||||
|
||||
'Creating A New Dialog
|
||||
Dim OpenVideoFile As New OpenFileDialog
|
||||
|
||||
'Filtering The Types
|
||||
OpenVideoFile.Filter = "Video Files | *.mp4; *.avi; *.mkv;"
|
||||
|
||||
'Openning The File
|
||||
If OpenVideoFile.ShowDialog = System.Windows.Forms.DialogResult.OK Then
|
||||
|
||||
Try
|
||||
Dim FilePath As String = OpenVideoFile.FileName()
|
||||
txt_path.Text = FilePath
|
||||
My.Settings.video_intro_path = txt_path.Text
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_load_file_Click(sender As Object, e As EventArgs) Handles btn_load_file.Click
|
||||
|
||||
LoadFilePath()
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
37
Visual Studio Code/Timer Library/includes/classes/dataset.vb
Normal file
@ -0,0 +1,37 @@
|
||||
Public Class dataset
|
||||
|
||||
Private _id As Integer
|
||||
Private _name As String
|
||||
|
||||
Public Sub New(id As Integer, name As String)
|
||||
|
||||
_id = id
|
||||
_name = name
|
||||
|
||||
End Sub
|
||||
|
||||
Public Property ID As Integer
|
||||
|
||||
Set(value As Integer)
|
||||
_id = value
|
||||
End Set
|
||||
|
||||
Get
|
||||
Return _id
|
||||
End Get
|
||||
|
||||
End Property
|
||||
|
||||
Public Property NAME As String
|
||||
|
||||
Set(value As String)
|
||||
_name = value
|
||||
End Set
|
||||
|
||||
Get
|
||||
Return _name
|
||||
End Get
|
||||
|
||||
End Property
|
||||
|
||||
End Class
|
||||
197
Visual Studio Code/Timer Library/includes/classes/match_timer.vb
Normal file
@ -0,0 +1,197 @@
|
||||
Public Class match_timer
|
||||
|
||||
'--[MATCH SETTINGS]---------------
|
||||
Private _set_minutes As Integer
|
||||
Private _set_seconds As Integer
|
||||
|
||||
'--[MATCH SETTINGS]---------------
|
||||
Private _run_minutes As Integer
|
||||
Private _run_seconds As Integer
|
||||
|
||||
'--[MATCH SETTINGS]---------------
|
||||
Private _timeUp As Boolean
|
||||
Private _last10Sec As Boolean
|
||||
|
||||
'--[MATCH SETTINGS]---------------
|
||||
Private _stop As Boolean
|
||||
Private _start As Boolean
|
||||
Private _pause As Boolean
|
||||
Private _continue As Boolean
|
||||
|
||||
Public Sub New(minutes As Integer, seconds As Integer)
|
||||
|
||||
' In Case Negative Numbers Where Set
|
||||
If minutes < 0 Then
|
||||
MsgBox("Sorry You Cant Set Negative Numbers", vbOKOnly + vbCritical, "Wrong Setting")
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
' Timing Setup
|
||||
_set_minutes = minutes
|
||||
_set_seconds = seconds
|
||||
|
||||
' Copy To Running Timer
|
||||
_run_minutes = _set_minutes
|
||||
_run_seconds = _set_seconds
|
||||
|
||||
' Control Bits
|
||||
_stop = False
|
||||
_start = False
|
||||
_pause = True
|
||||
_continue = False
|
||||
|
||||
' Timer Flags
|
||||
_timeUp = False
|
||||
_last10Sec = False
|
||||
|
||||
End Sub
|
||||
|
||||
ReadOnly Property ReadMinutes As Integer
|
||||
Get
|
||||
Return _run_minutes
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ReadSeconds As Integer
|
||||
Get
|
||||
Return _run_seconds
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property ReadTime() As String
|
||||
Get
|
||||
Return Zero(_run_minutes) + ":" + Zero(_run_seconds)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property TimeUp() As Boolean
|
||||
Get
|
||||
Return _timeUp
|
||||
End Get
|
||||
End Property
|
||||
|
||||
ReadOnly Property Last10Sec() As Boolean
|
||||
Get
|
||||
Return _last10Sec
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public Sub Run()
|
||||
|
||||
If _pause = False And _start = True Or _stop = False Then
|
||||
|
||||
If _run_minutes > 0 And _run_seconds = 0 Then
|
||||
|
||||
_run_minutes -= 1
|
||||
_run_seconds = 59
|
||||
|
||||
ElseIf _run_minutes >= 0 And (_run_seconds > 0 And _run_seconds <= 59) Then
|
||||
|
||||
_run_seconds -= 1
|
||||
DetectLast10Sec(_run_seconds)
|
||||
|
||||
ElseIf _run_minutes = 0 And _run_seconds = 0 Then
|
||||
|
||||
_timeUp = True
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub DetectLast10Sec(seconds As Integer)
|
||||
|
||||
If seconds >= 0 And seconds < 10 Then
|
||||
_last10Sec = True
|
||||
Else
|
||||
_last10Sec = False
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub StartTime()
|
||||
|
||||
If _stop = False Then
|
||||
_start = True
|
||||
_pause = False
|
||||
Else
|
||||
MsgBox("Cant Start Timer When Its Already Finished Count Down", vbOKOnly + vbInformation, "Timer Message")
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub StopTime()
|
||||
If _start = True Then
|
||||
_pause = True
|
||||
_stop = True
|
||||
Else
|
||||
MsgBox("Cant Stop Timer When Its Not Even Started", vbOKOnly + vbInformation, "Timer Message")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub PauseTime()
|
||||
|
||||
If _start = True And _stop = False Then
|
||||
_pause = True
|
||||
Else
|
||||
MsgBox("Cant Pause Timer When (Not Started) Or Ended", vbOKOnly + vbInformation, "Timer Message")
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub ResumeTime()
|
||||
|
||||
If _start = True And _stop = False Then
|
||||
_pause = False
|
||||
Else
|
||||
MsgBox("Cant Resume Timer When (Not Started) Or Ended", vbOKOnly + vbInformation, "Timer Message")
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub ResetTime()
|
||||
|
||||
If _start = True And _stop = False Then
|
||||
|
||||
' Display A Message For The User To Choose
|
||||
Dim iAsk As DialogResult = MessageBox.Show("Would You Like To Stop And Reset The Timer ?", "Timer Message", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
|
||||
' Checking The Dialog Result
|
||||
If iAsk = DialogResult.Yes Then
|
||||
|
||||
' Its Safe To Do A Reset
|
||||
Reset_Time()
|
||||
|
||||
End If
|
||||
|
||||
ElseIf _start = True And _stop = True Then
|
||||
|
||||
' Its Safe To Do A Reset
|
||||
Reset_Time()
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Reset_Time()
|
||||
|
||||
_start = False
|
||||
_pause = True
|
||||
_stop = False
|
||||
_run_minutes = _set_minutes
|
||||
_run_seconds = _set_seconds
|
||||
|
||||
End Sub
|
||||
|
||||
Private Function Zero(Number As Integer) As String
|
||||
|
||||
If Number >= 0 And Number < 10 Then
|
||||
Return "0" + Number.ToString
|
||||
Else
|
||||
Return Number.ToString
|
||||
End If
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
32
Visual Studio Code/Timer Library/includes/classes/mysql.vb
Normal file
@ -0,0 +1,32 @@
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Module MySQL
|
||||
|
||||
Public Function CON_STRING() As String
|
||||
|
||||
With My.Settings
|
||||
|
||||
Return "Server=" & .server & "; Port=" & .port & "; Database=" & .database & "; Uid=" & .userid & "; Pwd = " & .password & ";"
|
||||
|
||||
End With
|
||||
|
||||
End Function
|
||||
|
||||
Public Function CON_TEST(Server As String, Port As Integer, Database As String, UserName As String, Password As String) As Boolean
|
||||
|
||||
Dim CON_TEST_STRING As String = "server=" & Server & "; Port=" & Port & "; user id=" & UserName & "; password=" & Password & "; database=" & Database & ";"
|
||||
Dim CON As New MySqlConnection(CON_TEST_STRING)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
CON.Close()
|
||||
MessageBox.Show("Connection Sucessfull")
|
||||
Return True
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Return False
|
||||
End Try
|
||||
|
||||
End Function
|
||||
|
||||
End Module
|
||||
429
Visual Studio Code/Timer Library/includes/modules/functions.vb
Normal file
@ -0,0 +1,429 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Module functions
|
||||
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
' Person
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Function GetPersonList() As List(Of dataset)
|
||||
|
||||
Dim QRY As String = ("
|
||||
select
|
||||
distinct
|
||||
person.id, concat(person.fname, if(isnull(person.mname), '', concat(' ', person.mname)), ' ', person.lname) as name
|
||||
from
|
||||
person
|
||||
left join
|
||||
event_matches on (person.id = coalesce(event_matches.blue_fighter, 0) or person.id = coalesce(event_matches.red_fighter, 0))
|
||||
order by
|
||||
fname,
|
||||
mname,
|
||||
lname
|
||||
asc
|
||||
")
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("id"), RDR("name")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
Return LST
|
||||
|
||||
End Function
|
||||
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
' File Functions
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Function GetFilePath() As String
|
||||
|
||||
'Creating A New Dialog
|
||||
Dim OpenVideoFile As New OpenFileDialog
|
||||
|
||||
'Filtering The Types
|
||||
OpenVideoFile.Filter = "Video Files | *.mp4; *.avi; *.mkv;"
|
||||
|
||||
'Openning The File
|
||||
If OpenVideoFile.ShowDialog = System.Windows.Forms.DialogResult.OK Then
|
||||
|
||||
Try
|
||||
Dim FilePath As String = OpenVideoFile.FileName()
|
||||
Return FilePath
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message)
|
||||
Return Nothing
|
||||
End Try
|
||||
|
||||
Else
|
||||
|
||||
Return Nothing
|
||||
|
||||
End If
|
||||
|
||||
End Function
|
||||
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
' Picture Function
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Function ResizePicture(YourPictureBox As PictureBox, Width As Integer, Height As Integer) As Byte()
|
||||
|
||||
'Creating A New Dialog
|
||||
Dim OpenPictureFile As New OpenFileDialog
|
||||
|
||||
'Filtering The Types
|
||||
OpenPictureFile.Filter = "Image Files | *.jpg; *.jpeg; *.bmp; *.png; *.gif;"
|
||||
|
||||
'Openning The File
|
||||
If OpenPictureFile.ShowDialog = System.Windows.Forms.DialogResult.OK Then
|
||||
|
||||
Try
|
||||
' Getting File Path
|
||||
Dim FilePath As String = OpenPictureFile.FileName()
|
||||
Dim FileName As String = System.IO.Path.GetFileName(OpenPictureFile.FileName)
|
||||
|
||||
' Picture File
|
||||
Dim Picture As New MemoryStream
|
||||
|
||||
' Define New Image Size
|
||||
Dim LogoSize As New Size(Width, Height)
|
||||
|
||||
' Resizing The Image
|
||||
Dim ResizedImage = New Bitmap(Image.FromFile(FilePath), LogoSize)
|
||||
|
||||
' Display The Image
|
||||
YourPictureBox.Image = ResizedImage
|
||||
|
||||
' Saving The Image As PNG Format
|
||||
YourPictureBox.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
|
||||
' Read The Image As Bytes
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
|
||||
' Closing The Picture
|
||||
Picture.Close()
|
||||
|
||||
' Returns Image Data In Bytes Format
|
||||
Return arrImage
|
||||
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.Message)
|
||||
Return Nothing
|
||||
End Try
|
||||
|
||||
Else
|
||||
|
||||
Return Nothing
|
||||
|
||||
End If
|
||||
|
||||
End Function
|
||||
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
' Country Functions
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub GetCountryList(ComboBox As ComboBox)
|
||||
|
||||
Dim QRY As String = "select * from countries order by name asc"
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("id"), RDR("name")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
ComboBox.DataSource = LST
|
||||
ComboBox.ValueMember = "ID"
|
||||
ComboBox.DisplayMember = "name"
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub GetCountryFlag(FlagPictureBox As PictureBox, CountryID As Integer)
|
||||
|
||||
Dim QRY As String
|
||||
|
||||
Try
|
||||
QRY = "select flag from countries where id=" & CountryID
|
||||
Catch ex As Exception
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
Try
|
||||
Dim data As Byte() = DirectCast(RDR("flag"), Byte())
|
||||
Dim flag As New System.IO.MemoryStream(data)
|
||||
FlagPictureBox.Image = Image.FromStream(flag)
|
||||
Catch ex As Exception
|
||||
FlagPictureBox.Image = Nothing
|
||||
Exit Sub
|
||||
End Try
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub UpdateCountryFlag(FlagPictureBox As PictureBox, CountryID As Integer)
|
||||
|
||||
' Query To Update
|
||||
Dim QRY As String = "update countries set flag = @flag where id=" & CountryID
|
||||
|
||||
' Connection
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
' Preparing The Image
|
||||
Dim Picture As New MemoryStream
|
||||
FlagPictureBox.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
Picture.Close()
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.Parameters.AddWithValue("@flag", arrImage)
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
' Clubs Functions
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Sub GetClubsList(ComboBox As ComboBox)
|
||||
|
||||
Dim QRY As String = "select id, title from clubs order by title asc"
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("id"), RDR("title")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
ComboBox.DataSource = LST
|
||||
ComboBox.ValueMember = "ID"
|
||||
ComboBox.DisplayMember = "name"
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub GetClubLogo(LogoPictureBox As PictureBox, ClubID As Integer)
|
||||
|
||||
Dim QRY As String
|
||||
|
||||
Try
|
||||
QRY = "select logo from clubs where id=" & ClubID
|
||||
Catch ex As Exception
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
Try
|
||||
Dim data As Byte() = DirectCast(RDR("logo"), Byte())
|
||||
Dim flag As New System.IO.MemoryStream(data)
|
||||
LogoPictureBox.Image = Image.FromStream(flag)
|
||||
Catch ex As Exception
|
||||
LogoPictureBox.Image = Nothing
|
||||
Exit Sub
|
||||
End Try
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub UpdateClubLogo(LogoPictureBox As PictureBox, ClubID As Integer)
|
||||
|
||||
' Query To Update
|
||||
Dim QRY As String = "update clubs set logo = @logo where id=" & ClubID
|
||||
|
||||
' Connection
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
|
||||
' Preparing The Image
|
||||
Dim Picture As New MemoryStream
|
||||
LogoPictureBox.Image.Save(Picture, System.Drawing.Imaging.ImageFormat.Png)
|
||||
Dim arrImage() As Byte = Picture.GetBuffer
|
||||
Picture.Close()
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
COM.Parameters.AddWithValue("@logo", arrImage)
|
||||
COM.ExecuteNonQuery()
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub EventList(ListBox As ListBox)
|
||||
|
||||
Try
|
||||
ListBox.Items.Clear()
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Dim QRY As String = "select * from event order by event_start asc"
|
||||
|
||||
Dim CON As New MySqlConnection(CON_STRING)
|
||||
Dim COM As New MySqlCommand(QRY, CON)
|
||||
Dim RDR As MySqlDataReader
|
||||
Dim LST As New List(Of dataset)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
RDR = COM.ExecuteReader
|
||||
If RDR.HasRows = True Then
|
||||
While RDR.Read
|
||||
LST.Add(New dataset(RDR("id"), RDR("title")))
|
||||
End While
|
||||
End If
|
||||
CON.Close()
|
||||
Catch ex As MySqlException
|
||||
MessageBox.Show(ex.Message)
|
||||
Finally
|
||||
CON.Dispose()
|
||||
End Try
|
||||
|
||||
ListBox.DataSource = LST
|
||||
ListBox.ValueMember = "ID"
|
||||
ListBox.DisplayMember = "name"
|
||||
|
||||
End Sub
|
||||
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
' Clubs Functions
|
||||
'-------------------------------------------------------------------------------------------------------------
|
||||
|
||||
Public Function IsFormOpen(ByVal frm As Form) As Boolean
|
||||
If Application.OpenForms.OfType(Of Form).Contains(frm) Then
|
||||
Return True
|
||||
Else
|
||||
Return False
|
||||
End If
|
||||
End Function
|
||||
|
||||
Public Sub ClearComboBox(ComboBox As ComboBox)
|
||||
|
||||
Try
|
||||
ComboBox.DataSource = Nothing
|
||||
ComboBox.Items.Clear()
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub ClearListBox(ListBox As ListBox)
|
||||
|
||||
Try
|
||||
ListBox.DataSource = Nothing
|
||||
ListBox.Items.Clear()
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub SubPopulateComboBox(Data As List(Of dataset), ComboBox As ComboBox)
|
||||
|
||||
ClearComboBox(ComboBox)
|
||||
ComboBox.DataSource = Data
|
||||
ComboBox.ValueMember = "ID"
|
||||
ComboBox.DisplayMember = "NAME"
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub SubPopulateListBox(Data As List(Of dataset), ListBox As ListBox)
|
||||
|
||||
ClearListBox(ListBox)
|
||||
ListBox.DataSource = Data
|
||||
ListBox.ValueMember = "ID"
|
||||
ListBox.DisplayMember = "NAME"
|
||||
|
||||
End Sub
|
||||
|
||||
End Module
|
||||
49
Visual Studio Code/Timer Library/includes/modules/mysql.vb
Normal file
@ -0,0 +1,49 @@
|
||||
Imports System.IO
|
||||
Imports MySql.Data.MySqlClient
|
||||
|
||||
Module MySQL
|
||||
|
||||
Public TAKEONE_EVENT As Integer ' This Carries The Select Event Number
|
||||
|
||||
Public Function CON_STRING() As String
|
||||
|
||||
With My.Settings
|
||||
|
||||
Return "server=" & .server & "; Port=" & .port & "; user id=" & .userid & "; password=" & .password & "; database=" & .database & ";"
|
||||
|
||||
End With
|
||||
|
||||
End Function
|
||||
|
||||
Public Function CON_TEST(Server As String, Port As Integer, Database As String, UserName As String, Password As String) As Boolean
|
||||
|
||||
Dim CON_TEST_STRING As String = "server=" & Server & "; Port=" & Port & "; user id=" & UserName & "; password=" & Password & "; database=" & Database & ";"
|
||||
Dim CON As New MySqlConnection(CON_TEST_STRING)
|
||||
|
||||
Try
|
||||
CON.Open()
|
||||
CON.Close()
|
||||
'MessageBox.Show("Connection Sucessfull")
|
||||
Return True
|
||||
Catch ex As MySqlException
|
||||
'MessageBox.Show(ex.Message)
|
||||
Return False
|
||||
End Try
|
||||
|
||||
End Function
|
||||
|
||||
Public Function ReadMySQLDate(MySQLDate As String) As Date
|
||||
|
||||
Dim dDate As Date = Date.ParseExact(MySQLDate, "yyyy-MM-dd", Globalization.CultureInfo.InvariantCulture)
|
||||
Return dDate
|
||||
|
||||
End Function
|
||||
|
||||
Public Function ReadMySQLDateTime(MySQLDateTime As String) As DateTime
|
||||
|
||||
Dim dDate As DateTime = DateTime.ParseExact(MySQLDateTime, "yyyy-MM-dd hh:mm:ss", Globalization.CultureInfo.InvariantCulture)
|
||||
Return dDate
|
||||
|
||||
End Function
|
||||
|
||||
End Module
|
||||
@ -0,0 +1,5 @@
|
||||
Module EventSelection
|
||||
|
||||
Public SelectedEvent As platformevent
|
||||
|
||||
End Module
|
||||