Translate UI into English and french; Extend resources and outsource hardcoded String form codebase into resources.

This commit is contained in:
OlgunR
2026-02-16 15:05:54 +01:00
parent c0b2ad0d9b
commit 676598450d
58 changed files with 12409 additions and 5445 deletions

View File

@@ -115,7 +115,7 @@ Partial Public Class frmEnvelopeEditor
Try
File.OpenWrite(oTempFilename)
Catch ex As Exception
MsgBox("File might already be open?", MsgBoxStyle.Exclamation)
MsgBox(Resources.Envelope.Error_while_opening_file, MsgBoxStyle.Exclamation)
Me.Cursor = Cursors.Default
Exit For
End Try
@@ -195,9 +195,9 @@ Partial Public Class frmEnvelopeEditor
Private Sub btnSave_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnSave.ItemClick
Try
If SaveEnvelopeWithOutValidation() = True Then
bsitm_info.Caption = "Data saved successfully " + Now.ToString
bsitm_info.Caption = Resources.Model.Saved + Now.ToString
Else
bsitm_info.Caption = "Exceprion - Error saving Data. Check LOG"
bsitm_info.Caption = Resources.Envelope.Error_when_saving_the_envelope + Now.ToString
End If
Catch ex As Exception
Logger.Error(ex)
@@ -258,7 +258,7 @@ Partial Public Class frmEnvelopeEditor
End Using
End If
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in downloadFile")
MsgBox(ex.Message, MsgBoxStyle.Exclamation, Resources.Envelope.Error_downloading_file)
End Try
End Sub
Private Function SaveEnvelopeWithValidation() As Boolean
@@ -647,7 +647,7 @@ Partial Public Class frmEnvelopeEditor
For Each oFile As String In openform.fileResults
arPDF(oIDX) = New GdPicturePDF()
If arPDF(oIDX).LoadFromFile(oFile) <> GdPictureStatus.OK Then
MsgBox($"PDF Status of file {oFile} is not OK. Please check PDF-conformity!", MsgBoxStyle.Critical)
MsgBox(String.Format(Resources.Envelope.Error_Pdf_Status, oFile), MsgBoxStyle.Critical)
oErr = True
Exit For
End If
@@ -672,11 +672,11 @@ Partial Public Class frmEnvelopeEditor
dstPDF.CloseDocument()
oSuccess = True
Else
MsgBox("Unexpected format-error within the final document!", MsgBoxStyle.Critical)
MsgBox(Resources.Envelope.Error_concat_documents, MsgBoxStyle.Critical)
oSuccess = False
End If
Else
MessageBox.Show("The MergeDocuments() method has failed with the status: " + oStatus.ToString(), "Example: MergeDocuments")
MessageBox.Show(Resources.Envelope.Error_concat_documents)
oSuccess = False
End If
dstPDF.Dispose()