ListView on Top

[Incocnito]

Nur so als Idee:
Wenn ich Elemente habe die an die gleiche Stelle sollen, verwende ich Karteireiter
sprich TPageControl. Mit TabVisible sorge ich dann dafür sorgen, dass die Reiterauswahl
ausgeblendet wird.

Hier mal aus meinen VCL-Tools:

Delphi-Quellcode:

Procedure InvisibleTabs(pcCurrent : TPageControl);
var
  iTab      : Integer;
  tsCurrent : TTabSheet;
Begin
  pcCurrent.TabHeight := 1;
  for iTab := (pcCurrent.PageCount - 1) downto 0 do
  Begin
    tsCurrent := pcCurrent.Pages[iTab];
    tsCurrent.TabVisible := False;
  End;
End;

Anmerkdung in eigener Sache:
Ob man dann for iTab := 0 to (pcCurrent.PageCount - 1) do schreibt,
die Zwischenvariable tsCurrent weg läst
oder Feind der ungarischen Notation ist, kann ja jeder nach seinem Belieben anpassen.

Das sieht meiner Meinung nach im Fenster ordentlich aus, man kann als Entwickler
schön zwischen den Ansichten wechseln und der Anwender sieht nur den Reiter,
der gerade "aktiv" ist.

Mit freundlichem Gruß
Incocnito

[Daniel]

Und was hält Dich davon ab, "BringToFront" aufzurufen? Eben getestet, funktioniert wie erwartet und verändert auch nicht das fokussierte Element.

[venice2]

Zitat von Daniel:

Und was hält Dich davon ab, "BringToFront" aufzurufen? Eben getestet, funktioniert wie erwartet und verändert auch nicht das fokussierte Element.

Weil ich ListView1.SendToBack; verwende.
Wo ist der Unterschied?
Es ging aber auch um SetWindowPos.. warum es gestern nicht ging keine Ahnung. Hat mich wohl etwas geritten.