Форум: "Начинающим";
Текущий архив: 2006.05.28;
Скачать: [xml.tar.bz2];
ВнизЦикл. В чем разница? Найти похожие ветки
← →
jenya_rus (2006-05-13 23:49) [0]пожалуйста разъясните ф чем разница?
until FileListBox1.Items.Count = 0;
until FileListBox1.Items.Count = -1;
until FileListBox1.Items.Count = 1;
← →
Мефисто (2006-05-13 23:56) [1]Разница в цифрах 0, -1, 1
P.S.
Напрягаю телепатические способности и не могу понять в чем суть вопроса...
← →
jenya_rus (2006-05-14 00:00) [2]хорошо...подругому =)...
что изменится в цикле если там будет стоять 1, 0, или -1 ???
← →
palva © (2006-05-14 00:08) [3]Цикл будет заканчиваться, если Count будет равен 1, 0, или -1
← →
jenya_rus (2006-05-14 00:53) [4]гы...а в каком случае в файллистбоксе будет значение 0,1 или -1 ??? =\
В чем суть короче: обрабатываются поочереди файлы из файл лист бокса...а переход к следующему файлу не придумал я иначе как программное нажатие клавиши Vk_Down...если кто знает подскажите может можно както без изврата с vk_down =))
← →
Шпиён (2006-05-14 01:03) [5]что значит - "обрабатываются"?
← →
alex-drob © (2006-05-14 01:05) [6]
> гы...а в каком случае в файллистбоксе будет значение 0,1
> или -1 ???
0 когда нет записей.
1 когда в listbox есть одна запись.
-1 не бывает (я так думаю). -1 бывает у itemindex - это значит не одна строка не выделенна.
> В чем суть короче: обрабатываются поочереди файлы из файл
> лист бокса...а переход к следующему файлу не придумал я
> иначе как программное нажатие клавиши Vk_Down...если кто
> знает подскажите может можно както без изврата с vk_down
> =))
filelistbox1.ItemIndex:=filelistbox1.ItemIndex+1;
← →
Шпиён (2006-05-14 01:07) [7]
var i:integer;
begin
for i:=0 to FileListBox1.Items.Count-1 do
// пародия на "обработку"
Memo1.Lines.Add(FileListBox1.Items[i]);
end;
← →
alex-drob © (2006-05-14 01:07) [8]кстати если нужно просто брать путь к файлу то не обязательно переходить в filelistbox к строке с именем файла
filelistbox1.items[ index ] - где index номер строки с 0
← →
jenya_rus (2006-05-14 01:13) [9]2Шпиён
>>что значит - "обрабатываются"?
Ну короче это сортировщик файлов...
2alex-drob
>>-1 не бывает (я так думаю).
Знаешь фиг его знает по ходу бывает =)))
← →
jenya_rus (2006-05-14 01:15) [10]2Шпиён
var i:integer;
begin
for i:=0 to FileListBox1.Items.Count-1 do
// пародия на "обработку"
Memo1.Lines.Add(FileListBox1.Items[i]);
end;
нет лучше так =)))var i:integer;
begin
repeat
// пародия на "обработку"
until FileListBox1.Items.Count-1 );
← →
jenya_rus (2006-05-14 01:22) [11]Ребята как мона подсчитать количество файлов в файл лист боксе и экспортировать в Edit или Memo???
← →
alex-drob © (2006-05-14 01:23) [12]edit1.text:=inttostr(FileListBox1.Items.Count)
← →
jenya_rus (2006-05-14 01:24) [13]вери сенкс
← →
jenya_rus (2006-05-14 01:51) [14]как сбацать until FileListBox1.последний_выделенный_файл ????
чтоб было _до последнего выделенного файла?_
← →
Германн © (2006-05-14 02:08) [15]
> for i:=0 to FileListBox1.Items.Count-1 do
> // пародия на "обработку"
> if FileListBox1.Items.Selected[i] then Memo1.Lines.Add(FileListBox1.Items[i]);
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.05.28;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.009 c