Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

данные поля на форме [D6, XP]


Страницы:   1 2

zergost ©   (2010-06-29 09:04:00) 

Всем доброго времени суток!!!  Есть ADOQuery с имеющимися в нём полями, так вот суть вопроса. Как перетащить (создать) данные поля на форме в момент активации запроса (или формы)

Сори за тупой вопрос ни как не могу догнать как это сделать…..


Leonid Troyanovsky   (2010-06-29 10:30:00) [21]


> zergost   (29.06.10 09:51) [7]

>    E:= tEdit.Create(TabSheet1);

В чем смысл эдита, если с датасетом он никак не связан?

--
Regards, LVT.


12   (2010-06-29 10:08:00) [22]

> лучше руками.

+1

И через ADOdataset :)


И. Павел   (2010-06-29 10:06:00) [23]

> [0] zergost   (29.06.10 09:04)

ИМХО, лучше руками. Если нужно - создать несколько представлений той же таблицы - стандартное, расширенное и т.д. А иначе выйдет все вперемешку, некрасиво, да и особой разницы от таблицы нет - врят ли это понравится пользователям.


zergost   (2010-06-29 10:03:00) [24]

Спасибо большое!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!


12   (2010-06-29 09:57:00) [25]

E:= tEdit.Create(  form1);
     E.Parent := TabSheet1;


zergost   (2010-06-29 09:52:00) [26]


>
> E.Show ?

где??


zergost   (2010-06-29 09:51:00) [27]

При таком коде он ведь должен создавать на панели TabSheet1, ведь так только ничего не происходит(((((

ADOQuery1.Open;
  if ADOQuery1.Bof <> ADOQuery1.Eof then
 begin
   for i:= 0 to ADOQuery1.FieldCount - 1 do
   begin
   E:= tEdit.Create(TabSheet1);
     E.Parent := TabSheet1;
     E.Top := 50 * i;
     E.Name := ADOQuery1.Fields[i].FieldName;
     E.Text := ADOQuery1.Fields[i].AsString;

 end;end;


RWolf   (2010-06-29 09:46:00) [28]


> 12 ©   (29.06.10 09:39) [5]

E.Show ?


12   (2010-06-29 09:39:00) [29]

var
i:integer;
E: tEdit;
begin
  ADOQuery1.Open;
  if ADOQuery1.Bof <> ADOQuery1.Eof then
  begin
    for i:= 0 to ADOQuery1.FieldCount - 1 do
    begin
      E:= tEdit.Create(form1);
      E.Parent := form1;
      E.Top := 50 * i;
      E.Name := ADOQuery1.Fields[i].FieldName;
      E.Text := ADOQuery1.Fields[i].AsString;
    end;
  end;
end;


zergost   (2010-06-29 09:37:00) [30]

Нет, таблица тоже присутствует, но бухи требуют именно поля то есть едиты и т.д.


Jeer   (2010-06-29 09:27:00) [31]


> Как перетащить (создать) данные поля на форме в момент активации
> запроса (или формы)
>


А таблицы недостаточно ?


zergost   (2010-06-29 09:22:00) [32]

ну можно сказать и так


12   (2010-06-29 09:20:00) [33]

сформировать контрлы по полям dataseta что ли?


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо