Ver Mensaje Individual
  #2  
Antiguo 26-07-2016
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Reputación: 23
maeyanes Va por buen camino
Hola...

Podrías usar una propiedad y no una variable para hacer el cambio necesitado:

Código Delphi [-]
  TForm2 = class(TForm)
    // ...
  private
    procedure SetTitle(const Value: string);
  public
    property Title: string
      write SetTitle;
  end;

implementation

procedure TForm2.SetTitle(const Value: string);
begin
  if Label1.Caption <> Value then
    Label1.Caption := Value
end;

De esta forma cada vez que haces un cambio en la propiedad pública Title de un objeto TForm2, este se verá reflejado en Label1.



Saludos...
__________________
Lee la Guía de Estilo antes que cualquier cosa. - Twitter
Responder Con Cita