Работа с файлами...

[morskoy brat]

Ребят не прошу написать программу или что,просто кто подскажите почему выделяет ошибку(выделил подчеркиванием)
var
Form1: TForm1;
sur1:TStringList;
sur2:TStringList;
male1:TStringList;
male2:TStringList;


implementation

{$R *.dfm}


procedure TForm1.FormActivate(Sender: TObject);
begin
StringGrid1.Cells[0,0]:='Фамилия';
StringGrid1.Cells[1,0]:='Имя';
StringGrid1.Cells[2,0]:='Вес';
StringGrid1.Cells[3,0]:='Проживание в общежитии';
StringGrid1.Cells[4,0]:='Рост';
StringGrid1.Cells[5,0]:='Размер Одежды';
Button2.Enabled:=false;
Button3.Enabled:=false;
Button4.Enabled:=false;
PageControl1.ActivePage:=TabSheet1;
Sur1:=TStringList.Create;
Sur1:=LoadFromFile('sur1.txt');
Sur2:=TStringList.Create;
Sur2:=LoadFromFile('sur2.txt');
male1:=TStringList.Create;
male1:=LoadFromFile('male1.txt')
male2:=TStringList.Create;
male2:=LoadFromFile('male2.txt')
RadioGroup1.ItemIndex:=0;
Combobox1.Items:=sur1;
Combobox2.Items:=male1;




end;





end.
p.s. имена все соотсветствуют друг другу файлы в одной и тойже папки

[NetSpace]

может, просто тип TStringList не поддержживает функцию Load FromFile? Вот компонент Memo с удовольствием её поддерживает и загружает содержимое. Но тогда я пишу не так:

Memo1:=LoadFromFile(...)

,а вот так:

Memo1.Lines.LoadFromFile(...)

не присваиваю, а использую уже прописанную функцию загрузки файла.

[Serge_Bliznykov]

это МЕТОДЫ класса.
надо их вызывать у нужного объекта:

Sur1:=TStringList.Create;
Sur1.LoadFromFile('sur1.txt');
Sur2:=TStringList.Create;
Sur2.LoadFromFile('sur2.txt');
male1:=TStringList.Create;
male1.LoadFromFile('male1.txt')
male2:=TStringList.Create;
male2.LoadFromFile('male2.txt')

[morskoy brat]

to Serge_Bliznykov Спасибо что ткнул в ошибку,у самого в тетради так и написанно.
to NetSpace thx too.