====== wRepeater ====== CLASS ZRepeater FROM WControl PROPERTY cClassId INIT "rpt" PROPERTY lInitEmpty INIT .F. // Se Inicia el control con un primer elemento PROPERTY lFirstUndeletable INIT .T. // Se puede borrar el primer elemento PROPERTY cMsgDelete INIT "¿Desea eliminar este elemento?" // Si no hya mensaje no pregunta al borrar PROPERTY cTextAdd INIT "Nueva" // "Add" PROPERTY cTextDelete INIT "Quitar" // "✂" PROPERTY cClrBtnAdd INIT "" PROPERTY cClrBtnDelete INIT "red" PROPERTY lCard INIT .F. ENDCLASS