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

Delphi Sources



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

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 21.03.2010, 23:57
svyazist svyazist вне форума
Прохожий
 
Регистрация: 21.03.2010
Сообщения: 1
Репутация: 10
По умолчанию DBGRID(i)

Уважаемые форумчане. Прошу вас помочь мне в разрешении следующего вопроса. На форме есть много grid. Мне нужно чтобы при выборе в гриде строки и нажатии некой кнопки происходило отображение рисунка соответствующего значения. Для того чтобы постоянно не писать громоздкий код хотелось использовать значение типа DBGRID(i) возможно ли такое? Или есть какой то другой способ решить эту проблему. Заранее благодарен.
Ответить с цитированием
  #2  
Старый 22.03.2010, 11:07
Аватар для TOJluK
TOJluK TOJluK вне форума
Местный
 
Регистрация: 25.02.2009
Адрес: Минск
Сообщения: 551
Версия Delphi: 2007
Репутация: 110
По умолчанию

Есть у кого какие- нибудь догадки о чем хотел спросить автор?
Ответить с цитированием
  #3  
Старый 22.03.2010, 18:20
AlexSku AlexSku вне форума
Специалист
 
Регистрация: 07.05.2007
Адрес: Москва
Сообщения: 884
Репутация: 21699
По умолчанию

У Borland есть классический пример (в папке Demos\Db\FishFact). Гуляешь по таблице и видишь новые рисунки рыбок (без нажатия кнопки).
Ответить с цитированием
  #4  
Старый 22.03.2010, 23:06
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,721
Репутация: 52347
По умолчанию

Вариантов того что хотел автор довольно много, вот один из них:

Код:
...
Type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    Grids: Array[1..10] of TDBGrid;
  end;

procedure TForm1.FormCreate(Sender: TObject);
begin
 for i := 1 to 10
 do begin
     Grid[i] := TDBGrid.Create(Form1);
     Grid[i].Parent := Form1;
     end;
end;
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием
Ответ


Delphi Sources

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

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

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

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


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


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

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

ВКонтакте   Facebook   Twitter