AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

TListView.Create zur Laufzeit

Ein Thema von BenjaminHelbig · begonnen am 14. Feb 2004 · letzter Beitrag vom 14. Feb 2004
Antwort Antwort
BenjaminHelbig

Registriert seit: 23. Okt 2003
Ort: Mannheim
80 Beiträge
 
Delphi 5 Professional
 
#1

TListView.Create zur Laufzeit

  Alt 14. Feb 2004, 16:05
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]
--------
Es ist schon über so viele Dinge Gras gewachsen, dass ich keinem Rasen mehr traue.
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#2

Re: TListView.Create zur Laufzeit

  Alt 14. Feb 2004, 16:10
weil du als parent self angibst. Du musst als Parent das PageControl angeben wenn es auf dem PageControl liegen soll
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
BenjaminHelbig

Registriert seit: 23. Okt 2003
Ort: Mannheim
80 Beiträge
 
Delphi 5 Professional
 
#3

Re: TListView.Create zur Laufzeit

  Alt 14. Feb 2004, 18:21
Ok, sehe ich ein. Habe ich aber auch schon ausprobiert, habe jetzt nochmals Self durch
Form2.MainFrame1.QueryFrame1.TabControl1 ersetzt. Dann zeigt er mir es trotzdem nicht auf dem TabControl sondern gneu da wo vorhin an.
Hab den Source mal als zip angehängt.

GRüßle
Angehängte Dateien
Dateityp: rar sql_server_verwaltung.rar (511,0 KB, 10x aufgerufen)
--------
Es ist schon über so viele Dinge Gras gewachsen, dass ich keinem Rasen mehr traue.
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:02 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz