opendialog i delphi 2009

Hejsa.

jeg har lidt start problemer med delphi 2009

jeg har en Opendialog1 hvor jeg vil extracte path og filename til edit1.text

jeg var rimlig sikker på at det gjores således:

procedure TForm2.Button1Click(Sender: TObject);
begin
OpenDialog1.Execute;
edit1.Text := extractfilepath(opendialog1.filename);
end;

men her får jeg kun filepath frem og ikke filnavnet med..
øhh er det mig der er helt forkert på den?