Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.03.2015, 17:38   #1
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию Привязка имени к ссылке

Всем доброго дня!

Как сделать такое:

Имеется например 100 имен к каждому должно быть привязанно 2 ссылке, все эти имена есть в listboxe как при клике на любое имя открыть 2 эти ссылки которые к нему привязаны?
nibufep вне форума Ответить с цитированием
Старый 25.03.2015, 18:18   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

ИМХО самое время начать использовать базы данных )
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 26.03.2015, 00:34   #3
NIKOLAYY2
Форумчанин
 
Регистрация: 23.12.2014
Сообщений: 220
По умолчанию

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

Можно и так как к объекту:

Код:
ListBox1.Items.Objects
Но это немного сложнее будет. Поэтому думай сам как тебе проще.

Последний раз редактировалось NIKOLAYY2; 26.03.2015 в 00:42.
NIKOLAYY2 вне форума Ответить с цитированием
Старый 27.03.2015, 15:15   #4
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию

Цитата:
Сообщение от NIKOLAYY2 Посмотреть сообщение
Определяй просто по какой строке лист-бокса кликнул, соответственно читай и выводи этот же элемент массива или эту же строку из файла в лейбл, или куда ты там хотел.
Мне не известно в каком порядке будут идти имена
nibufep вне форума Ответить с цитированием
Старый 27.03.2015, 15:46   #5
Sibedir
Тот ещё
Старожил
 
Аватар для Sibedir
 
Регистрация: 14.11.2007
Сообщений: 2,242
По умолчанию

Если совсем по топорному, то:
1. Нам нужен тип "ссылки"
Код:
TLinks = class
  Link1: string;
  Link2: string;
end;
2. Добаление имени в список
Код:
ListBox1.Items.AddObject ('Вася', TLinks.Create);
3. Привязка к имени ссылок
Код:
  CurLink := TLinks(ListBox1.Items.Objects[ListBox1.Items.IndexOf('Вася')]);
  CurLink.Link1 := 'Ссыль 1';
  CurLink.Link2 := 'Ссыль 2';
4. Получение ссылок при клике
Код:
  CurLink := TLinks(ListBox1.Items.Objects[ListBox1.ItemIndex]);
  Edit1.Text := CurLink.Link1;
  Edit2.Text := CurLink.Link2;

Последний раз редактировалось Sibedir; 27.03.2015 в 15:48.
Sibedir вне форума Ответить с цитированием
Старый 27.03.2015, 19:18   #6
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию

а как через массив можно сделать?
nibufep вне форума Ответить с цитированием
Старый 27.03.2015, 19:49   #7
Sibedir
Тот ещё
Старожил
 
Аватар для Sibedir
 
Регистрация: 14.11.2007
Сообщений: 2,242
По умолчанию

Через какой массив?
Sibedir вне форума Ответить с цитированием
Старый 27.03.2015, 21:27   #8
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию

Я не работал раньше с массивами в Delphi, можно ли типа как в php сделал:

Код:
$myArray = array(
  array( "Сидоров", "LINK1", "LINK2" ),
  array( "Петров", "LINK1", "LINK2" )
);
Потом через array_search пройтись по фамилиям и открыть 2 ссылки.

Можно ли типа этого на делфи сделать?
nibufep вне форума Ответить с цитированием
Старый 27.03.2015, 21:40   #9
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,434
По умолчанию

делайте Только aray_search сами пишите.
Человек_Борща вне форума Ответить с цитированием
Старый 28.03.2015, 01:57   #10
northener
ПШП
Участник клуба
 
Регистрация: 15.07.2013
Сообщений: 1,926
По умолчанию

Цитата:
Сообщение от nibufep Посмотреть сообщение
Мне не известно в каком порядке будут идти имена
а как через массив можно сделать?
У класса TStrings есть замечательное свойство
Objects
Думаю оно поможет ОРД.
northener вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Привязка ladose Общие вопросы Delphi 8 16.02.2012 17:58
Привязка БД к С++ Отец Левонтий Обсуждение статей 1 03.08.2011 14:54
привязка. alex0097 Общие вопросы Delphi 5 26.07.2010 21:42
Определение имени файла по ссылке dimfil Общие вопросы C/C++ 0 05.03.2010 13:41
Привязка ben95 Общие вопросы Delphi 2 08.01.2008 22:53