FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Question to classes
Posts: 6984
Joined: Fri Oct 07, 2005 07:07 PM
Question to classes
Posted: Tue Dec 04, 2007 09:14 PM

Question to classes: is it possible/allowed in OOP to use a class own method within the class?
Thanks in advance
Otto

Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM
Re: Question to classes
Posted: Tue Dec 04, 2007 10:43 PM
Of course:

::MethodName( params )


EMG
Posts: 4840
Joined: Fri Nov 18, 2005 04:52 PM
Question to classes
Posted: Wed Dec 05, 2007 02:29 AM

Otto,

That is one of the great features.

You may want to read, or reread, the OOP articles on my website.

James

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10
Posts: 6984
Joined: Fri Oct 07, 2005 07:07 PM
Question to classes
Posted: Wed Dec 05, 2007 02:48 AM

Thank you Enrico and James,

I made an ‘invoice class’ and an ‘invoice position (record)’ class.
Now to calculate the line total I made a function inside the InvoicePositionclass.
Amount per price – SetText to a oSay.
Here I don’t know what to use a function or a method

METHOD New
oGet nAmount valid calculate() or ::calculate()
oGet nPrice valid calculate() or ::calculate()
oSay nTotal
return Self

func calculate()
return

METHODE calculate
Return nil

What would be the right way to define the variables (nAmount,nPrice): static, local and pass them, DATA?

Hope you will help me on that.
Thanks in advance
Otto

Posts: 4840
Joined: Fri Nov 18, 2005 04:52 PM
Question to classes
Posted: Wed Dec 05, 2007 03:35 AM

Otto,

>I made an ‘invoice class’ and an ‘invoice position (record)’ class.
>Now to calculate the line total I made a function inside the >InvoicePositionclass.

Ok, you picked a very complicated class to start with. An invoice is an object that contains other objects. The invoice object contains a customer object, and multiple line item objects (one for each item). So you need at least three classes to create an Invoice object.

>Amount per price – SetText to a oSay.
>Here I don’t know what to use a function or a method

In pure oop you never use functions. However, in our hybrid OOP system you try not to create functions, but you can use all the FW and Harbour functions. So if you need something new, then create a method.

>METHOD New
>oGet nAmount valid calculate() or ::calculate()
>oGet nPrice valid calculate() or ::calculate()
>oSay nTotal
>return Self

I'm not sure what you were trying to do with the above. The New() method should only initialize the object.

Perhaps you should start with a Customer class instead. It would much simpler than an Invoice class. There is discussion of a customer class in my OOP articles.

James

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10
Posts: 6984
Joined: Fri Oct 07, 2005 07:07 PM
Question to classes
Posted: Wed Dec 05, 2007 10:48 AM

Hello James,

thanks for your answer.
Where did you get all your knowledge from?
I will re-read your articles.
Regards,
Otto

Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM
Question to classes
Posted: Wed Dec 05, 2007 11:48 AM

There are bunch of books dedicated to the OOP in the libraries and on Internet.

EMG

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Question to classes
Posted: Wed Dec 05, 2007 01:04 PM

Otto,

In FWH\source\classes*.prg there are lots of examples :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion