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

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

прямая запись в БД [D6, WinXP]


Trad ©   (2003-12-22 06:47:00) 

как напрямую записать значение в базу данных (pardox),
допустим при её заполнении через форму? т.е. Одни поля заполняются через элементы Data Control а другие должны заполниться после нажать я на Button в обработчике которой должна содержаться запись "присвоить полю такому-то := значение такое-то).


ЮЮ   (2003-12-23 03:11:00) [1]

ну а если до второго так и не додумался, то поменяй местам левую и правую часть :-)


Trad   (2003-12-23 01:22:00) [2]

до однога сам додумался:
Form1.Table1.FieldByName("Datez").AsDateTime:= Form1.DateTimePicker2.date;


Trad   (2003-12-23 00:59:00) [3]

как из DateTimePicker за нести в БД? и ноборот, чтобы датаиз БД отображалась в DateTimePicker?

Form1.Table1.Edit;
Form1.Table1.FieldByName("Datez").AsString:=Form1.DateTimePicker2.text; - не работает
Form1.Table1.Post;


Shirson   (2003-12-22 08:20:00) [4]

>Trad (22.12.03 07:54) [6]
>попробовал я эту 1-цу в кавычки взять - нифига.


TDBComboBox.Items - это TStrings, а не String.


Trad   (2003-12-22 08:12:00) [5]

Yahooooo работает. ну пока вопросов не будет. мне пора в колледж идти. сегодня вечером ждите.


ЮЮ   (2003-12-22 08:01:00) [6]

Кстати, в TDBComboBox можно вносить значения и не из списка, с чем тогда сравнивать будешь? В общем случае, наверно, можно так:
if DBComboBox2.Items.IndexOf(DBComboBox2.Text) = 1


Trad   (2003-12-22 07:54:00) [7]

попробовал я эту 1-цу в кавычки взять - нифига.


ЮЮ   (2003-12-22 07:50:00) [8]

TDBComboBox.Items - это TStrings. Как , спрашивается, это можно сравнить с 1 ?


Trad   (2003-12-22 07:43:00) [9]

кажись понял с предыдущим, а вот ту в чём ошибка:
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
if DBComboBox2.Items=1 then begin //здесь ошибку выкидывает
Table1.Edit;
Table1.FieldByName("Srok").AsInteger:=20;
Table1.Post;
end;
end;
значения Items DBComboBox2 у меня от 1 до 6 , эти значения совпадают со связанными значениями в БД.


Trad   (2003-12-22 07:37:00) [10]

Выкидывает:
Table1: DataSet not in edit or insert mode.
но значение поля изменяет....


Trad   (2003-12-22 07:28:00) [11]

мне нужно записать сразу какое-то конкретное значение, точнее число:
то есть должно быть что то типа этого (но это не правилно):
Table1.Edit;
Table1.FieldByName("Srok").AsString:=15;
Table1.Post;


gek   (2003-12-22 07:00:00) [12]

Tbl_kuku.Edit;
Tbl_kuku.FieldByName("mumu").AsString:=Edit_kuku.Text;
Tbl_kuku.Post;


Наверх

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