Форум программистов, компьютерный форум, киберфорум
Delphi: FireMonkey
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
0 / 0 / 0
Регистрация: 13.12.2011
Сообщений: 120
1

Какие компоненты в Делфи XE7 нужны для вывода ленты новостей?

25.03.2016, 20:29. Просмотров 903. Ответов 7
Метки нет (Все метки)

Доброго времени суток!) Хочу написать приложение под Андроид на Делфи XE7 которое будет показывать все интересные события в нашем городе.

Но тут же наткнулся на проблему. Как реализовать вывод ленты новостей в Делфи XE7? Я не про коннект с серверами БД в инете, не про создание и редактирование этой самой БД...

Мне нужен конечный итог: Иконки, текст, картинки, ссылка "Подробнее" и т.д.
Ну вот как в ВК приложении показывает ленту новостей... вот так же.

Какие компоненты для этого использовать?

Заранее благодарен за ответ))
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.03.2016, 20:29
Ответы с готовыми решениями:

Альфа скины для Делфи XE7
Где скачать? И есть тутор как устанавливать? Если качаю с офф сайта, архив запароленный!

Какие компоненты нужны для бота?
Хочу написать многопоточного бота на c# для вк с поддержкой прокси и антикапчей. Но нету знаний...

Авторизация в ВК: какие нужны для этого компоненты
Как можно авторизоваться в ВК? Какие компоненты для этого нужны? Сорри, с делфи перешел.

DevExpress: какие компоненты помимо Framework нужны для распространения приложения
Вот я программу написал на DevExpress и на другом компьютере решил проверить , запустится ли она...

7
4215 / 3504 / 1187
Регистрация: 14.04.2014
Сообщений: 16,773
Записей в блоге: 17
25.03.2016, 21:11 2
listView
https://www.youtube.com/watch?v=XRj3qjUjBlc
0
0 / 0 / 0
Регистрация: 13.12.2011
Сообщений: 120
26.03.2016, 15:13  [ТС] 3
Разве ListView позволит сделать такое?

Какие компоненты в Делфи XE7 нужны для вывода ленты новостей?


Вытащить данные из БД в принципе есть понимание как. Не думаю что это будет сложно. Только вот какие компоненты стоит использовать, чтобы могли позволить такое как на рисунке. Если ListView такое может, подскажите как именно. А то на видео показано совсем другое
0
4215 / 3504 / 1187
Регистрация: 14.04.2014
Сообщений: 16,773
Записей в блоге: 17
26.03.2016, 17:51 4
на при создании listItem вызывается событие OnUpdateObjects
там можно создавать любые объекты
Кликните здесь для просмотра всего текста
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
procedure TfrmInventoryContent.lstItemsUpdateObjects(const Sender: TObject; const AItem: TListViewItem);
var
  TextLabel: TListItemText;
begin
  //Add objects per item in list view for displaying more info
 
  //Item Price Label
  TextLabel := AItem.Objects.FindObject('lblPrice') as TListItemText;
  if TextLabel = nil then begin
    TextLabel:= TListItemText.Create(AItem);
    TextLabel.Name:= 'lblPrice';
    TextLabel.Align:= TListItemAlign.Trailing;
    TextLabel.VertAlign:= TListItemAlign.Leading;
    TextLabel.TextAlign:= TTextAlign.Trailing;
    TextLabel.PlaceOffset.X:= -10;
    TextLabel.PlaceOffset.Y:= 4;
    TextLabel.Font.Size:= 14;
    TextLabel.Width:= 60;
    TextLabel.Height:= 18;
    TextLabel.Text:= '';
    TextLabel.TextColor:= TAlphaColorRec.Green;
  end;
  //Item Quantity Label
  TextLabel := AItem.Objects.FindObject('lblQty') as TListItemText;
  if TextLabel = nil then begin
    TextLabel:= TListItemText.Create(AItem);
    TextLabel.Name:= 'lblQty';
    TextLabel.Align:= TListItemAlign.Trailing;
    TextLabel.VertAlign:= TListItemAlign.Leading;
    TextLabel.TextAlign:= TTextAlign.Trailing;
    TextLabel.PlaceOffset.X:= -120;
    TextLabel.PlaceOffset.Y:= 4;
    TextLabel.Font.Size:= 14;
    TextLabel.Width:= 30;
    TextLabel.Height:= 18;
    TextLabel.Text:= '';
    TextLabel.TextColor:= TAlphaColorRec.Blue;
  end;
end;


Добавлено через 1 минуту
но я бы забанил картинку прямо за мат
не верю я, что человек, когда постит что-то в публичный доступ, совсем не думает
0
0 / 0 / 0
Регистрация: 13.12.2011
Сообщений: 120
27.03.2016, 11:47  [ТС] 5
Спасибо большое!)) Я с текстом разобрался, правда не понимаю одно. Как вызвать событие OnUpdateObjects?
Например, чтобы сработало событие OnClick надо нажать, OnCreate- это при создании объекта, OnChange при его изменении. А что надо сделать чтобы OnUpdateObjects сработало?

P.S. Вопрос может несколько глупый, но с такими событиями (Events) я никогда не встречался

Добавлено через 24 минуты
Думал, может это событие активируется простым добавлением нового компонента, но нет... ListView1.Items.Add; не помог(((
0
4215 / 3504 / 1187
Регистрация: 14.04.2014
Сообщений: 16,773
Записей в блоге: 17
27.03.2016, 13:46 6
события - это механизм вызовов т.н. callback, вы говорите программе, какую вашу процедуру вызвать при каком-то событии, она и вызывает
так что от вас ничего более не требуется, кроме как повесить обработчик на событие OnUpdateObjects у ListView

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

Добавлено через 1 минуту
именно в момент List.Items.Add это событие и будет вызвано
0
0 / 0 / 0
Регистрация: 13.12.2011
Сообщений: 120
27.03.2016, 15:31  [ТС] 7
Ну я так полагаю что внутри Item в ListView картинку не создашь. Только текст. И уж тем более я потестировал, не получается вставить туда текст, чтобы он блоками отображался вместе с картинкой. Только строчка и иконка

Если я неправ, подскажите, как поставить туда объемный текст с картинкой.

Заранее благодарен)

Добавлено через 35 минут
В голове родился такой вариант. Использовать Rectangle. Туда Image View закинуть и Label с Memo. Красиво все оформить и потом программно создавать все это как только в базе данных появится новая запись. Как вам это решение? Деревянно, грубо, но по моему эффективно...
0
4215 / 3504 / 1187
Регистрация: 14.04.2014
Сообщений: 16,773
Записей в блоге: 17
27.03.2016, 16:56 8
что такое объемный текст?

есть готовые TListItemText, картинка - TListItemImage
в примере на youtube показано как создать вообще свой собственный новый элемент ListItem
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.03.2016, 16:56

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Плагин ленты новостей для рубрики (WordPress)
Здравствуйте. В конкретной рубрике на сайте нужно создать ленту новостей, примерно как в твиттере...

Какие компоненты нужны, чтобы программа работала в сети?
какие компоненты нужны на форм1 чтобы программа работала в сети а конкретнее на сайте одном?

Подскажите, какие компоненты нужны, чтобы выводилось вот такое окно.
подскажи какие компаненты нужны, чтобы выводилась вот такое окно

Нет компоненты frxMailExport в FastReport 5 для Delphi XE7
Здравствуйте, кто нибудь сталкивался с такой проблемой: Работала автоматическая отправка почты...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.