Boa tarde amigos,
Gostaria de saber como posso criar uma propriedade do tipo TStrings,
assim como a propriedade Items ou Lines que existem em vários
componentes.
Do jeito que estou fazendo está retornando o seguinte erro quando eu
clico no botão do Object Inspector que deveria abrir o Editor:
"Cannot assign a nil to a TRichEditStrings."
Este é o código do componente de teste que estou fazendo:
TStringTeste = class(TComponent)
FItems: TStrings;
private
procedure SetFItems(const Value: TStrings);
public
constructor Create(Aowner: TComponent);
published
property Items: TStrings read FItems write SetFItems;
end;
constructor TStringTeste.Create(Aowner: TComponent);
begin
inherited Create(AOwner);
FItems := TStringList.Create(self);
end;
procedure TStringTeste.SetFItems(const Value: TStrings);
begin
FItems.Assign(Value);
end;
Atenciosamente.
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
