Instancier plusieurs objets dans une boucle

**jjacques68** · 24/01/2021, 17h13

Hello tout le monde,

Je me lance dans la POO et je souhaite savoir comment on peut instancier plusieurs objet en une fois.

Concrètement, si par exemple j'ai un fichier de mon analyse comportant 10 enregistrements.

Et que je souhaite créer 10 objets avec comme membres, des rubriques de ce fichier

je pensais commencer par faire un truc du genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
POUR TOUT MonFic
    "MonObj_"+MonFic.ID est new MaClass
    "MonObj_"+MonFic.ID:m_... = MonFic. ...
    "MonObj_"+MonFic.ID:m_... = MonFic. ...
FIN

Mais visiblement non... quelqu'un a une solution, disons plutôt une leçon à me donner

merciii d'avance !

**mail.spam** · 24/01/2021, 17h38

Bonjour,
Si je me souviens bien, il faut que tu regardes du côté des indirections.

**Voroltinquo** · 24/01/2021, 17h44

Bonjour,
Tu peux regarder du côté de FichierVersTableau.

Par ailleurs, pour instancier une instance, il est préférable de passer par le constructeur.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
clMonObjet est CMaClasse(Param1,....,ParamN)

Au pire par un SETTER (en WLangage, par une propriété, qui fait aussi office de GETTER (en gros),) mais surtout pas par une affectation directe.

**jjacques68** · 24/01/2021, 17h56

merci pour vos conseils :

il faut que tu regardes du côté des indirections.

déjà essayé, ça ne marche pas.

il est préférable de passer par le constructeur.

oui oui tout à fait, c'était juste pour gagner du temps dans l'explication.

d'après mes recherches, j'ai l'impression qu'on est obligé de passer par un tableau d'objet.
Mais du coup, à chaque fois que l'on souhaite s'adresser à un objet, il faut passer par ce tableau.
Et donc de gérer sa position dans le tableau...
ça semble franchement lourd !!!!

**Voroltinquo** · 24/01/2021, 18h59

[QUOTE=jjacques68;11675564
Mais du coup, à chaque fois que l'on souhaite s'adresser à un objet, il faut passer par ce tableau.
[/QUOTE]
Au lieu de faire un HLitRecherche, tu fais un TableauCherche, et il n'y a plus d'accès serveur.

**jjacques68** · 24/01/2021, 19h03

tu peux faire un tableaucherche dans un tableau d'objet ?
Donc en spécifiant un membre de l'objet pour la recherche ?

**Voroltinquo** · 24/01/2021, 19h22

Oui, dans https://doc.pcsoft.fr/?3075002&verdisp=160, regarde la partie concernant la "Recherche d'un élément dans un tableau de structures, de classes, de types avancés à 1 dimension ou d'enregistrements." (en gros au début du dernier tiers.)
Ça nous fait un truc du style :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
clUneInstance est MMaClasse
tabInstance est tableau de MMaClasse
 
......
 
nIndiceInstance=TableauCherche(tabInstance,tcLinéairePremer,"m_nClient",nNoClient)
SI nIndiceInstance<>1 ALORS
     clUneInstance=tabInbstance[nIndiceInstance]
     ....

Tu peux maintenant travailler avec clUneInstance

**jjacques68** · 24/01/2021, 19h27

ahhh c'est interessant ça !!!

je vais creuser cette piste !

merci !!!

**Voroltinquo** · 24/01/2021, 19h36

Pour apprécier à fond la souplesse de FichierVersTableau et consort, il est préférable d'utiliser des classes mappées.
Cela peut se faire automatiquement : https://blogs.pcsoft.fr/fr/generer-c...10689/read.awp

**philouZ** · 25/01/2021, 08h08

FichierVersTableau est très pratique et je l'utilise régulièrement. Attention tout de même aux performances sur les tableaux avec un grand nombre d'objets, le chargement peut durer de nombreuses secondes.

**Lo²** · 25/01/2021, 08h40

Envoyé par Voroltinquo

Pour apprécier à fond la souplesse de FichierVersTableau et consort, il est préférable d'utiliser des classes mappées.
Cela peut se faire automatiquement : https://blogs.pcsoft.fr/fr/generer-c...10689/read.awp

Bonjour à tous,

Pour ma culture personnelle, quel est intérêt d'utiliser des classes mappées alors qu'il existe des variables de type Enregistrement ?

**philouZ** · 25/01/2021, 08h51

La classe a l'avantage de pouvoir y ajouter tout membre que tu juges nécessaires et d'ajouter autant de méthodes pour le code métier que tu souhaites. Une variable de type enregistrement n'est qu'une définition de la table et est immuable.

**mous97** · 25/01/2021, 12h38

Salut, je te donne un petit aperçu de comment je procède avec une de mes classes mappés dont la relation implique un tableau d'objet d'un autre fichier(Exemple commande et Lignesproduit)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
HExécuteRequête(Req_BudgetMarchandiseDeLaTache)
FichierVersTableau(TableauBudgetMarchandise, Req_BudgetMarchandiseDeLaTache)
POUR TOUT objetBudgetMarchandise DE TableauBudgetMarchandise
     objetBudgetMarchandise.ObjetFichierTacheAFaire <- objet // ObjetDéclaré en relation faible
FIN

**Narwe** · 25/01/2021, 13h41

Pour ma culture personnelle, pourquoi ne pas avoir simplement un membre de type de type enregistrement dans une classe plutôt qu'une classe mappé ?
Eventuellement, cela raccourci les lignes de code car on a juste <MonMembreMappé>=xxx plutôt que <MaVariableDeTypeEnreg>.MonChamp=xxx mais je pense que je passe à côté de quelque chose.

Envoyé par Lo²

Pour ma culture personnelle, quel est intérêt d'utiliser des classes mappées alors qu'il existe des variables de type Enregistrement ?

Envoyé par philouZ

La classe a l'avantage de pouvoir y ajouter tout membre que tu juges nécessaires et d'ajouter autant de méthodes pour le code métier que tu souhaites. Une variable de type enregistrement n'est qu'une définition de la table et est immuable.

**jjacques68** · 25/01/2021, 17h07

Et bien ça marche nickel tout ça

merci !!

J'ai une méthode déclarée en thread (procédure automatique) (un thread d'écoute sur une socket TCP)
Donc chaque objet, va exécuter cette méthode, donc ce thread simultanément.
Visiblement, ça ne semble pas poser de problèmes.

Je fais biens les choses ou c'est pas bon ?

**mous97** · 26/01/2021, 12h16

Envoyé par jjacques68

Et bien ça marche nickel tout ça

merci !!

J'ai une méthode déclarée en thread (procédure automatique) (un thread d'écoute sur une socket TCP)
Donc chaque objet, va exécuter cette méthode, donc ce thread simultanément.
Visiblement, ça ne semble pas poser de problèmes.

Je fais biens les choses ou c'est pas bon ?

Je ne connais pas ton besoin mais personnellement je fais de même pour surveiller mes enregistrements, chaque objet instancié a sa procédure SurveilleEnregistrement que je lance en fonction des cas d'utilisation

**jjacques68** · 26/01/2021, 16h58

Alors justement, j'ai une procédure qui semble ramer pas mal et je ne comprends pas pourquoi :

Cette procédure (Thread) check une variable tableau et envoi le contenu de ce tableau sur la socket, un élément après l'autre :

son code est très simple :

Voici quelques membre de la classe :

:m_bMonStatus est le status de la socket (vrai si ouverte, faux dans la cas contraire)
:m_tabListeDataToSend est le tableau des éléments à envoyer (une sorte de queue liste)
:m_sMonCanal est le canal TCP du client connecté
:m_sMonNom est le nom "convivial" du client

et voici la méthode "Write" executée avec l'instruction :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ThreadExécute("Write_"+:m_sMonNom,threadNormal,:Write)

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
TANTQUE :m_bMonStatus = Vrai
 
	//traite la queueListe
	SI :m_tabListeDataToSend..Occurrence <> "" ALORS
 
		//envoi la data, de l'élément 1 
		SocketEcrit(:m_sMonCanal, :m_tabListeDataToSend[1])
 
		//supprime ce qu'il vient d'envoyer
		TableauSupprime(:m_tabListeDataToSend,1)
 
		ThreadPause(1)
	FIN
 
	ThreadPause(1)
 
FIN

comme dit, ça rame et je vois pas pourquoi...
les 2 tempo de 1 cs sont ridicules !!!
Lors qu'un élément doit être envoyé, ça prends presque plus d'une seconde !!
Si je vire les tempo, ça va franchement mieux, mais j'ai le processeur qui monte à plus de 30 % ???? !!!!

une idée ?

**mous97** · 26/01/2021, 17h04

C'est pas trop mon truc les threads désolé :s

**jjacques68** · 26/01/2021, 17h10

Je viens d'identifier clairement que c'est le fait de passer par une table "queue liste"

Si j'écrit directement la valeur sur la socket, sans passer par cette table, c'est hyper réactif.

**mous97** · 26/01/2021, 17h14

Envoyé par jjacques68

Je viens d'identifier clairement que c'est le fait de passer par une table "queue liste"

Si j'écrit directement la valeur sur la socket, sans passer par cette table, c'est hyper réactif.

Tu veux dire tableau ?

Instancier plusieurs objets dans une boucle

WinDev

Discussions similaires

Partager

Partager