Autor Beitrag
F.Art
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 434



BeitragVerfasst: Mo 21.02.05 02:30 
ausblenden Delphi-Quelltext
1:
for i := 0 To FilmeListe.Items.Count-1 Do if assigned(FilmeListe.Selected) then WriteLn(Zeile,FilmeListe.Items[i].caption + '   (Format: '+ FilmeListe.Items[i].SubItems[0] + ')');					

So macht er alle Zeilen, aber ich möchte das er nur die markierten Zeilen übernimmt.
Wie müsste das aussehen?

Moderiert von user profile iconAXMD: Code- durch Delphi-Tags ersetzt und überflüssige Absätze aus dem Code entfernt.
Moderiert von user profile iconTino: Topic aus Sonstiges verschoben am Mo 21.02.2005 um 13:17
Sprint
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 849



BeitragVerfasst: Mo 21.02.05 02:54 
ausblenden Delphi-Quelltext
1:
2:
3:
  for I := 0 to FilmeListe.Items.Count - 1 do
    if FilmeListe.Items[I].Selected then
      Writeln(FilmeListe.Items[I].Caption + '   (Format: '+ FilmeListe.Items[i].SubItems[0] + ')');

_________________
Ciao, Sprint.