Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Центр помощи > Задача - вопрос


Автор: Япончик 8.10.2005, 14:33
Вот такой вопрос:
Я хочу задачу сделать, чтобы при вводе мной слова мне выводился рисунок. Каждому слову соответствует 1 рисунок ну и так далее. Вот я пишу в, пускай, TEdit слово "рука", жму на Button и мне отображался рисунок той же руки, пускай. ....
Пускай TEdit, Button и что-то еще (TImage (никогда не использовал, не уверен, что именно с ним это проделать можно, догадываюсь))....
Как такое сделать? При помощи каких компонентов?

Автор: mvdr 8.10.2005, 15:12
image тут нужен.
а так вроде все просто: (предлагаю ресурсотребовательный вариант, но проще всего)
Код

if Edit1.text='рука' then Image1.Visible:=true;
if Edit1.text='голова' then Image2.Visible:=true;
... 

Это все в обработчик onclick на button


Автор: Япончик 8.10.2005, 16:15
Цитата
image тут нужен.
а так вроде все просто: (предлагаю ресурсотребовательный вариант, но проще всего)
Код

if Edit1.text='рука' then Image1.Visible:=true;
if Edit1.text='голова' then Image2.Visible:=true;
... 

Это все в обработчик onclick на button

а какой синтаксис у компонента ImageList? как с его помощью это сделать? я понял, как с помощью Image это сделать, но у меня большее 1500 рисунков будет...
что делать?

Автор: SoWa 8.10.2005, 19:21
Код

case Edit1.text of
'Text1' : Image1.picture:=Imagelist1.....
'Text2' : Image1.picture:=Imagelist1.....
'Text3' : Image1.picture:=Imagelist1.....
...
'TextN' : Image1.picture:=Imagelist1.....

Про ImageList в раздел Дельфи: Общие вопросы

Автор: Pakshin A. S. 8.10.2005, 20:56
smile smile
SoWa
Эх... нехорошо... smile
На твой пост есть очень хорошая рекомендация: прежде чем писать - проверь. smile
Тут есть ошибка, а именно использование структуры case с переменными строкового типа, что запрещено не только компилятором, но и теорией паскаля и его производных...
smile
Если это - новая примочка, то поясни в какой Дельфи она работает... smile

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)