De un edit a un string

[jorgegetafe]

Hola tengo un edit (edit1) y quiero que lo que se escriba dentro pase a ser string para utilizar este código:

Código Delphi [-]
PROCEDURE TForm1.ToolButton40Click(Sender: TObject);
 VAR
  direccion: STRING;
 BEGIN
  direccion:= edit1.Text;
    TRY
      ShellExecute(0, 'open', direccion, NIL, NIL, SW_SHOW)
    Except
      showmessage ('La disquetera no está lista o no tiene disquetera.');
    END;
END;

En la linea

Código Delphi [-]
ShellExecute(0, 'open', direccion, NIL, NIL, SW_SHOW)

me dice que hay tipos incompatibles PAnsirChar (que no se lo que es) con un string.

Una manita porfa. Muchas gracias.