Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: ScrollBox beim Scrollen aktualisieren

    Delphi
    by teebee, 29. Apr 2005
  Trage Deine Scrollboxen unter public oder private ein, nicht in der obersten Sektion der Formdeklaration, dort hat nur Delphi selber was verloren. Dann machst Du in FormCreate folgendes: ScrollBox1 := TMyScrollBox.Create(Self);
  ScrollBox1.Parent := Self;
  ScrollBox1.Left := ...;
  // usw., alle gewünschten Eigenschaften setzenDamit hast Du eine Instanz der Scrollbox dynamisch erstellt. In...
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: ScrollBox beim Scrollen aktualisieren

    Delphi
    by teebee, 28. Sep 2004
  Du brauchst eine neue Scrollbox-Klasse, die WM_HSCROLL und WM_VSCROLL abfängt.TMyScrollBox=Class(TScrollBox)
  public
  Procedure WMVSCROLL(Var Msg: TWMSCROLL); message WM_VSCROLL;
  Procedure WMHSCROLL(Var Msg: TWMSCROLL); message WM_HSCROLL;
  end;
  
  Procedure TMyScrollBox.WMVSCROLL(Var Msg: TWMSCROLL);
  Begin
  If (Msg.ScrollCode=SB_THUMBTRACK) Then
  VertScrollBar.Position := Msg.Pos;