::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