first visual basic code upload
This commit is contained in:
ghassan committed
1 parent
93697318e4
commit
5e53ab7d73
101 files changed
+21213
No files matched your search
@@ -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
|
||||
@@ -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
@@ -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
@@ -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
|
||||
@@ -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
|
||||
@@ -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
@@ -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
@@ -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
|
||||
File diff suppressed because it is too large.
Load diff
@@ -0,0 +1,3 @@
|
||||
Public Class frm_match_fighters
|
||||
|
||||
End Class
|
||||
@@ -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
|
||||
@@ -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,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
|
||||
@@ -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
|
||||
@@ -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
|
||||
@@ -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>
|
||||
@@ -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
|
||||
Reference in new issue
Block a user