Listenindex überschreitet Maximum(1)

[DelphiUser1]

Ich weiß, es wurde jetzt schon oft genug gefragt, aber ich bin noch ein Anfänger und konnte aus den anderen Beiträgen nicht so viel entnehmen. Was ist falsch daran?
ich versuche aus der textdatei die kontaktdaten auszulesen und als Labels auszugeben. Die Datei wird Info(Benutzername).txt genannt.

Delphi-Quellcode:

procedure TForm3.FormCreate(Sender: TObject);
var sdd: TStrings;
begin
if Form3.Visible then
if FileExists(path+'Info'+Form1.Edit1.Text+'.txt') then
begin
sdd:=TStringList.Create;
sdd.LoadFromFile(path+'Info'+Form1.Edit1.Text+'.txt');
Label3.Caption:=sdd.Strings[0];
Label4.Caption:=sdd.Strings[1];
Label4.Caption:=sdd.Strings[2];
Label6.Caption:=sdd.Strings[3];
end;
end;