FireDAC.Comp.Client.TFDCustomCommand.Macros
Delphi
property Macros: TFDMacros read FMacros write SetMacros stored False;
C++
__property Firedac::Stan::Param::TFDMacros* Macros = {read=FMacros, write=SetMacros, stored=false};
Propriétés
Type | Visibilité | Source | Unité | Parent |
---|---|---|---|---|
property | public | FireDAC.Comp.Client.pas FireDAC.Comp.Client.hpp |
FireDAC.Comp.Client | TFDCustomCommand |
Description
La collection des variables de substitution d'une macro.
La propriété Macros est la collection des variables de substitution d'une macro. Elle est remplie automatiquement après l'affectation de CommandText, si ResourceOptions.MacroCreate a la valeur True. Sinon, elle peut être remplie manuellement.
Lors de l'appel de Prepare, les valeurs des macros sont substituées dans CommandText, si ResourceOptions.MacroExpand a la valeur True.
Exemple
//Example 1 - Substitute table name:
ADCommand1.CommandText.Text := 'select * from &Tab';
ADCommand1.Macros[0].AsIdentifier := 'Order Details';
ADCommand1.Prepare;
ShowMessage(ADCommand1.SQLText); // select * from "Order Details"
//Example 2 - Substitute WHERE condition:
ADCommand1.CommandText.Text := 'select * from MyTab {if !cond} where !cond {fi}';
ADCommand1.Macros[0].AsString := 'ID > 100';
ADCommand1.Prepare;
ShowMessage(ADCommand1.SQLText); // select * from MyTab where ID > 100
ADCommand1.Macros[0].Clear;
ADCommand1.Prepare;
ShowMessage(ADCommand1.SQLText); // select * from MyTab
Voir aussi
- Exécution des commandes
- Prétraitement du texte des commandes
- FireDAC.Comp.Client.TFDCustomCommand.CommandText
- FireDAC.Comp.Client.TFDCustomCommand.Params
- FireDAC.Comp.Client.TFDCustomCommand.Prepare
- FireDAC.Stan.Option.TFDResourceOptions.MacroCreate
- FireDAC.Stan.Option.TFDResourceOptions.MacroExpand