Bonjour à tous,
Je teste la nouvelle proposition de Delphi pour créer un ruban sous Delphi 10. Le composant tRibbon ayant disparut (pour cause de licence avec Microsoft), Embarcadero propose d'utiliser Microsoft SDK.

J'ai passé de longues heures à essayer de mettre en œuvre l'exemple de :
http://www.bilsen.com/windowsribbon/tutorial.shtml

Quelqu'un peut-il m'expliquer où et comment le compilateur crée et affecte les objets FCmdPaste, FCmdPasteSpecial... ? dans
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
procedure TFormMain.CommandCreated(const Sender: TUIRibbon;
  const Command: TUICommand);
begin
  inherited;
  case Command.CommandId of
    CmdPaste:
      begin
        FCmdPaste := Command as TUICommandAction;
        FCmdPaste.OnExecute := PasteExecute;
      end;
 
    CmdPasteSpecial:
      begin
        FCmdPasteSpecial := Command as TUICommandAction;
        FCmdPasteSpecial.SetShortCut([ssCtrl, ssAlt], 'V');
        FCmdPasteSpecial.OnExecute := PasteExecute;
      end;
 
    CmdCut:
      begin
        FCmdCut := Command as TUICommandAction;
        FCmdCut.OnExecute := PasteExecute;
      end;
 
    CmdCopy:
      begin
        FCmdCopy := Command as TUICommandAction;
        FCmdCopy.OnExecute := PasteExecute;
      end;
  end;
end;
Merci par avance pour votre aide...