::Name := cName RETURN Self

///////////////////////////// // CLASS Dog FROM Animal // ///////////////////////////// EXPORTED: METHOD Talk ENDCLASS

METHOD Dog:Talk() RETURN "Bark!"

///////////////////////////// // CLASS Cat FROM Animal // ///////////////////////////// EXPORTED: METHOD Talk ENDCLASS

METHOD Cat:Talk() RETURN "Meow!"

Zobacz też DBF

Linki zewnętrzne

Kategoria:Języki xBase