Wert innerhalb Komponente übergeben

[Sam Spade]

Hoi zusammen,
ich möchte eine Komponente erstellen, soweit so gut.

Delphi-Quellcode:

type
  // Display
  TDisplay = class(TEdit)
  protected
    procedure KeyPress( var Key:Char); override;
  end;
  TSimpleSlide = class(TPanel)
  private    { Private-Deklarationen }
    //
    fDisplay   : TDisplay;
    //
   end;

//
procedure TDisplay.KeyPress( var Key:Char );
var i :integer; s :string; d :double;
begin
  if key=#13 then
  begin
    s := text;
    val(s,d,i);
    // wie bekomme ich den wert von "text" bzw d
    // nach TSimpleSlide..?
  end;
  inherited KeyPress(Key);
end;

nun möchte ich das Ergebnis (d:double) aus Keypressed der Klasse TSimpleSlide übergeben, damit ich damit weiterarbeiten kann.
Wie geht das?
Sam