« Parameters (type) » : différence entre les versions
Aucun résumé des modifications |
mAucun résumé des modifications |
||
(7 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 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 | Le type paramètres est stocké sous forme de document XML | ||
Le type paramètre peut être utilisé pour stocker des couple clé/valeur. | Le type [[Parameter (type)|paramètre]] peut être utilisé pour stocker des couple clé/valeur. | ||
===Propriétés=== | ===Propriétés=== | ||
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 : | |||
* [[Parameter (type)|Type paramètre]] | |||
[[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 :