Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 14.04.2010, 11:23
Handycam Handycam вне форума
Прохожий
 
Регистрация: 14.04.2010
Адрес: Екатеринбург
Сообщения: 22
Репутация: 10
По умолчанию Поиск по таблице (проблемка)

Добры день всем! Попалась вот такая задачка:
Цитата:
Выполнить поиск в таблице заданного в Edit элемента и его номер. Результат поиска вывести в Label

Таблица будет состоять из Модели телефона и его ID номера. Т.е. как я понял мы в Edit пишем например "Nokia 6600" нажимаем enter или делаем кнопку с кодом выполнить поиск и все это дело высвечивается в Label. Так же делаем второй Edit для ID номера и например вводим "1" и опять enter или кнопка и все.

Исходники есть разные но там такая каша что головоа кругом... Ребят подскажите пожалуйста может статейка есть на создание такой вещи... или кто сам делал недавно. Большое спасибо

P.S. - кода поиска по таблицам к сожелению нет. Таблица может быть привязана BDE или просто самую простую сделать без всяких привязок просто заполнить и все
Ответить с цитированием
  #2  
Старый 14.04.2010, 13:02
Handycam Handycam вне форума
Прохожий
 
Регистрация: 14.04.2010
Адрес: Екатеринбург
Сообщения: 22
Репутация: 10
По умолчанию

Вот исходник с привязаной таблицей его бы подправить под задачку
Вложения
Тип файла: rar Лаб_раб_12.rar (7.0 Кбайт, 13 просмотров)
Ответить с цитированием
  #3  
Старый 14.04.2010, 21:07
Xoxol_116Rus Xoxol_116Rus вне форума
Прохожий
 
Регистрация: 08.04.2010
Сообщения: 22
Репутация: 10
По умолчанию

поиск лучше через Query сделать, единственно что будет вопрос с SQL-запросом. щелкни правой по Query - SQL Builder
с поиском то не трудно, а вот чтобы выводил номер - если только проверка по циклу. Завтра на работе проверю цикл - вечером отпишусь, если получится.
Ответить с цитированием
  #4  
Старый 17.04.2010, 06:38
Handycam Handycam вне форума
Прохожий
 
Регистрация: 14.04.2010
Адрес: Екатеринбург
Сообщения: 22
Репутация: 10
По умолчанию

ок! Вот смотри как сделал... Может доработать можно? Чтоб по приличней было
Вложения
Тип файла: rar Задача.rar (8.1 Кбайт, 13 просмотров)
Ответить с цитированием
  #5  
Старый 17.04.2010, 08:01
Xoxol_116Rus Xoxol_116Rus вне форума
Прохожий
 
Регистрация: 08.04.2010
Сообщения: 22
Репутация: 10
По умолчанию

Через DBGrid1.Columns[i].Title поменяй названия столбцов)
Я думаю твоему преподу понравится такая мулька
Ответить с цитированием
  #6  
Старый 18.04.2010, 20:28
Handycam Handycam вне форума
Прохожий
 
Регистрация: 14.04.2010
Адрес: Екатеринбург
Сообщения: 22
Репутация: 10
По умолчанию

Всмысле поменять? А че изменится? Просто не понимаю пока))))))
Ответить с цитированием
  #7  
Старый 18.04.2010, 20:34
Handycam Handycam вне форума
Прохожий
 
Регистрация: 14.04.2010
Адрес: Екатеринбург
Сообщения: 22
Репутация: 10
По умолчанию

Не помню еще как по enter сделать, чтоб нажал enter и выпала нужна строка... И Чтобы маркер закрашивал при введении нужной модели - строчку с этой моделью.. Не подскажешь?
Ответить с цитированием
  #8  
Старый 23.04.2010, 23:09
Skarabey Skarabey вне форума
Прохожий
 
Регистрация: 23.03.2010
Сообщения: 5
Репутация: 10
По умолчанию

По нажатию Enter выполнит всё что хочеш
Код:
  if Key = VK_RETURN then
Установи к примеру в Edit на эвент OnKeyDown

Последний раз редактировалось Skarabey, 23.04.2010 в 23:11.
Ответить с цитированием
  #9  
Старый 24.04.2010, 09:21
Xoxol_116Rus Xoxol_116Rus вне форума
Прохожий
 
Регистрация: 08.04.2010
Сообщения: 22
Репутация: 10
По умолчанию

Цитата:
Сообщение от Handycam
Всмысле поменять? А че изменится? Просто не понимаю пока))))))

Через эту команду можно поменять дизайн подписей столбцов - преподы любят такую ерунду

Цитата:
Сообщение от Handycam
И Чтобы маркер закрашивал

Вот тебе ссылка - в этой проге много исходников - там и окраска записи присутствует
http://depositfiles.com/files/z0e174ygp

Последний раз редактировалось Xoxol_116Rus, 24.04.2010 в 09:25.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 15:40.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter