&& - Steuerzeichen für ALT-

[marabu]

Hallo padavan,

vielleicht hilft dir das hier?

Delphi-Quellcode:

function EscapeCaption(caption: string): string;
var
  i: integer;
begin
  for i := Length(caption) downto 1 do
    if caption[i] = '&' then
      Insert('&', caption, Succ(i));
  Result := caption;
end;

Grüße vom marabu