TListView.Create zur Laufzeit

[BenjaminHelbig]

Hi DP'ler

ich habe folgendes Problem. Ich habe auf meinem Frame (QueryFrame) links ausgerichtet ein Memo, dann einen Splitter und dann auf align = alclient ein TabControl. Auf diesem TabControl ist ein Button positioniert. Bei klick darauf wird folgender Code ausgeführt:

Delphi-Quellcode:

const
  Names: array[0..5, 0..1] of string = (
    ('Rubble', 'Barney'),
    ('Michael', 'Johnson'),
    ('Bunny', 'Bugs'),
    ('Silver', 'HiHo'),
    ('Simpson', 'Bart'),
    ('Squirrel', 'Rockey')
    );
var
  I: Integer;
  NewColumn: TListColumn;
  ListItem: TListItem;
  ListView: TListView;
begin
  ListView := TListView.Create(Self);
  with ListView do
  begin
    Parent := Self;

    Align := alleft;
    ViewStyle := vsReport;

    NewColumn := Columns.Add;
    NewColumn.Caption := 'Field';
    NewColumn := Columns.Add;
    NewColumn.Caption := 'Type';
    NewColumn := Columns.Add;
    NewColumn.Caption := 'Size';

    for I := Low(Names) to High(Names) do
    begin
      ListItem := Items.Add;
      ListItem.Caption := Names[I][0];
      ListItem.SubItems.Add(Names[I][1]);
    end;
  end;
end;

Eigentlich sollte das ListView dann linksausgerichtet auf dem PageControl positioniert sein, ist es aber nicht. Es wird ganz links vom Frame ausgerichtet, dann kommt erst das memo, dann der splitter, dann das pagecontrol. Ich kapier das nicht.
Hoffe einer von Euch hat ne Idee.

Grüßle Ben

[edit=Sharky]Delphi-Tags gesetzt. Mfg, Sharky[/edit]