« Parameters (type) » : différence entre les versions
Aucun résumé des modifications |
mAucun résumé des modifications |
||
| (5 versions intermédiaires par un autre utilisateur non affichées) | |||
| Ligne 1 : | Ligne 1 : | ||
Le type de données « Paramètres » permet de stocker des [[Parameter (type)|paramètres]] | Le type de données « Paramètres » permet de stocker dynamiquement des [[Parameter (type)|paramètres]] qui ne sont pas connu à l'avance. | ||
Le type paramètres est stocké sous forme de document XML | Le type paramètres est stocké sous forme de document XML | ||
| Ligne 14 : | Ligne 14 : | ||
===Méthodes=== | ===Méthodes=== | ||
{|class="wikitable" | {|class="wikitable" | ||
|- | |||
|[[Clear (parameters type)|Clear]] | |||
|Vide la liste des paramètres | |||
|- | |- | ||
|[[Names (parameters type)|Names]] | |[[Names (parameters type)|Names]] | ||
| Ligne 36 : | Ligne 39 : | ||
|Retourne un paramètre par son nom | |Retourne un paramètre par son nom | ||
|- | |- | ||
|[[Remove (parameters type)| | |[[Remove (parameters type)|Remove]] | ||
|Supprime un paramètre | |Supprime un paramètre | ||
|- | |- | ||
| Ligne 47 : | Ligne 50 : | ||
|[[Items (parameters type)|Items]] | |[[Items (parameters type)|Items]] | ||
|Retourne un paramètre par son index | |Retourne un paramètre par son index | ||
|- | |||
|[[LogEvent (parameters type)|LogEvent]] | |||
|Transmet le contenu comme évènement. | |||
|} | |} | ||
Exemple : | |||
<source lang="delphi"> | |||
unit TestSYFREWF; | |||
interface | |||
Type | |||
Facade1 = Class(TitObject) | |||
public | |||
keyvalue: TFrameWorkDataType; | |||
Procedure AddKeyValue; | |||
Class Procedure TestFacade1; | |||
end; | |||
Implementation | |||
{Facade1} | |||
Procedure Facade1.AddKeyValue; | |||
//Procedure AddKeyValue; | |||
begin | |||
keyvalue.Add('source','key1',100); | |||
// | |||
if keyvalue.Find('source','key1').Value=100 | |||
then showMessage('OK') | |||
else showMessage('failed'); | |||
if keyvalue.Names[0]='key1' | |||
then showMessage('Names ok') | |||
else showMessage('Names failed'); | |||
if keyvalue.Values['key1']=100 | |||
then showMessage('Values ok') | |||
else showMessage('Values failed'); | |||
if keyvalue.ValueByIndex[0]=100 | |||
then showMessage('ValueByIndex ok') | |||
else showMessage('ValueByIndex failed'); | |||
if keyvalue.NameExists('key1') | |||
then showMessage('NameExists ok') | |||
else showMessage('NameExists failed'); | |||
if keyvalue.IndexOfName('key1')<>-1 | |||
then showMessage('IndexOfName ok') | |||
else showMessage('IndexOfName failed'); | |||
if keyvalue.Items[keyvalue.IndexOfName('key1')].Value=100 | |||
then showMessage('Items ok') | |||
else showMessage('Items failed'); | |||
end; | |||
Class Procedure Facade1.TestFacade1; | |||
//Class Procedure TestFacade1; | |||
begin | |||
showMessage('Test Facade1'); | |||
end; | |||
end. | |||
</source> | |||
Voir aussi : | Voir aussi : | ||
| Ligne 55 : | Ligne 122 : | ||
[[Category:Type de donnée Paramètres]] | [[Category:Type de donnée Paramètres]] | ||
[[category:Types]] | [[category:Types]] | ||
[[ | [[Category:Version700]] | ||
Dernière version du 30 septembre 2019 à 08:20
Le type de données « Paramètres » permet de stocker dynamiquement des paramètres qui ne sont pas connu à l'avance.
Le type paramètres est stocké sous forme de document XML
Le type paramètre peut être utilisé pour stocker des couple clé/valeur.
Propriétés
| Count | Retourne le nombre de paramètre |
Méthodes
| Clear | Vide la liste des paramètres |
| Names | Accède au nom des paramètres |
| Values | Accède au valeur des paramètres |
| ValueByIndex | Accède au valeur des paramètres par leur index |
| NameExists | Test si un paramètre existe. |
| IndexOfName | Retourne l'index d'un paramètre |
| Add | Ajoute un paramètre |
| Find | Retourne un paramètre par son nom |
| Remove | Supprime un paramètre |
| Merge | Fusionne une liste de paramètre |
| Replace | Remplace les valeurs par une liste de paramètre |
| Items | Retourne un paramètre par son index |
| LogEvent | Transmet le contenu comme évènement. |
Exemple :
<source lang="delphi"> unit TestSYFREWF; interface
Type
Facade1 = Class(TitObject) public keyvalue: TFrameWorkDataType; Procedure AddKeyValue; Class Procedure TestFacade1; end;
Implementation
{Facade1}
Procedure Facade1.AddKeyValue; //Procedure AddKeyValue; begin
keyvalue.Add('source','key1',100);
//
if keyvalue.Find('source','key1').Value=100
then showMessage('OK')
else showMessage('failed');
if keyvalue.Names[0]='key1'
then showMessage('Names ok')
else showMessage('Names failed');
if keyvalue.Values['key1']=100
then showMessage('Values ok')
else showMessage('Values failed');
if keyvalue.ValueByIndex[0]=100
then showMessage('ValueByIndex ok')
else showMessage('ValueByIndex failed');
if keyvalue.NameExists('key1')
then showMessage('NameExists ok')
else showMessage('NameExists failed');
if keyvalue.IndexOfName('key1')<>-1
then showMessage('IndexOfName ok')
else showMessage('IndexOfName failed');
if keyvalue.Items[keyvalue.IndexOfName('key1')].Value=100
then showMessage('Items ok')
else showMessage('Items failed');
end;
Class Procedure Facade1.TestFacade1; //Class Procedure TestFacade1; begin
showMessage('Test Facade1');
end;
end. </source>
Voir aussi :