Скачать: CL | DM;

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

← →
SerV   (2006-10-16 11:04) [0]

Добавляю запись при помощи формы как сделать что бы курсор становился на добавленную запись

---

← →
Dmitrij_K   (2006-10-16 11:07) [1]

Что куда добавляешь?

---

← →
ЮЮ ©   (2006-10-16 11:15) [2]

Как он туда встанет, если её там нет? Она же на форме! Добавляй в форме в тот же датасет и курсор, естественно, будет на ней.

---

← →
ceval ©   (2006-10-16 11:29) [3]

Вот так я добавляю Fadd

ADOQuery1.SQL.Text:="Insert into Doc Values("""+inttostr(key)+""","""+edit2.Text+""","""+combobox1.Text+""","""+combobox2.Text+""","""+edit1.Text+""","""+formatdatetime("yyyy/mm/dd",fadd.DateTimePicker1.DateTime)+""","""+newdir+""","""+edit3.Text+""","""+memo1.text+""")";
ADOQuery1.ExecSQL;

и как сделать что-бы потом на основной форме в Dbgride курсор стаял на добавленной строке

---

← →
Loginov Dmitry ©   (2006-10-16 11:36) [4]

Dbgrid.DataSource.DataSet.Locate()

---

← →
Sergey13 ©   (2006-10-16 11:39) [5]

> [4] Loginov Dmitry ©   (16.10.06 11:36)

Только перед этим датасет переоткрыть. Ибо нет там пока новой записи.

> [3] ceval ©   (16.10.06 11:29)
Что мешает добавлять записи методами самого датасета?

---

← →
ЮЮ ©   (2006-10-16 11:43) [6]

 Dbgrid.DataSource.DataSet.Insert;
 if <форма ввода/редактирования>.ShowModal = mrOk then begin
   Dbgrid.DataSource.DataSet.Fields[...].as := dit2.Text;
   ...
   Dbgrid.DataSource.DataSet.Post;
 end
 else
   Dbgrid.DataSource.DataSet.Cancel;
   
P.S. Поставь на форму DBAware сомпоненты, указав тот же DataSource, что и грид

---

← →
ceval ©   (2006-10-16 11:51) [7]

>ЮЮ [6]

а что за компаненты DBAware ?

Dbgrid.DataSource.DataSet.Fields[имя поля или номер].
и если DBedit лежит на другой форме то тогда так Fedit.edit2.Text

---

← →
ЮЮ ©   (2006-10-16 12:00) [8]

Это компоненты, предназначенные для работы с набороми данных, настроив свойства которых, можно обойтись без кодирования этого:
 Dbgrid.DataSource.DataSet.Fields[...].as :=Fedit.dit2.Text;

---

← →
ceval ©   (2006-10-16 13:46) [9]

Спасиба сейчас поищу

---

← →
ceval ©   (2006-10-16 15:21) [10]

[code]   Dbgrid1.DataSource.DataSet.Fields[0].As:= Fadd.Edit2.Text;[/code]
возникает ошибка
[Error] Umain.pas(448): Identifier expected but "AS" found

---

← →
Desdechado ©   (2006-10-16 15:22) [11]

AS - это AsString или AsInteger или Asчтотоеще

---

← →
ceval ©   (2006-10-16 15:41) [12]

Я не подскажите что надо написать в процедуре при нажатии кнопки в форме  добавления

---

← →
ЮЮ ©   (2006-10-17 03:36) [13]

> Я не подскажите что надо написать в процедуре при нажатии
> кнопки в форме  добавления


см. [6]
У кнопки, подтверждающей запись:

if  <данные заполненны и корректны> then
 ModalResut := mrOK  // это закроет форму и продолжится код из [6]

у кнопки отменяющей - установить в дизайне ModalResut какой нибудь другой, напр. mrCancel.

---

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

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.028 c