ich hab das gefühl das du einfach ein Begin-End vergessen hast. Zumindest lässt deine Einrückung darauf schließen. So müsste die Einrückung eigentlich aussehen
Delphi-Quellcode:
for i:=0 to dlfilelist.Items.Count-1 do begin
if dlfilelist.Items.Item[i].Checked = true then
form2.ws.Lines.Add(fetttags.Text+dlfilelist.Items[i].Caption+fetttage.Text);
form2.ws.Lines.Add(wstags.Text+dlfilelist.Items[i].SubItems[1]+wstage.Text);
end;
form2.Show;
end;