Ĺadny brzuch
Witam, mam w programie dwa listboxy i procedure:
var I:integer; begin for i:=ListBox1.Items.Count to 0 do begin ListBox2.Items.Add('Jakis tekst'); end
I mi tej pętli nie wykonuje mimo, że jak sobie przez showmessage
wyświetle ilość rekordów(ListBox1.Items.Count) to mi tą liczbe podaje.
Count jest liczba wpisów na liście ale numerowanie listy zaczyna sie od zera a kończy na liczbie wpisów - 1.
Druga rzecz - zmniejszanie w pętli for odbywa sie za pomocą downto (pewnie w helpie delphiowym takie rzeczy sa omówione przy okazji pętli for)
Czyli for i := ListBox1.Items.Count -1 downto 0 do
Czyli for i := ListBox1.Items.Count -1 downto 0 do Albofor i := 0 to ListBox1.Items.Count - 1 do<BR>(...)jak chcesz jechac od poczatku a nie od konca listy.
Pomysl na logike, ta petla wyglada tak:
od ListBox1.Items.Count /ktory wynosi powiedzmy 5/ przeskakuj w gore do 0 i wykonuj
(...)
Czy to jest logiczne?
Poznaj najpierw budowe petli i wlasciwosci komponentow. W tym drugim pomoze http://www.delphibasics.co.uk/ albo pomoc delphi.
heh, no racja nie pomyślałem. Dzięki za pomoc :)
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
var I:integer; begin for i:=ListBox1.Items.Count to 0 do begin ListBox2.Items.Add('Jakis tekst'); end
I mi tej pętli nie wykonuje mimo, że jak sobie przez showmessage
wyświetle ilość rekordów(ListBox1.Items.Count) to mi tą liczbe podaje.
Count jest liczba wpisów na liście ale numerowanie listy zaczyna sie od zera a kończy na liczbie wpisów - 1.
Druga rzecz - zmniejszanie w pętli for odbywa sie za pomocą downto (pewnie w helpie delphiowym takie rzeczy sa omówione przy okazji pętli for)
Czyli for i := ListBox1.Items.Count -1 downto 0 do
Czyli for i := ListBox1.Items.Count -1 downto 0 do Albofor i := 0 to ListBox1.Items.Count - 1 do<BR>(...)jak chcesz jechac od poczatku a nie od konca listy.
Pomysl na logike, ta petla wyglada tak:
od ListBox1.Items.Count /ktory wynosi powiedzmy 5/ przeskakuj w gore do 0 i wykonuj
(...)
Czy to jest logiczne?
Poznaj najpierw budowe petli i wlasciwosci komponentow. W tym drugim pomoze http://www.delphibasics.co.uk/ albo pomoc delphi.
heh, no racja nie pomyślałem. Dzięki za pomoc :)