![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
курсор на добавленной записи [D7, XP]
SerV © (2006-10-16 11:04:00)Добавляю запись при помощи формы как сделать что бы курсор становился на добавленную запись
ЮЮ (2006-10-17 03:36:00) [1]
> Я не подскажите что надо написать в процедуре при нажатии
> кнопки в форме добавления
см. [6]
У кнопки, подтверждающей запись:
if <данные заполненны и корректны> then
ModalResut := mrOK // это закроет форму и продолжится код из [6]
у кнопки отменяющей - установить в дизайне ModalResut какой нибудь другой, напр. mrCancel.
ceval (2006-10-16 15:41:00) [2]Я не подскажите что надо написать в процедуре при нажатии кнопки в форме добавления
Desdechado (2006-10-16 15:22:00) [3]AS - это AsString или AsInteger или Asчтотоеще
ceval (2006-10-16 15:21:00) [4][code] Dbgrid1.DataSource.DataSet.Fields[0].As:= Fadd.Edit2.Text;[/code]
возникает ошибка
[Error] Umain.pas(448): Identifier expected but 'AS' found
ceval (2006-10-16 13:46:00) [5]Спасиба сейчас поищу
ЮЮ (2006-10-16 12:00:00) [6]Это компоненты, предназначенные для работы с набороми данных, настроив свойства которых, можно обойтись без кодирования этого:
Dbgrid.DataSource.DataSet.Fields[...].as :=Fedit.dit2.Text;
ceval (2006-10-16 11:51:00) [7]>ЮЮ [6]
а что за компаненты DBAware ?
Dbgrid.DataSource.DataSet.Fields[имя поля или номер].
и если DBedit лежит на другой форме то тогда так Fedit.edit2.Text
ЮЮ (2006-10-16 11:43:00) [8]
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, что и грид
Sergey13 (2006-10-16 11:39:00) [9]> [4] Loginov Dmitry © (16.10.06 11:36)
Только перед этим датасет переоткрыть. Ибо нет там пока новой записи.
> [3] ceval © (16.10.06 11:29)
Что мешает добавлять записи методами самого датасета?
Loginov Dmitry (2006-10-16 11:36:00) [10]Dbgrid.DataSource.DataSet.Locate()
ceval (2006-10-16 11:29:00) [11]Вот так я добавляю 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 курсор стаял на добавленной строке
ЮЮ (2006-10-16 11:15:00) [12]Как он туда встанет, если её там нет? Она же на форме! Добавляй в форме в тот же датасет и курсор, естественно, будет на ней.
Dmitrij_K (2006-10-16 11:07:00) [13]Что куда добавляешь?