2 Listviews synchronisieren

[ConnorMcLeod]

Zitat von marcibaer:

ich habe ein TPageControl mit jeweils 1 Listview drauf.
Wie kann ich nun das Scrollen der beiden Listviews synchronisieren?

Wozu eigentlich? Man sieht immer nur eine ListView, weil die andere auf einer anderen Page ist, oder? Nur, wenn die Page gewechselt wird, wird's interessant. Dann kannst Du im OnChange oder im OnChanging herausfinden, welche Page gerade aktiv war und welche gerade aktiv wird. Danach setzt Du das erste Element ungefähr so:

Delphi-Quellcode:

var
  liTopIndex: integer;
begin
  liTopIndex := lbVergangenheit.SendMessage(lbVergangenheit.Handle, LB_GETTOPINDEX, 0, 0);
  if (-1 < liTopIndex) then
  begin
    lbZukunft.Perform(lbZukunft.Handle, LB_SETTOPINDEX, liTopIndex, 0);
  end;
end;

Ungetestet...