Initial

pop/old/SRVRDLG.CPP

@@ -0,0 +1,38 @@
+#include <pop/srvrdlg.hpp>
+#include <common/regkey.hpp>
+
+WORD ServerDialog::performDialog(void)
+{
+	::DialogBoxParam(processInstance(),(LPSTR)"ServerDialog",mhParent,(DLGPROC)DWindow::DlgProc,(LONG)((DWindow*)this));
+  return FALSE;
+}
+
+CallbackData::ReturnType ServerDialog::initDialogHandler(CallbackData &someCallbackData)
+{
+	if(!mServerReg.serverName().isNull())setText(ServerName,mServerReg.serverName());
+  return (CallbackData::ReturnType)FALSE;
+}
+
+void ServerDialog::getServerName(void)
+{
+  String serverName;
+
+	getText(ServerName,serverName);
+	if(serverName.isNull())return;
+	mServerReg.serverName(serverName);
+}
+
+CallbackData::ReturnType ServerDialog::commandHandler(CallbackData &someCallbackData)
+{
+	switch(someCallbackData.wmCommandID())
+	{
+		case IDOK :
+		  getServerName();
+		  endDialog(TRUE);
+      break;
+		case IDCANCEL :
+		  endDialog(TRUE);
+      break;
+	}
+  return (CallbackData::ReturnType)FALSE;
+}