Scrollbar ausblenden (Treeview)

Siluro · Verfasst: Do 24.03.05 13:42

Hi,
ich hab ein kleines Problem. Ich muss irgendwie die Scrollbar in einem Treeview deaktivieren.
Weiss jemand wie das geht?

MfG

Björn

Siluro · Verfasst: Do 24.03.05 17:40

Also das Problem is gelöst.

1. eigene Klasse erstellen

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

type  
  tree=class(TTreeview)
  protected
    procedure WndProc(var msg: TMessage); override;
  end;

2. die Message WM_WINDOWPOSCHANGING abfangen

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

procedure tree.WndProc(var msg: TMessage);
begin
  inherited;
  if Msg.Msg = WM_WINDOWPOSCHANGING then
    begin
      ShowScrollBar(Self.Handle, SB_HORZ, LongBool(0));
      ShowScrolLBar(Self.Handle, SB_VERT, LongBool(0));
    end;
end;

3. die Klasse "tree" anstatt "TTreeview" benutzen

MfG

Björn

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme