Как избежать такой ошибки? Abstract Error

← →
Андрей (2003-05-23 09:11) [0]

вот я в процедуре объявляю переменную типа TStrings и создаю ее, мне нужно в нее загрузить строки из файла, чтобы потом этот TStrings передать параметром в другую процедуру

procedure TMainForm.FileOpenActionExecute(Sender: TObject); var FLLChild: TLogListChild; L: TStrings; begin OpenDialog.DefaultExt:="*.llf"; OpenDialog.Filter:="Log list files (*.llf)|*.llf"; OpenDialog.Options := [ofEnableSizing]; if OpenDialog.Execute then begin try FLLChild := TLogListChild.Create(Application); FLLChild.Caption := OpenDialog.FileName; try l := TStrings.Create; l.LoadFromFile(OpenDialog.FileName); FLLChild.LoadFileList(L); finally l.Free; end; except Application.MessageBox(PChar("Error read file."),"Error",1); end; end; end;

и при загрузке из файла у меня получается ошибка Abstract Error.
...я так понял, что эта переменная l не принадлежит форме (так чтоли?) поэтомй ошибка. Подскажите пожалуйста, как ее избежать?

← →
MBo © (2003-05-23 09:14) [1]

TStrings - абстрактный класс, и компилятор об этом пердупредить должен
l := TStrings List.Create;

← →
Андрей (2003-05-23 09:24) [2]

:)) действительно!
пасибо

да, иногда нужно обращать внимание на то что пишется внизу

Как избежать такой ошибки? Abstract Error Найти похожие ветки