28. Mai 2008 10:41
28. Mai 2008 10:54
28. Mai 2008 11:14
28. Mai 2008 12:01
28. Mai 2008 12:21
fnStandardsicht()
      CurrForm.txtDatumString.VISIBLE(FALSE);
      CurrForm.txtPersNr.VISIBLE(TRUE);
      // was immer man anzeigen / verstecken möchte
            geoeffnet := TRUE;fnSichtmodus(parModus : Code[10])
// ************************************************************************
// ***** Funktion zum Modifizieren der Anzeige der Spalten in der Textbox
// ***** Je nach Parameter werden die für den Verwendungszweck unnötigen
// ***** Zeilen ausgeblendet
// ************************************************************************
IF NOT angepassteSicht THEN BEGIN
  CASE parModus OF
    'MAMONATZA' :
      BEGIN
        CurrForm.txtDatumString.VISIBLE(TRUE);
        CurrForm.txtPersNr.VISIBLE(FALSE);
        (.....)
      END;
    ELSE BEGIN //Standardeinstellung
      fnStandardsicht;
    END;
  END;
  angepassteSicht := TRUE;
END;28. Mai 2008 14:13
28. Mai 2008 14:16