Edit einträge in ListView einlesen...

[alanblack]

Hallo Leute,

habe ein Problem und zwar:
ich habe auf meinem Formular 1 button, 1 TEdit, 1 Memo
so und jetzt soll passieren dass wenn man in das Edit etwas eingibt und auf den Button drückt dass der text vom edit ins memo schreibt
das ist ja kein prob - ich habe es mit folgenden code gelöst:

Delphi-Quellcode:

Memo1.Lines.Add(edit1.Text);

aber jezt brauche ich das gleiche mit einem ListView und das klappt ja nicht mit dem obrigen code
wie kann ich das lösen?
hat da jemand eine ahnung würd mich freuen !!

Viele Grüße

[Markus K.]

Hallo alanblack,
ich bin mir nicht ganz sicher, aber du kannst es mal folgend versuchen.

Delphi-Quellcode:

var  ListItem: TListItem;
begin
     with ListView1 do
     begin
     ListItem:=Items.Add;
     ListItem.Caption:=Edit1.Text;
     end;
end;

Tschüß Markus

[Robert_G]

Das Beispiel erzeugt 2 Spalten (Edit & Memo).
Der Inhalt von Edit1 wird als ListItem angefügt und bekommt ein SubItem mit dem Inhalt von Memo1.

Delphi-Quellcode:

  With ListView1 Do
  Begin
    Columns.Clear;
    Columns.Add.Caption := 'Edit';
    Columns.Add.Caption := 'Memo';

    ShowColumnHeaders := True;
    ViewStyle := vsReport;

    With Items.Add Do
    Begin
      Caption := Edit1.Text;
      SubItems.Add(Memo1.Text);
    End;

  End;

[alanblack]

Hallo Robert,

ich glaub du hast mich falsch verstanden (liegt wohl an meiner Erklärung :lol: )
das beispiel habe ich nur gegeben das ihr mich besser versteht
eigentlich will ich das mit dem memo gar nicht ich habe auf meinem formular
1 Edit
1 Button
1 ListView

und jezt will ich das der text den man im Edit eingibt ins Listview erscheint (wenn man auf den Button klickt)
ich hoffe du verstehst was ich meine und hast dafür eine Lösung.
Achja und Markus dein code funzt leider irgentwie nicht :(

Mfg alanblack

[Markus K.]

Hmm.. komisch bei mir geht er hab ihn selber gerade versucht. Was kommt denn bei dir für ein Fehler?

Tschüß Markus

[Robert_G]

Das war einfach ein Beispiel mit dem ich dir gleich mehrere Möglichkeiten des Listviews erklären wollte.
Du solltest anhand des Codes eigentlich wissen, wie du es schaffst. Lasse doch einfach weg was du nicht brauchst.
Probier' es aber ruhig mal aus, vielleicht hilft es dir beim nächsten Projekt mit einem Listview. :wink:

[DP-Maintenance]

Dieses Thema wurde von "Daniel" von "Object-Pascal / Delphi-Language" nach "VCL-Komponenten und Controls" verschoben.

[huberlix]

Ich hab mal was ähnliches gemacht, quasi ein Eigabeformular, das auf Buttonklick in die Listview einträgt. Das waren dann mehrere Edits, und 2 Comboboxen.

Vereinbare in der Buttonclick die Variable: ListItem: TListItem;

Dann

Delphi-Quellcode:

with Form1.ListView1 do
  begin
    ListItem := Items.Add;
    ListItem.Caption := Edit1.Text;
    ListItem.SubItems.Add(Edit2.Text);
    ListItem.SubItems.Add(Combobox1.Text);
    ListItem.SubItems.Add(Edit4.Text);
    ListItem.SubItems.Add(Combobox2.Text);
    ListItem.SubItems.Add(Edit6.Text);
    ListItem.SubItems.Add(Edit7.Text);
  end;

Das wars.

Gruß, Bernd

[edit=Christian Seehase]Delphi-Tags gesetzt. Bitte künftig selber machen. Danke. Mfg, Christian Seehase[/edit]