Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Luckie,
12. Jan 2010
Na da fehlt ein then. Und wie gesagt, der Code war so aus der Hüfte geschossen. Du musst mal gucken, was man an der Stelle für eine Eigenschaft nehmen muss. Ich habe die Eigenschaften eines Listviews nicht mehr so im Kopf.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Luckie,
12. Jan 2010
Ungetestet:
if Listview1.SelCount> 1 then
begin
for i := 0 to listview1.Items.Count - 1 do
begin
if listview1.Selected do
begin
Form3.Create(self);
Form3.Show;
Form3.Caption:= listview1.Selected.SubItems.Strings;