Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.644 Beiträge
Delphi 12 Athens
|
AW: Listbox mit zusätzlichem Feld als Mengeneingabe?
12. Jun 2010, 09:48
Gerade unter Ubuntu mit Lazarus ausprobiert:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var Item: TListItem;
begin
ListView1.ViewStyle := vsReport;
ListView1.Columns.Add;
ListView1.Columns.Add;
ListView1.Columns[0].Caption := ' Name';
ListView1.Columns[0].Width := 120;
ListView1.Columns[1].Caption := ' Wert';
Item := ListView1.Items.Add;
Item.Caption := ' Wuppdi';
Item.SubItems.Add(' Trallalla');
Item := ListView1.Items.Add;
Item.Caption := ' Dings';
Item.SubItems.Add(' Bums');
end;
Ergebnis siehe Anhang
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|