Программа поиска ассоциаций

[megostudent]

(Delphi)
не могу понять как написать програмку такого типа:
мне нужно чтобы при вводе в едит1 например имя Вася в другом едите или же в мемо выводилося привязаное именно к его имени слово дура4ок, а например для Пети выводилося слово молодец,
тобишь при вводе в едит имени нажимая кнопочку в другом выводилося то слово которое привязано к его имени.
Благодарен за внимание.

[Pein95]

if edit1.text:='Вася' then edit2.text:='Дурачок'; во както так

[AlkaloiD]

как вариант вам что то похожие на БД надо, файл ну или как крайний вариант массив строк. В нем должно быть имя, и то что вы хотите дописать. Пример:
Вася - ударник,
Ваня - отличник.
А потом все просто, считываем слово или строку находим то что нам нужно, ищем по массиву находим совпадение и выводим )
как не крути придется проходить по массиву или файлу целиком (в худшем случае), при большом кол-ве данных замедляется работа.

[megostudent]

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

if edit1.text:='Вася' then edit2.text:='Дурачок'; во както так

ну да ток не мы имя 'Вася' не присваиваем) мы задаем значит просто = будет, а вот 'Дурачок' мы присваиваем)
Вообще можно кинуть какието данные в файл и с них потом запрашивать то что надо.
Ну а вот БД это тема ну я не знаю как в делфи создавать ее) так что как чайник пропишу все через if
Всем спасибо)

[MoBLer]

Как вариант что бы было легче можно через Case of
например:

case edit1.text of
'Вася': edit2.text:='Дурачок';
'Петя': edit2.text:='Отличник';
'Коля': edit2.text:='Хороший';
end;

и т.д

[megostudent]

Да немножко легче) но по строкам писать прийдется тотже обьем)

[Novi4ok_11]

Может лучше заполнить мемо или листбокс строками:
Вася дурачок
Петя молодец и т.д
А потом просто при нажатии на кнопку организовать поиск по первому слову в мемо или листбоксе(намного удобнее) а в едит2 поместить то что после первого слова

[Valio]

Самое (наверное) правильно это не использовать дополнительные компоненты, а работать напрямую с файлом.

Структура файла:

Вася=Дурак
Петя=Гей
Лёша=тоже гей
....

И делать с ним следующее:

1. Открыть фаил на чтение.
2. Считать строку.
- если мы дошли до конца то идём к пункту 6
3. Считать символы до знакоразделителя "="
4. Сравнить с Edit1
- Если совпадает, то считать остаток строки и занести в Edit2.
5. К пункту 2.
6. Завершение.

Вот так на вскидку.

[unbanned]

ну тогда можно два массива строковых создать, чё уж тут)))
грубо говоря:

s[7]:='Вася';
sa[7]:='Дурачок';
for i:=1 to n do
if s[i]=edit1.text then edit2.text:=sa[i];

[Smitt&Wesson]

Лучше всего сделать это через класс TIniFile.
Структура файла имеет следующий формат:
[Section]
Key=Name
--//--//--
Имя секции может быть название Вася, Петя и т.д.
Ключ может соответствовать, например, характеристика.
После знака "=" может стоять значение как в цифровой, так и в строчной форме.