Discussion :

[Speed41]

Bonjour,
J'ai créé un objet (TCustomControl) dans lequel je place d'autres "petits" objets, ils ont une place bien définit par rapport au parent. C'est à dire qu'un "petit" objet peut ce trouver à 1/8 du début, l'autre à 1/2 l'autre au 1/10 leur nombre et leur place sont fonction de l'utilisateur.

Mes objets ce placent comme il faut mais quand je redimentionne le parent tout fonctionne correctement mais le positionnement de tous les petits objet est long, trop long
Voici mon code (je place dans un tableau la liste des composants créés) :

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
var y : integer;
begin
 
  y:=1;
  while (Sous_periodes.cells[9,y]<>'') and (Sous_periodes.cells[6,y]='Visible') do
  begin
    with (components[strtoint(Sous_periodes.cells[9,y])] as TSousPeriode) do
    begin
      left:=Position_sur_ligne(Sous_periodes.cells[2,y]);
      width:=Position_sur_ligne(Sous_periodes.cells[3,y])-Position_sur_ligne(Sous_periodes.cells[2,y]);
    end;
 
    inc(y);
  end;
end;

La question est : Y a t'il une méthode pour que le repostionnement des sous objets se fasse plus rapidement.

J'espère avoir été claire et je vous remerci pour vos conseils

[philnext]

Je suppose que le code fourni est celui du positionnement de tes objets (au début ou à chaque redimmensionnement du parent)?
Tu peux d'abord essayer, à chaque redimmensionnement :
*Rendre visible:=false tous les objets.
*Les positionner.
*Les rendre tous visible:=true
Il est possible que ça aille plus vite (sans que je sache pourquoi) mais surtout ça va plus vite subjectivement pour le client.
Et en plus ce n'est pas long à faire.

[Speed41]

Je suppose que le code fourni est celui du positionnement de tes objets (au début ou à chaque redimmensionnement du parent)?

Heu oui biensur, j'avais oublié de le préciser.

Bien je viens de tester visible:=false et mouvenet puis visible=true, et bien j'ai gagné en rapidité mais c'est pas encore ça.

Je te remerci, je vais tester de tout cacher puis déplacer puis tout rafficher pour voir si ça ira encore plus rapidement

merci encore

[Speed41]

je vais tester de tout cacher puis déplacer puis tout rafficher pour voir si ça ira encore plus rapidement

et ben c'est pas encore ça

[Graffito]

Bonjour,

Peut-être que la propriété components[<component_name>] prend du temps.

Il faudrait essayer de faire qqchose du type :

Code :

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

1
2
3
4
5
//initialisation
Sous_periodes.objects[x,y]:=components[strtoint(Sous_periodes.cells[9,y])] ;
...
// utilisation Sous_periodes.objects[x,y] 
TsousPeriode(Sous_periodes.objects[x,y]).left:=...

[macumba]

essaie peut-être de désactiver la rafraichissement auto du canvas avec

Code :

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

1
2
3
4
5
DisableAlign;
try
finally
  EnableAlign;
end;