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

← →
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]

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

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

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

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

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

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

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

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

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