Eliminar Subrayado al capturar MenuItem

[ecfisa]

Hola.

Es que la función que tenés que usar es la que te puse arriba:

Código Delphi [-]
  Label1.Caption:= AnsiReplaceStr('\\Server\' + (Sender as TMenuItem).Caption + '.pdf', '&', '');

Primero pusé la eliminación mediante Copy, enseguida, al escribirla, me dí cuenta que sólo evaluaba el primer caracter y la modifique. Pero tardé menos de un minuto en hacerlo... ¡ Vos si que sos rápido !

Ya que estoy te explico el por que de esa línea. Para lograr la combinacion de Alt + (una tecla) se utiliza el caracter '&' este es el que provoca el efecto de subrayado para destacar la letra que se debe presionar junto con Alt para ejecutar la acción asociada a ese menuitem. Por lo tanto al reemplazar el caracter '&', por '' se logra la cadena que deseas.

Saludos.