12. Juni 2007 10:39
12. Juni 2007 11:46
12. Juni 2007 11:53
Form - OnAfterGetCurrRecord()
CurrForm.MySubform.FORM.SetEditable(NOT Blocked);
SetEditable(_Editable : Boolean)
CurrForm.EDITABLE := _Editable;
12. Juni 2007 12:15
CheckSubforms()
IF ("Material Status" = "Material Status"::Released) THEN
BEGIN
CurrForm.sfColor.FORM.SetEditable(FALSE);
CurrForm.sfSize.FORM.SetEditable(FALSE);
CurrForm.sfColorSizeComb.FORM.SetEditable(FALSE);
END
ELSE
BEGIN
CurrForm.sfColorSizeComb.FORM.SetEditable(TRUE);
CurrForm.sfColor.FORM.SetEditable("Color Lead");
CurrForm.sfSize.FORM.SetEditable("Size Lead");
END;
SetEditable(bValue : Boolean);
CurrForm.EDITABLE(bValue);
CurrForm.UPDATE;
wakestar hat geschrieben:hoi neoroot
funktioniert bei mir.
12. Juni 2007 12:27
neoroot hat geschrieben:Das funktioniert bei mir auch, aber nicht wenn ich im Mainform über die CheckBox das Sub wieder aktivieren möcht.
Blocked - OnAfterValidate()
CurrForm.MySubform.FORM.SetEditable(NOT Blocked);
12. Juni 2007 13:17
CheckSubforms()
IF ("Material Status" = "Material Status"::Released) THEN
BEGIN
CurrForm.sfColor.EDITABLE(FALSE);
CurrForm.sfSize.EDITABLE(FALSE);
CurrForm.sfColorSizeComb.EDITABLE(FALSE);
END
ELSE
BEGIN
CurrForm.sfColorSizeComb.EDITABLE(TRUE);
CurrForm.sfColor.EDITABLE("Color Lead");
CurrForm.sfSize.EDITABLE("Size Lead");
END;
12. Juni 2007 13:26
SetEditable(bValue : Boolean)
bEditable := bValue;
CurrForm."Color Code".EDITABLE(bValue);
CurrForm."Special Color".EDITABLE(bValue);
CurrForm."Tariff No.".EDITABLE(bValue);
12. Juni 2007 13:45
12. Juni 2007 13:53
12. Juni 2007 14:01
neoroot hat geschrieben:Jo, sehr merkwürdig. Mal wieder was aus dem unferforschten Mysterium des Navisions :)
17. Juni 2007 12:30