Initial

smtp/SRVRDLG.CPP

@@ -0,0 +1,37 @@
+#include <smtp/srvrdlg.hpp>
+
+WORD ServerDialog::performDialog(String &serverName)
+{
+	::DialogBoxParam(processInstance(),(LPSTR)"ServerDialog",mhParent,(DLGPROC)DWindow::DlgProc,(LONG)((DWindow*)this));
+  return FALSE;
+}
+
+CallbackData::ReturnType ServerDialog::initDialogHandler(CallbackData &someCallbackData)
+{
+	if(!mMailReg.server().isNull())setText(ServerName,mMailReg.server());
+  return (CallbackData::ReturnType)FALSE;
+}
+
+void ServerDialog::getServerName(void)
+{
+  String serverName;
+
+	getText(ServerName,serverName);
+	if(serverName.isNull())return;
+	mMailReg.server(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;
+}