Discussion :

[joreveur]

Bonjour

Dans un programme j'ai un memo avec un texte.
Est-il possible quand un autre objet (Shape) couvre partiellement ce mémo que ce texte soit partiellement masqué ?


je voudrais par exemple que le Disque Jaune masque la partie du texte correspondante



Si besoin de plus d'explications, ne pas hésiter à me le demander.

Merci de vos conseils

[danucc]

Bonjour,

Si c'est à la création du programme, il faut sélectionner le parent, c'est à dire le fond du form, puis dans l'inspecteur d'objet, click droit et choisir le Z-order qui convient.

Si c'est dynamiquement, Shape1.BringToFront (en considérant que ton rond jaune s'appelle Shape1).

Bonne journée.
Danilo

[Jipété]

Salut,

Si c'est à la création du programme, il faut sélectionner le parent, c'est à dire le fond du form, puis dans l'inspecteur d'objet, click droit et choisir le Z-order qui convient.

Si c'est dynamiquement, Shape1.BringToFront (en considérant que ton rond jaune s'appelle Shape1).

As-tu testé tout ça ? Sous Linux/Debian/Lxde rien ne fonctionne...

[joreveur]

Bonjour

Désolé mais j'avais oublié de préciser que je suis sous Linux (Ubuntu pour simplifier) et les Z-Order ne semblent pas fonctionner pour les memo.
Pour Labels ça fonctionne.... 1ère ligne



pour l'exemple j'ai enlevé des couleurs et remis des ascenseurs

donc il n'y aurait pas de solution ?

Bien cordialement

[danucc]

Désolé, mais effectivement ça ne marche pas avec un Memo et ce n'est pas une question de Linux ou de Windows.

Je n'ai pas la solution dans ce cas.
Bonne chance.

[Jipété]

donc il n'y aurait pas de solution ?

Ben si, tu l'as dit toi-même : avec un label et ses propriétés WordWrap à true et AutoSize à false, on peut arriver à ça :



Dans le code du bouton :

Code :

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

1
2
3
4
procedure TForm1.Button1Click(Sender: TObject);
begin
  shape1.BringToFront;
end;

[joreveur]

Bonjour,

merci de cette piste.
Je ne pensais pas qu'il y avait la propriété WordWrap sur l'objet Label ; cela va me faire avancer. Merci !

Par cette méthode appelée par Button1

Code :

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

Label1.caption:=memo1.Text;

. j'arrive à ce résultat - label en jaune - en mettant du texte dans memo1.Lines mais ce, de façon manuelle.


je n'ai pas réussi à manipuler cette façon de faire en codant.

Bien cordialement