(Setar campos do tipo record dentro de uma classe retorna um erro)

Pessoal bom dia,



Tenho um record:

TColuna = record

    Valor: Variant;

    Tamanho: Integer;

    Posicao: Integer;

end;



Uma Classe que incorpora o record:

TPessoa = class(TObject)

    private

      FCPF: TColuna;

    public

      constructor Create;

      property CPF: TColuna read FCPF write FCPF;

end;



implementation



constructor TPessoa.Create;

begin

    FCpf.Posicao             :=  19;

    FCpf.Tamanho           :=  14;

end;   



Em outra Unit tento setar o campo valor do campo CPF da Classe pessoa e me 
retorna um erro



var

    MinhaPessoa: TPessoa;

begin

    MinhaPessoa.CPF.Valor := '111.111.111-11';

end;





Erro: [Pascal Error] E2064 Left side cannot be assigned to



Como posso setar um valor para o campo Valor que é um Record dentro da minha 
classe TPessoa.



Obrigado



[]

Alex Canário





      Alertas do Yahoo! Mail em seu celular. Saiba mais em 
http://br.mobile.yahoo.com/mailalertas/

[As partes desta mensagem que não continham texto foram removidas]

Responder a