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