tyler.durden
/
P3D-Legacy
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Contentpack info out of bounds fix

This commit is contained in:
Jasper "JappaWakka" Speelman 2022-05-06 22:45:13 +02:00
parent f5e5343b07
commit f18dc03c4c
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
P3D/Screens/NewOptionScreen.vb
View File

@ -402,10 +402,10 @@
Dim s() As String = ContentPackManager.GetContentPackInfo(packName) Dim s() As String = ContentPackManager.GetContentPackInfo(packName)
If s.Length > 0 Then If s.Length > 0 Then
PInfoVersion = s(0) PInfoVersion = s(0).CropStringToWidth(FontManager.InGameFont, 540 - 16 - CInt(FontManager.InGameFont.MeasureString(Localization.GetString("option_screen_contentpacks_version")).X))
End If End If
If s.Length > 1 Then If s.Length > 1 Then
PInfoAuthor = s(1) PInfoAuthor = s(1).CropStringToWidth(FontManager.InGameFont, 540 - 16 - CInt(FontManager.InGameFont.MeasureString(Localization.GetString("option_screen_contentpacks_by")).X))
End If End If
If s.Length > 2 Then If s.Length > 2 Then
PInfoDescription = s(2).CropStringToWidth(FontManager.InGameFont, 540) PInfoDescription = s(2).CropStringToWidth(FontManager.InGameFont, 540)
@ -418,7 +418,6 @@
Private PInfoVersion As String = "" Private PInfoVersion As String = ""
Private PInfoAuthor As String = "" Private PInfoAuthor As String = ""
Private PInfoDescription As String = "" Private PInfoDescription As String = ""
Private PInfoContent As String = ""
Private Sub DrawPackInformationMenu() Private Sub DrawPackInformationMenu()
If Not PInfoSplash Is Nothing Then If Not PInfoSplash Is Nothing Then