Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Bummi,
14. Jan 2013
M*** ... ich habe die letzte bzw. vorletzte Zeile übersehen ... :thumb:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Bummi,
14. Jan 2013
Hi @Volker, jetzt darf man gespannt sein ob Deine den Anforderungen entsprechende, oder meine den erwarteten Ausgaben folgende Umsetzung gemeint war.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Bummi,
14. Jan 2013
procedure TForm1.Button2Click(Sender: TObject);
Var
I:Integer;
begin
for I := 0 to ListView1.Items.Count - 1 do
begin
Memo1.Lines.Add(ListView1.Items.Caption) ;
Memo1.Lines.AddStrings( ListView1.Items.SubItems);
Memo1.Lines.Add('');
end;