Abrir un archivo tiff con aplicacion externa

[Nomad]

Hola

Espero que esto, este bien clasificado aqui.

Estoy haciendo lo siguiente:


procedure MostrarArchivo;
var
archivo : String[100];
begin
archivo := EdFile.Text;
ShellExecute(Handle, 'open',Archivo,nil,nil, SW_SHOWMAXIMIZED);
end;


pero me da el siguiente error de compilacion:

[Pascal Error] UIngCap.pas(161): E2010 Incompatible types: 'ShortString' and 'PAnsiChar'


Creo que es por usar esa variable "archivo"

Que me aconsejan?

gracias

[cHackAll]

ShellExecute(Handle, 'open', PChar(EdFile.Text), nil, nil, SW_SHOWMAXIMIZED);

[Nomad]

Código Delphi [-] (http://www.clubdelphi.com/foros/#)ShellExecute(Handle, 'open', PChar(EdFile.Text), nil, nil, SW_SHOWMAXIMIZED);



Gracias por el consejo, pero ahora presenta el siguiente error:

[Pascal Error] UIngCap.pas(161): E2089 Invalid typecast

[cHackAll]

ShellExecute(Handle, 'open', PChar(Archivo), nil, nil, SW_SHOWMAXIMIZED);

ShellExecute(Handle, 'open', @Archivo[1], nil, nil, SW_SHOWMAXIMIZED);

ShellExecute(Handle, 'open', PChar(string(EdFile.Text)), nil, nil, SW_SHOWMAXIMIZED);

[Nomad]

(http://www.clubdelphi.com/foros/#)ShellExecute(Handle, 'open', PChar(string(EdFile.Text)), nil, nil, SW_SHOWMAXIMIZED);

(http://www.clubdelphi.com/foros/newreply.php?do=newreply&p=272707#)

Me sirvió esa.... muchas gracias!