Форум: "Базы";
Текущий архив: 2003.08.25;
Скачать: [xml.tar.bz2];

Вниз

как сделать кнопку   Найти похожие ветки 

← →
николай   (2003-07-30 12:32) [0]

Привет всем!Помогите пожайлуста написать процедуру добавления записи к кнопочке TBitBtn.У меня существует БД Access на Delphi7,
в ней есть компонент TPageControl на котором есть несколько вкладок,а на них по одной таблице TTable1,TTable2 и т.д.Я хочу чтобы при записи данных в Еdit1,Edit2 и т.д.(находятся за TPageControl)и нажатии кнопки TBitBtn(добавить),запись добовлялась в активную вкладку(таблицу).Помогите пожайлуста,очень нужно.Заранее благодарен.

---

← →
Плохиш   (2003-07-30 12:39) [1]

Кидаешь на форму TBitBtn, кликаешь на ней два раза (очень быстро) и в открывшемся редакторе пишешь всё, что хочешь.
Если не знаешь, что хочешь, то бежишь в ближайший книжный магазин и покупаешь книжку по программированию на Delphi.

---

← →
Соловьев   (2003-07-30 13:12) [2]

> николай (30.07.03 12:32)

вчера ты спрашивал как такое сделать с TEdit, и что? не получилось?

---

← →
SPIRIT   (2003-07-30 13:20) [3]


If pageControl1.TabIndex=0 then
begin
with AdoTable1 do
begin
insert;
fieldbyname("имя поля").value:=edit1.text;
post;
end;
end
else with AdoTable2 do
begin
insert;
fieldbyname("имя поля").value:=edit2.text;
post;
end;


а если работать не будет, то не беги за книжкой ,а задавай вопросы здесь на то он ФОРУМ

---

← →
ЮЮ   (2003-07-30 13:26) [4]

>есть компонент TPageControl на котором есть несколько вкладок,а на них по одной таблице TTable1,TTable2

Начнем с того, что TTable1,TTable2,... лежат на форме, на не на разных TabSheet-ах :-)

---

← →
SPIRIT   (2003-07-30 13:39) [5]

а по мне так лучше TTabControl и один TEdit

if tabControl.tabindex=0 then
begin
table1.insert;
table1.fiel....edit1.text;
table1.post;
end
else
begin
table2.insert;
table2.fiel....edit1.text;
table2.post;
end

если закладки конечно всего 2

---

← →
николай   (2003-07-30 13:47) [6]

на разных

---

← →
SPIRIT   (2003-07-30 13:54) [7]

НЕ СПРОРЬ... он не оюманывает .. так и есть
или же ты обращаешься Form1.PageControl1.Table1 ???????

---

← →
SPIRIT   (2003-07-30 13:58) [8]

ааа Николай имел в виду TDBgrid ..... ????? Да ??? а не TTable ... который этот тейбл и отображает так ведь..
т.е. на каждой вкладке по
в ней есть компонент TPageControl на котором есть несколько вкладок,а на них по одной таблице TTable1,TTable2 и т.д
по однолму DBGrid"у

---

← →
Плохиш   (2003-07-30 14:02) [9]

>SPIRIT © (30.07.03 13:58)
Ну так стоит ему за книжкой сбегать? ;-)

---

← →
SPIRIT   (2003-07-30 14:10) [10]

за огромной, толстой книгой которая начинается со слов:
"Нажмите кнопку на CD-ROM и вставьте установочный диск с Delphi7..." и т.д. ;-/

---

Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2003.08.25;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.009 c