From 1755a435f6d308bfbb3dd1f40f5825a1339b63cf Mon Sep 17 00:00:00 2001
From: FloppyDiskDrive <ibmpcdos5@gmail.com>
Date: Sat, 26 Aug 2017 19:26:14 -0500
Subject: Cleaned up the FTP Client

Made it a bit better in terms of UI and code (gave the buttons proper
names), and added a tiny bit more functionality.
---
 Histacom2/OS/Win95/Win95Apps/WinClassicFTPClient.cs | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

(limited to 'Histacom2/OS/Win95/Win95Apps/WinClassicFTPClient.cs')

diff --git a/Histacom2/OS/Win95/Win95Apps/WinClassicFTPClient.cs b/Histacom2/OS/Win95/Win95Apps/WinClassicFTPClient.cs
index 674bb23..1488808 100644
--- a/Histacom2/OS/Win95/Win95Apps/WinClassicFTPClient.cs
+++ b/Histacom2/OS/Win95/Win95Apps/WinClassicFTPClient.cs
@@ -116,5 +116,21 @@ namespace Histacom2.OS.Win95.Win95Apps
                 }
             }
         }
+
+        private void DoClassicButtons()
+        {
+            btnLogin.Paint += (sender, args) => Engine.Paintbrush.PaintClassicBorders(sender, args, 2);
+            btnCancel.Paint += (sender, args) => Engine.Paintbrush.PaintClassicBorders(sender, args, 2);
+        }
+
+        private void btnCancel_Click(object sender, EventArgs e)
+        {
+            ParentForm.Close();
+        }
+
+        private void WinClassicFTPClient_Load(object sender, EventArgs e)
+        {
+            DoClassicButtons();
+        }
     }
 }
-- 
cgit v1.2.3