problem z tstrings

[delphi]
var
procedura:tstrings;
begin
procedura:=tstrings.create;
procedura.LoadFromFile('c:\plik.txt');
button1.caption:=procedura.Strings[0];
{...}
[/delphi]

Wyskakuje 'Abstract Error' kiedy dochodzi do [delphi]button1.caption:=procedura.Strings[0][/delphi]

CO JEST ZLE?? :|

PS. Co robie zle z formatowaniem ze te taki nie dzialaja?

zamiast TStrings napisz TStringList i będzie ok, a formatowanie to nie [delphi] ale < delphi >

//Kitek: a co ja niby napisałem?

Cześć! Zamiast

cos := TStrings.Create;

pisz:

cos := TStringList.Create;

A tak poza tym, to jeżeli robisz jakieś bardziej <ort>skąplikowane </ort>rzeczy, to korzystaj z TStringList, a nie z TStrings...