Einzelnen Beitrag anzeigen

Benutzerbild von bitsetter
bitsetter

Registriert seit: 17. Jan 2007
1.169 Beiträge
 
Turbo Delphi für Win32
 
#6

Re: bei einem TListview die Scrollbalken unterdrücken?

  Alt 3. Aug 2007, 13:51
Zitat von SirThornberry:
Das ist heftig 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 von DeddyH:
Jepp, sieht so aus, da wäre Subclassing evtl. die bessere Möglichkeit.
Das ist doch Subclassing oder nicht?
Gruß bitsetter
"Viele Wege führen nach Rom"
Wolfgang Mocker (geb. 1954), dt. Satiriker und Aphoristiker
  Mit Zitat antworten Zitat