Aggiungi nuova proprietà all'azione in tactionlist

StackOverflow https://stackoverflow.com//questions/11668085

  •  12-12-2019
  •  | 
  •  

Domanda

Come posso aggiungere nuova pubblicazione (da mostrare nella proprietà dell'ispettore oggetto) all'azione della rappresentazione di taction in Delphi

Il tipo di dati di proprietà è booleano.

Grazie.

È stato utile?

Soluzione

Crea la tua nuova classe di azione derivante da TAction.Ad esempio: 

TMyAction = class(TAction)
...
published
  property MyBoolProp: Boolean ....
end;
.

E quindi è possibile registrarlo dalla procedura Register del pacchetto Time Design chiamando RegisterActions. 

procedure Register;
begin
  .... // register any other components
  RegisterActions('MyCategory', [TMyAction], nil);
end;
.

Poi dall'editor elenco Azione, selezionare New Standard Action e la tua azione apparirà nella vista ad albero delle azioni disponibili.

Inserire la descrizione dell'immagine qui

Inserire l'immagine Descrizione qui

.

Nei commenti che sembra che si desideri modificare TAction per avere una nuova proprietà.Ciò richiederebbe la modifica al VCL stesso e questo è oltre il tuo controllo.Senza dubbio il VCL potrebbe essere violato per ottenere ciò che chiedi ma non è una buona idea.

Autorizzato sotto: CC-BY-SA insieme a attribuzione
Non affiliato a StackOverflow
scroll top