Add project files.

This commit is contained in:
2025-07-09 12:11:18 +02:00
parent 7dc3d49c71
commit 925270e409
27 changed files with 4197 additions and 0 deletions

View File

@@ -0,0 +1,35 @@
Public Class Form3
Private Sub Form3_Loaded(ByVal sender As Object, ByVal e As EventArgs) Handles MyClass.Loaded
TextBox1.Text = MainWindow.sresult
' MaterialLabel2.Text = "Hibák száma: " & MainWindow.HibakSzama
If MainWindow.HibakSzama = 0 Then
Label1.Foreground = Brushes.Green
Else
Label1.Foreground = Brushes.Red
If MainWindow.HibakSzama = 1 And MainWindow.ddas = False Then
Label1.Foreground = Brushes.Orange
End If
End If
HandleWindow.FocusWindowM("Elkészül", "t")
Me.Topmost = False
End Sub
Private Sub MaterialRaisedButton1_Click(sender As Object, e As EventArgs) Handles MaterialRaisedButton1.Click
Me.Close()
End Sub
Private Sub MaterialRaisedButton2_Click(sender As Object, e As EventArgs) Handles MaterialRaisedButton2.Click
Process.Start(MainWindow.workDir)
End Sub
Private Sub TextBox1_TextChanged(sender As Object, e As TextChangedEventArgs) Handles TextBox1.TextChanged
End Sub
Private Sub MaterialRaisedButton1_Click_1(sender As Object, e As RoutedEventArgs) Handles MaterialRaisedButton1.Click
End Sub
End Class