16番会議室「玉石混淆みんなで作るSample蔵」に寄せられたサンプル
"RE:TCollectionを使ったコンポ例"
この発言は #00633 凛 さんのTCollectionを使ったコンポ例 に対するコメントです
この発言に対し以下のコメントが寄せられています
#00635 凛 さん RE^2:TCollectionを使ったコンポ例
凛 さん、こんにちは。謎の全知師です。
ちょっと今試している時間がありませんが、
>Q このユニットでは使ってないのに、なんでGetOwnerというfunctionがあるのか
>A どうもディフォルトのプロパティエディタがこの関数を
> 必要としているようです。
これって必要無いと思います。
> TCList=Class(TCollection)
> private
> FOwner:TPersistent;
> procedure _setItem(index:integer;value:TCollectionItem);
> function _getItem(index:integer):TCollectionItem;
> public
> constructor create(Aowner:TPersistent);
> function GetOwner: TPersistent; override;
> published
> property items[index:integer]:TCollectionItem read _getItem write
>_setItem;default;
これどうして再定義しているのでしょうか?
もしかしてDefaultにしたいだけ?
だったら、
property items; Default;
で駄目ですか?
98/08/24(月) 03:01 謎の全知師(QZE10125)
Original document by 謎の全知師 氏 ID:(QZE10125)
ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum の16番会議室「玉石混淆みんなで作るSample蔵」に投稿されたサンプルです。これらのサンプルはボーランド株式会社がサポートする公式のものではありません。また、必ずしも動作が検証されているものではありません。これらのサンプルを使用したことに起因するいかなる損害も投稿者、およびフォーラムスタッフはその責めを負いません。使用者のリスクの範疇でご使用下さい。
Copyright 1996-2002 Delphi Users' Forum
|