undeclared identifier

[Klaus01]

Vielleicht so?

Delphi-Quellcode:

procedure tdatei.ladenClick(Sender: TObject); 
  var      
    SL: TStringList;      
    i: Integer;      
    T: Textfile;      
    SInString: String;      

    
begin      
  if (opendialog.Execute) then begin 
    SL := TStringList.Create; 
    try 
      AssignFile(T,opendialog.FileName); 
      Reset(T);      
      while (not Eof(T)) do 
        begin    
          ReadLn(T,SInString); 
          SL.Delimiter := ';'; 
          SL.DelimitedText := SInString; 
          listbox1.columns:=SL.Count;
          for i := 0 to SL.Count-1 do 
            listbox1.Items.add(sl.Strings[i]);
         { oder alles in einem Rutsch
           listbox.items.add(sl.text);
         }

        end; 
    finally 
      SL.Free; 
    end; 
  end; 
  CloseFile(T); 
end;

Vielleicht liege ich auch total daneben.

Grüße
Klaus