Ver Mensaje Individual
  #5  
Antiguo 14-09-2013
Avatar de nlsgarcia
[nlsgarcia] nlsgarcia is offline
Miembro Premium
 
Registrado: feb 2007
Ubicación: Caracas, Venezuela
Posts: 2.206
Reputación: 21
nlsgarcia Tiene un aura espectacularnlsgarcia Tiene un aura espectacular
Caroso,

Cita:
Empezado por dec
...recordemos la propiedad "EllipsisPosition" de los componentes "TLabel"...
Revisa este código:
Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Label1: TLabel;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
   
   Label1.AutoSize := False;
   
   Label1.EllipsisPosition := epEndEllipsis;
   
   Label1.Caption := 'El valor aproximado de PI es : 3.141592653589793238462643383279502884197169' +
                     '399375105820974944592307816406286208998628034825342117067982148086513282306' +
                     '647093844609550582231725359408128481117450284102701938521105559644622948954' +
                     '930381964428810975665933446128475648233786783165271201909145648566923460348' +
                     '610454326648213393607260249141273724587006606315588174881520920962829254091' +
                     '715364367892590360011330530548820466521384146951941511609433057270365759591' +
                     '953092186117381932611793105118548074462379962749567351885752724891227938183' +
                     '011949129833673362440656643086021394946395224737190702179860943702770539217' +
                     '176293176752384674818467669405132000568127145263560827785771342757789609173' +
                     '637178721468440901224953430146549585371050792279689258923542019956112129021' +
                     '960864034418159813629774771309960518707211349999998372978049';

end;

end.
El código anterior es una variante en Delphi 2010, del código sugerido en el Msg #2.

Revisa estos links:
Espero sea útil

Nelson.

Última edición por nlsgarcia fecha: 14-09-2013 a las 15:30:42.
Responder Con Cita