TBeCbMailAccountConfigFrame

Oberflächen-Konfigurationsbereich für E-Mail-Konten.

Eigenschaften
CbAccountDesc_Visibility:N	Sichtbarkeit der Konto-Bezeichnung
CbMailAddress_Visibility:N	Sichtbarkeit der E-Mail-Adresse
CbUserDisplayName_Visibility:N	Sichtbarkeit des E-Mail-Absendernamens
CbReceiveServerAccountID_Visibility:N	Sichtbarkeit des Posteingangsservers
CbSendServerAccountId_Visibility:N	Sichtbarkeit des Postausgangsservers
CbReceiveUserName_Visibility:N	Sichtbarkeit des Benutzernamens
CbReceivePassword_Visibility:N	Sichtbarkeit des Passwort-Feldes
CbMailboxPath_Visibility:N	Sichtbarkeit des Mailbox-Pfads
CbDeleteFromServer_Visibility:N	Sichtbarkeit der Checkbox "E-Mails nach Empfang vom Server löschen"
CbReceiveSettings_Visibility:N	Sichtbarkeit der Empfangs-Einstellungen
CbSettings_Visibility:N	Sichtbarkeit der Einstellungen (Allgemein)
CbSendSettings_Visibility:N	Sichtbarkeit der Sende-Einstellungen
CbSendUserName_Visibility:N	Sichtbarkeit des Benutzernamens in den Sende-Einstellungen
CbSendPassword_Visibility:N	Sichtbarkeit des Passwort-Feldes in den Sende-Einstellungen
CbSendViaReceiveSettings_Visibility:N	Sichtbarkeit von "Empfangseinstellungen verwenden"

Funktionen und Methoden

(siehe TBeCbCustomConfigFrame)

Beispiel

CODE

//##############################################################################
//##############################################################################
// Beschreibung: Codeblock-Beispiel für die Klasse TBeCbMailAccountConfigFrame
//##############################################################################
//##############################################################################

| m_oForm, m_oFrame, m_nSettingsType |

//##############################################################################
//##############################################################################
// Konstanten
//##############################################################################
//##############################################################################

m_nSettingsType := 5300,

//##############################################################################
//##############################################################################
// Funktionen
//##############################################################################
//##############################################################################

//******************************************************************************
// Setzen der Standardeinstellungen
// @Result: null
//******************************************************************************
function SetDefaults()
   // Sichtbarkeiten der Oberflächen Controls
   m_oFrame.CbAccountDesc_Visibility            := 1,
   m_oFrame.CbMailAddress_Visibility            := 1,
   m_oFrame.CbUserDisplayName_Visibility        := 1,
   m_oFrame.CbReceiveServerAccountID_Visibility := 1,
   m_oFrame.CbSendServerAccountId_Visibility    := 1,
   m_oFrame.CbReceiveUserName_Visibility        := 1,
   m_oFrame.CbMailboxPath_Visibility            := 1,
   m_oFrame.CbDeleteFromServer_Visibility       := 1,
   m_oFrame.CbReceiveSettings_Visibility        := 1,
   m_oFrame.CbSettings_Visibility               := 1,
end,

//##############################################################################
//##############################################################################
// Oberflächen-Funktionen
//##############################################################################
//##############################################################################

//******************************************************************************
// LoadGUI lädt sämtliche Komponenten die für die Oberfläche benötigt werden
// @Result: null
//******************************************************************************
function LoadGUI()
| oQuery |
   startseq
      m_oForm         := CreateObject('TFormEx'),
      m_oFrame        := CreateObject('TBeCbMailAccountConfigFrame',,
                                      m_oForm, m_oForm),
      m_oForm.Height  := 600,
      m_oForm.Width   := 500,
      m_oFrame.Align  := alClient,

      // Gültiges E-Mail-Konto ermitteln


      if not (Eof(oQuery) and Bof(oQuery)) then
         m_oFrame.CbKey1 := oQuery:KEY1,
      endif,

      m_oFrame.CbInitFrame(),
   onerror
      DestroyObject(m_oForm),
      SetError('Fehler beim Laden der Oberfläche' + crlf + GetErrorText()),
   stopseq
end,

//##############################################################################
//##############################################################################
// Hauptprogramm
//##############################################################################
//##############################################################################

startseq
   LoadGUI(),
   SetDefaults(),
   ShowModal(m_oForm),
onerror
   MessageDlg('Fehler im Programm ' + ProgName() + GetErrorText(), mtError),
stopseq,

TBeCbMailAccountConfigFrame

Eigenschaften

Funktionen und Methoden

Beispiel

Weitere Verknüpfungen