Discussion :

[aliwassem]

Est ce que je peux mettre le text dans un edit au milieu ?

[Mat.M]

A ma connaissance pas possible à moins de bidouiller avec des espaces avant et après

[aityahia]

vous pouvez utiliser un Memo

[Droïde Système7]

Bonjour,

Question déjà évoquée avec complément de réponse :
http://www.developpez.net/forums/sho...d.php?t=171424

[Fabrice ROUXEL 1]

Si tu crées dynamiquement les TEdits tu peux faire:

Code :

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

1
2
3
4
TEditEx = Class(TEdit)
  protected
    procedure CreateParams(var Params: TCreateParams);Override;
  end;

Code :

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

1
2
3
4
5
6
7
8
9
implementation
 
{$R *.DFM}
 
procedure TEditEx.CreateParams(var Params: TCreateParams);
begin
    inherited CreateParams(Params);
    Params.Style := params.Style or ES_CENTER;
end;

Code :

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

1
2
3
4
5
6
7
8
procedure TForm1.FormCreate(Sender: TObject);
  var ed: TEdit;
begin
   ed := TEditEx.Create(Self);
   ed.SetBounds(0,100,100,100);
   ed.Parent := Form1;
   ed.Visible := True;
end;

[Droïde Système7]

Bonjour,

Ou bien encore aller chercher des compos freewares bénéficiant des propriétés telles que AlignText or Alignment, exemple les compos TransEdit, umEdit, etc.

[aliwassem]

alors merci pour les reponse , et pour les Edit ils existent deja , pas dynamique....

encore