Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

программа слайдшоу [D7, XP]


b86 ©   (2009-03-02 17:37:00) 

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

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


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


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

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


faiwer   (2009-03-02 22:18:00) [2]

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

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

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

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


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


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

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


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

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


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

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


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

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


clickmaker   (2009-03-02 17:50:00) [7]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо