[Gangsterus]

У меня такая тема....мне задали сделать автокаталог в делфи...ну в основном чтобы были формы и как бы на них присутствовали фотографии авто и краткие характеристики...и можно было выбирать модель автомобиля...думал все не как не могу придумать как мне сделать...помогите пожалуйста взарание буду очень благодарен =)

[Vayrus]

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

[Gangsterus]

Вид - чтобы на форме были как бы кнопки : выход,просмотр каталога авто,и галерия ....формат все равно какой имена тоже.Хранение описаний тоже без раницы главное чтобы рядом была фото...наприме ВАЗ-2106 фотка...и слева описание мощность двигателя...итд.мне хотя б сам исходник как бы...а инфу я сам вобью всю...

[lmikle]

Вопросы:
1. Тебе обязательно в БД все хранить или можно просто на файловой структуре?
2. Какая структура описания? Просто текст или нужно форматирование какое-то?

[Gangsterus]

1.Можно просто на файловой структуре,т.к это проще намного...
2.Всмысле форматирование?это допустим будет описание одного авто там будет информация...щелкну допустим сл.авто она уберется появится инфа другого авто...я так понял?Ну или смотри сам как удобнее ...

[lmikle]

1. Я, естественно, не собираюсь делать за тебя твою работу. Ну по крайней мере бесплатно
2. Тогда все просто. Складываешь файлики в подкаталог. Причем имена файлов с картикой и с соотв. текстом совпадают, за исключением расширения. При старте проги сканируешь папку за файлами, составляешь список. Далее выводишь на форме картинку и текст. По кнопкам меняешь. Все. Если есть желание обсудить передачу заказа, то пиши в личку.

[Vayrus]

М-да, вот халявный заработок Если уж сам не осилишь написание такой простой программы, то бабки тебе в руки, вернее в руки того кто ее будет делать

[AlexSku]

Запусти проект fishfact из папки \Demos\Db\FishFact (ни одной строчки кода, только подключение к БД).

[lmikle]

Ну, для начала, можно и так.
Потом же человеку захочется больших возможностей.
Не считая того, что, если мне не изменяет память, этот пример написан через BDE, а тащить эту хреновину нынче не комильфо.

Я бы сделал какую-нить структурку описания и файлы на диске.

[Vayrus]

Сообщение от lmikle

Ну, для начала, можно и так.
Потом же человеку захочется больших возможностей.
Не считая того, что, если мне не изменяет память, этот пример написан через BDE, а тащить эту хреновину нынче не комильфо.

Я бы сделал какую-нить структурку описания и файлы на диске.

Ага, не козырно
Короче сделай так:
Создай папку "AUTO", в нее закидывай папки с маркой авто (н-р, "BMW 5 серии"), в свою очередь в эти же папки закинь фото авто ("BROWSE.JPG") и текстовое описание ("README.TXT"). Теперь в Delphi на форму кинь ListBox, Image и Memo, расположи их так как тебе надо. В OnCreate формы добавь поиск и добавление в ListBox имен подкаталогов каталога AUTO. На обработчик клика по ListBox повесь примерно следующий код:

Код:

Memo1.Lines.LoadFromFile(ExtractFilePath(ParamStr(0)) + ListBox1.Items.Strings[ListBox1.ItemIndex] + '\README.TXT'); 
Image1.Picture.LoadFromFile(ExtractFilePath(ParamStr(0)) + ListBox1.Items.Strings[ListBox1.ItemIndex] + '\BROWSE.JPG'); 

В USES добавь JPEG, возможно, понадобится проверка при выборе элементов из списка, чтобы не выскакивала ошибка о выходе значения за рамки диапозона.

[Gangsterus]

Сообщение от Vayrus

Ага, не козырно
Короче сделай так:
Создай папку "AUTO", в нее закидывай папки с маркой авто (н-р, "BMW 5 серии"), в свою очередь в эти же папки закинь фото авто ("BROWSE.JPG") и текстовое описание ("README.TXT"). Теперь в Delphi на форму кинь ListBox, Image и Memo, расположи их так как тебе надо. В OnCreate формы добавь поиск и добавление в ListBox имен подкаталогов каталога AUTO. На обработчик клика по ListBox повесь примерно следующий код:

Код:

Memo1.Lines.LoadFromFile(ExtractFilePath(ParamStr(0)) + ListBox1.Items.Strings[ListBox1.ItemIndex] + '\README.TXT'); 
Image1.Picture.LoadFromFile(ExtractFilePath(ParamStr(0)) + ListBox1.Items.Strings[ListBox1.ItemIndex] + '\BROWSE.JPG'); 

В USES добавь JPEG, возможно, понадобится проверка при выборе элементов из списка, чтобы не выскакивала ошибка о выходе значения за рамки диапозона.

Блин сделал вроде все правильно а ни че не работат.. ((( Можешь пожалуйста собрать сам,заархивировать и прикрепить...у меня не получается...спасибо взарание!