ListBox

[galoru]

nabend, brauche hilfe bei delphi mit den listboxen. ich habe eine listbox erstellt und die quadratzahlen von 1- 20 ausgegeben. diese zahlen werden orthogonal herausgegeben. nun möchte die ausgangszahlen selbst, die quadriert werden (1,2,3...20) rechts von den quadratzahlen ausgeben, ohne dass, ich eine neue listbox aufmachen muss. wie schreibe ich dies nun im quelltext?

dankööö

[DeddyH]

Du willst also quasi 2 Werte in einem Item ausgeben?

[galoru]

wenn mit item die listbox gemeint ist, dann ja ^^

PS:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var i:Integer;
begin
Listbox1.Clear;
ListBox1.Items.Add('x²');

For i:=1 to 20 do
ListBox1.Items.Add(inttostr(i*i));

Listbox1.items.Add('x');
for i:=1 to 20 do
Listbox1.items.Add(inttostr(i));
 end;

   end.

[Luckie]

Eine Listbox kennt keine Spalten. Ein Listview wäre hier wohl besser geeignet.

[DeddyH]

Mit Item ist eine "Zeile" der Listbox gemeint. Wenn man Logik und Darstellung trennt, sich eine kleine Klasse baut und die Instanzen dieser Klasse im jeweiligen Item hinterlegt, ist das relativ einfach. Nur die Darstellung ist ggf. nich so dolle.

[galoru]

danke für die schnellen tipps, werde mich mal mit Listview befassen.

so far...

[Impulz]

schau dich vllt nach den suchbegriffen um: listview.col,listview.row und listview.cells

grüße

[Coffeecoder]

Hi,

in diesem Fall könntest du auch einen Stringgrid benutzen.

[Aphton]

Warum so kompliziert; sein Vorhaben lässt sich so bewerkstelligen:

Delphi-Quellcode:

  For i:=1 to 20 do
    ListBox1.Items.Add(inttostr(i) + '² = ' + inttostr(i*i));

Edit: In diesem Fall ist es links (find ich besser), aber ich schätze mal du kommst locker drauf, wie das ganze auszusehen hat, wenn du es rechts haben willst.

[Luckie]

Zitat von Impulz:

schau dich vllt nach den suchbegriffen um: listview.col,listview.row und listview.cells

Mit den Suchbegriffen dürftest du ihn ziemlich in die Irre führen. Ein Listview kennt die von dir genannten Eigenschaften nicht, dafür aber ein StringGrid.

Zitat von Aphton:

Warum so kompliziert; sein Vorhaben lässt sich so bewerkstelligen:

Delphi-Quellcode:

  For i:=1 to 20 do
    ListBox1.Items.Add(inttostr(i) + '² = ' + inttostr(i*i));

Ist zwar einfach, aber es dürfte nicht sehr schön aussehen.