harbour CLASS vs. Xbase++ CLASS
Posted: Sun Oct 30, 2022 6:42 am
hi,
under harbour i have to pass all Parameter which are need "before" Create Control
under Xbase++ i have o:New() to pass "some" Parameter AND MUST call o:Create()
but between o:New() and o:Create() i got access to Member of CLASS to "fill" Property
this make OOP Code better to "read" instead of lot Parameter delemited with ","
Question :
is this Style possible under Fivewin
can i still use #xCommand for this Type of CLASS
p.s.
HMG does not have so much Parameter for #xCommand so i have not try to use OOP Style under HMG
under harbour i have to pass all Parameter which are need "before" Create Control
under Xbase++ i have o:New() to pass "some" Parameter AND MUST call o:Create()
but between o:New() and o:Create() i got access to Member of CLASS to "fill" Property
Code: Select all | Expand
oDlg := XbpDialog():New(oParent,oOwner,aPos,aSize)
// before Create()
oDlg:Caption := "Demo"
...
oDlg:Create()
// after Create()
oDlg1:setDisplayFocus := bSetFocus
oDlg1:killDisplayFocus := bKillFocus
Question :
is this Style possible under Fivewin

can i still use #xCommand for this Type of CLASS

p.s.
HMG does not have so much Parameter for #xCommand so i have not try to use OOP Style under HMG