Listbox von unten füllen

[SirThornberry]

@lizardking: du hat das ganze wohl nicht richtig verstanden. Es geht nicht darum Items am Anfang einzufügen sondern das die Listbox von unten (vom unteren Rand des Controls) nach oben (oberer Rand des Controls) gefüllt wird. Einzige Möglichkeit die ich sehe um den Effekt zu erzielen wäre die Listbox mit leeren Items zu füllen und dann von unten her die Beschriftung zu ändern. Wenn also in der Listbox 5 Einträge im sichtbaren Bereich platz haben.

Delphi-Quellcode:

var LCount: Integer;
begin
  for LCount := 1 to 5 do
    ListBox1.Items.Add('');

und zum von unten her "füllen"

Delphi-Quellcode:

var LCount: Integer;
begin
  for LCount := 4 downto 0 do
  begin
    ListBox1.Items.Strings[LCount] := inttostr(5 - LCount);
    Application.ProcessMessages;
    Sleep(1000);
  end;

Dadurch sollte der Effekt entstehen das die Listbox von unten her gefüllt wird (ungetestet)