Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.04.19;
Скачать: CL | DM;

Вниз

программа слайдшоу   Найти похожие ветки 

 
b86   (2009-03-02 17:37) [0]

Драсте. Мне нужно сделать программу для слайд шоу. В одной книжке я нашёл как это сделать, но получилось что вернуться назад(на предыдущий слайд) она не может.
procedure NextPicture();
var
r:integer;
begin
aFile:=aPath + aSearchRec.Name;
Form1.Image1.Picture.LoadFromFile(aFile);
r:=FindNext(aSearchRec);
end;

я попробовал в FindNext заменить на FindPrev (самый хитрый же!), но не фига не фурычит. а очень хочется чтоб за фурычило! что делать?


 
clickmaker ©   (2009-03-02 17:50) [1]

хм... а составить список файлов, хотя бы в стринглисте, не приходило в голову?


 
b86   (2009-03-02 18:05) [2]

я не знаю, что такое стринглист.
можно переписать эту процедуру чтобы он шёл назад? если нельзя, то так и скажите. всего делов.


 
Рамиль ©   (2009-03-02 18:10) [3]

Запоминай пути ко всем показанным файлам.


 
clickmaker ©   (2009-03-02 18:12) [4]

стринглист - это TStringList
у него есть метод Add. И в цикле, вызывая FindNext, можно его заполнить. А потом уже ходить по нему взад-вперед, используя свойство Strings


 
Плохиш ©   (2009-03-02 18:48) [5]


> b86   (02.03.09 18:05) [2]
>
> я не знаю, что такое стринглист.

Тогда стоит начать с основ выбранного языка программирования и среды разработки. Попробовать написать программу "HelloWorld".


 
faiwer ©   (2009-03-02 22:18) [6]

b86 cрочно изучить следующие вещи

1 циклы - while, repeat, for
2 условия - if then else
3 операторы - and or not
4 типы основных переменных, хотя бы integer, string
4 иметь понятия об ООП
5 изучить TStringList и TImage

если это всё делать лень - то не стоит вообще браться за это дело.. поменяв пару буковок программа не изменится =) программирование это состояние души - нравится - надо учить и будет интересно.. не нравится? не забивай себе голову дурью

сорри если сурово =)


 
Германн ©   (2009-03-03 00:34) [7]


> b86   (02.03.09 17:37)
>
> Драсте. Мне нужно сделать программу для слайд шоу.

Что значит нужно?
Тебя заставили или ты сам этого хочешь без всякого принуждения?



Страницы: 1 вся ветка

Текущий архив: 2009.04.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.031 c
15-1234964100
@!!ex
2009-02-18 16:35
2009.04.19
ICQ опять уронили?


2-1236178765
Artem
2009-03-04 17:59
2009.04.19
EhLib, OnKeyDown


2-1236178443
BeeHead
2009-03-04 17:54
2009.04.19
Установка компонент


15-1234906202
Юрий
2009-02-18 00:30
2009.04.19
С днем рождения ! 18 февраля 2009 среда


15-1234596212
Palladin
2009-02-14 10:23
2009.04.19
Декларирование указателя в Си