Eliminar el & del caption

[[eduarcol]]

Hola a todos, estoy haciendo un procedimiento que le paso por parametro un TMainMenu y este se encarga de cargarlo a un TTreeView, hasta aqui todo bien, el problema viene con los caption, es decir, si el item es Archivo se me agrega como &Archivo, como podria hacer para eliminar ese & del caption?

he buscado por los foros pero no he sabido como buscar.

[[eduarcol]]

Me autocontesto,

Código Delphi [-]
StringReplace(mn.Items[nIdx].Caption, '&', '', [])

asi me funciona, pero no hay una forma que lo muestre con la letra subrayada?, me refiero a alguna funcion de Delphi o tengo que generarla?

[ixMike]

Empezado por eduarcol

así me funciona, pero no hay una forma que lo muestre con la letra subrayada?, me refiero a alguna funcion de Delphi o tengo que generarla?

¿eduarcol?

eh... supongo que lo que tendrías que hacer es intervenir en el dibujado del TreeView, y si te encuentras con el carácter "&", pues hacer que el siguiente se dibuje subrayado. Pero el cómo hacerlo es algo que escapa de mis conocimientos .

Espero que lo soluciones.


Salu2.