Problemer med kode
hej Jeg står med dette problem med denne kode at den hele tiden mælder fejl i nederste linje .. hvad er problemet ??procedure TForm1.bn1Click(Sender: TObject);
begin
If opendialog1.execute then
begin
Form2:=Tform2.Create(self);
Form2.Caption:=Opendialog1.FileName
Form2.Richedit1.Lines.Loadformfile(Opendialog1.Filename);
Hvis nogle kan hjælpe mig ville jeg blive meget gald (det kan i jo heh)