Criação de Componentes

24/08/2004

:D e ai mossada estou criando um componente e precisava adcionar nele uma propriedade, mas esta propriedade tem de ser de somente leitura.
:?: Alguém sabe me dizer como fazer isto?


Mitsalito

Respostas

24/08/2004

Dopi

É só você nao especificar a clausula write...

Veja a declaração da classe abaixo.... as propriedades DigitoFinal e SomaDigitos são read-only

type
TACBrDig11 = class
   private
      fsMultIni: Integer;
      fsMultFim: Integer;
      fsFormulaDigito: TACBrDig11Formula;
      fsDocto: String;
      fsDigitoFinal: Integer;
      fsSomaDigitos: Integer;

   public
      constructor Create;
      Procedure Calcular ;
      Procedure CalculoPadrao ;

      Property Documento : String read fsDocto write fsDocto ;
      Property MultiplicadorInicial : Integer read fsMultIni write fsMultIni ;
      Property MultiplicadorFinal   : Integer read fsMultFim write fsMultFim ;
      Property DigitoFinal : Integer read fsDigitoFinal ;
      Property SomaDigitos : Integer read fsSomaDigitos ;
      Property FormulaDigito :  TACBrDig11Formula read fsFormulaDigito
         write fsFormulaDigito ;
end;



Responder Citar