Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Listbox mit zusätzlichem Feld als Mengeneingabe? (https://www.delphipraxis.net/152128-listbox-mit-zusaetzlichem-feld-als-mengeneingabe.html)

khh 12. Jun 2010 07:56

Listbox mit zusätzlichem Feld als Mengeneingabe?
 
Hallo zusammen,
folgende Anforderung;
aus einer Listbox sollen Einträge( Wirkstoffe ) in eine andere Listbox gezogen werden.
Das ist soweit kein Problem :-)
In der "Empfangsbox" müssen diese Einträge nun aber mit Mengenangaben versehen werden können.
Geht das überhaupt, oder sollte ich lieber eine andere Komponente nutzen.
Aber welche Komponente kann so was, ohne grosse Anpassungen?

Danke für eure Hilfe Gruss KHH

himitsu 12. Jun 2010 07:58

AW: Listbox mit zusätzlichem Feld als Mengeneingabe?
 
Wie "mit Mengenangaben" ... wie oft da was schon reingezogen wurde oder wie?

Grundsätzlich geht alles ... kommt nur drauf an wie aufwändig es wird, wenn man es selber macht.

khh 12. Jun 2010 08:02

AW: Listbox mit zusätzlichem Feld als Mengeneingabe?
 
Zitat:

Zitat von himitsu (Beitrag 1028295)
Wie "mit Mengenangaben" ... wie oft da was schon reingezogen wurde oder wie?

Grundsätzlich geht alles ... kommt nur drauf an wie aufwändig es wird, wenn man es selber macht.

nee nicht wie oft reingezogen.
es handelt sich um Wirk/Zusatzstoffe die einem Produkt zugeordnet werden sollen.
Die möglchen Stoffe können aus der einen ind die Zielbox gezogen werden.
Nun muss in der Zielbox bei den vorhandenen Einträgen eine Mengenangabe ( wie viel davon im entsprechenden Produkt vorhanden ist) hinterlegt werden können.

Vileicht gibts auch ne besser Lösung als mit den Listboxen??

himitsu 12. Jun 2010 08:09

AW: Listbox mit zusätzlichem Feld als Mengeneingabe?
 
'ne TListView im List-Style und mit ausgelendetem Header oder ein TValueListEditor?

khh 12. Jun 2010 08:11

AW: Listbox mit zusätzlichem Feld als Mengeneingabe?
 
Zitat:

Zitat von himitsu (Beitrag 1028297)
'ne TListView im List-Style und mit ausgelendetem Header oder ein TValueListEditor?

werd ich mir ansehen, danke für den Tipp

sorry hartte veressen zu erwähnen dass das unter Lazarus läuft.
Hier gibts keinen TValueListEditor
und bei der Listview, wie hast das dort gedacht?

Matze 12. Jun 2010 08:36

AW: Listbox mit zusätzlichem Feld als Mengeneingabe?
 
Zitat:

Zitat von khh (Beitrag 1028298)
und bei der Listview, wie hast das dort gedacht?

Na über eine zusätzliche Spalte, in der die Mengenangaben stehen.

Der Windows-Explorer ist z.B. eine Art ListView. Da siehst du somit, was die Komponente kann.
In der Detailansicht könntest du eine Spalte "Menge" und eine Spalte "Produkt" anlegen o.ä.

DeddyH 12. Jun 2010 08:39

AW: Listbox mit zusätzlichem Feld als Mengeneingabe?
 
Jepp, wenn man den Style vsReport einstellt.

khh 12. Jun 2010 08:43

AW: Listbox mit zusätzlichem Feld als Mengeneingabe?
 
Zitat:

Zitat von DeddyH (Beitrag 1028303)
Jepp, wenn man den Style vsReport einstellt.

mh muss ich mich wohl mehr mitder Komponenete befassen.
Wenn ich den Stile auf vsReport stelle zeigt er mir die Einträge nicht mehr an

EDIT: habs gefunden, die Spalten müssen explizit definiert werden

Matze 12. Jun 2010 08:47

AW: Listbox mit zusätzlichem Feld als Mengeneingabe?
 
Wenn du noch "Columns" (= Spalten) hinzufügst (bsp. über den Objektinspector), dann schon.

DeddyH 12. Jun 2010 08:48

AW: Listbox mit zusätzlichem Feld als Mengeneingabe?
 
Liste der Anhänge anzeigen (Anzahl: 1)
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


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:32 Uhr.
Seite 1 von 2  1 2      

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