bei einem TListview die Scrollbalken unterdrücken?

[smart]

Guten Morgen!

Kann man bei einem TListview die Scrollbalken unterdrücken?

Gruß
Heike

[DeddyH]

Bei Torry gefunden: http://www.swissdelphicenter.ch/torr...ode.php?id=586

[SirThornberry]

Das ist heftig :shock: Da wird ja bei jeder Message immer wieder eine eventuell sichbare Scrollbar ausgeblendet, zumindest wenn ich das richtig verstanden hab.

[DeddyH]

Jepp, sieht so aus, da wäre Subclassing evtl. die bessere Möglichkeit.

[smart]

Zitat:

Zitat von DeddyH

Bei Torry gefunden: http://www.swissdelphicenter.ch/torr...ode.php?id=586

Vielen Dank, für den Tipp. Klappt aber.

Gruß
Heike

[bitsetter]

Zitat:

Zitat von SirThornberry

Das ist heftig :shock: Da wird ja bei jeder Message immer wieder eine eventuell sichbare Scrollbar ausgeblendet, zumindest wenn ich das richtig verstanden hab.

Das sehe ich genauso, so müsste es auch reichen:

Delphi-Quellcode:

procedure TForm1.ListViewWndProc(var Msg: TMessage);
begin
  if msg.Msg = WM_WINDOWPOSCHANGING then
  begin
    ShowScrollBar(ListView1.Handle, SB_HORZ, FShowHoriz);
    ShowScrollBar(ListView1.Handle, SB_VERT, FShowVert);
  end;
  FListViewWndProc(Msg);
end;

Zitat:

Zitat von DeddyH

Jepp, sieht so aus, da wäre Subclassing evtl. die bessere Möglichkeit.

Das ist doch Subclassing oder nicht?