Instancing a class in Progress ABL

This is a example of how to instance a class in ABL.

Used class
Pessoa

ABL Procedure
DEFINE VARIABLE cPessoa   AS CLASS dev.OOP.Pessoa   NO-UNDO.

cPessoa = NEW dev.OOP.Pessoa().

cPessoa:setNome(“carlos”).
cPessoa:setSalario(500).

MESSAGE cPessoa:getNome() VIEW-AS alert-box.
MESSAGE cPessoa:getSalario() VIEW-AS alert-box.

DELETE OBJECT cPessoa.

see u…

Progress

4gl, abl, class, constructor, delete, destructor, example, instance, method, object, oo, Progress

2008-12-21

1 Comment