はじめまして。おおさわと申します。Delphi7 pro を使っています。
早速質問させていただきたいのですが、
TStrings型の変数を以下のコードで宣言して実行すると、
"Abstractエラー"という例外が発生して正しく実行できません。
どうすればTStrings型の変数を正しく宣言できるかご教授よろしくお願いいたします。
procedure Form1.StrTest;
var
Strs : TStrings;
begin
Strs:= TStrings.Create;
Strs.Add('This is string.'); //ここで例外発生
Form1.Caption:= Strs[0];
end;
Strs:= TStringList.Create;
TStrings は、TStringList などの派生もとになっている抽象クラスです。
インスタンスをつくってはいけません。TStringList クラスを使ってください。
実行できました!ありがとうございます!
TStringList と言うものを使うのですか、そのようなものがあるとは知りませんでした。
そのため、今までは TStrings でエラーがでるからと array of string を使っていたので、かなり効率の悪いコードになってしまいました。
長年の疑問が解決できてよかったです。本当にありがとうございました。
ツイート | ![]() |