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.

[tito_lolo]

Prueba a poner

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

Lo que hacemos es un cast de string a PAnsirChar.

Un saludo

[jorgegetafe]

Funciona, mil gracias. :-)

[Neftali [Germán.Estévez]]

Añade:

Código Delphi [-]
...  PChar(direccion)...

Si te hace falta en algun parámetro más le haces lo mismo.

[jorgegetafe]

Con eso es suficiente ;-) gracias de todas formas.