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

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

Вместо Table1 - Query1 [D5, Paradox]

Demon Ltd ©   (2002-04-25 09:47:00) 

Люди, у меня вопрос. Когда я заношу данные в таблицу с помощью Table1, я пишу:
form1. Table1.Append;
form1. Table1["tabnomer"]:=form1.Edit1.text;
form1. Table1["fam"]:=form1.Edit2.text;
form1. Table1["name"]:=form1.Edit3.text;
form1. Table1.Post;
А если я пытаюсь вместо Table1 использовать Query, то ничего не выходит:
form1.Query1.Append;
form1.Query1["tabnomer"]:=form1.Edit1.text;
form1.Query1["fam"]:=form1.Edit2.text;
form1.Query1["name"]:=form1.Edit3.text;
form1.Query1.Post;
В чём проблема.

---

Johnmen   (2002-04-25 10:44:00) [1]

>Dy-Ty (25.04.02 10:32) : Так делать можно, но предварительно устранив ошибки формирования текста запроса ! :)

---

il   (2002-04-25 10:39:00) [2]

Можно еще вот так сделать:
var varForEdit1,varForEdit2,varForEdit3:string;
varForEdit1:=form1.Edit1.text;
varForEdit2:=form1.Edit2.text;
varForEdit3:=form1.Edit3.text;
form1.Query1.SQL.clear;
form1.Query1.SQL.add("INSERT INTO <имя таблицы> (tabnomer, fam, name)");
form1.Query1.SQL.add("VALUES (");
form1.Query1.SQL.add(varForEdit1+",");
form1.Query1.SQL.add(varForEdit2+",");
form1.Query1.SQL.add(varForEdit3);
form1.Query1.SQL.add(")");
form1.Query1.execSQL;
showmessage(";)");

---

Dy-Ty   (2002-04-25 10:34:00) [3]

ИЗВИНЯЮСЬ, ОШИБСЯ

вместо qvProv.ExecSQL;
form1.Query1.ExecSQL;


---

Dy-Ty   (2002-04-25 10:32:00) [4]

а так разве нельзя сделать ?

form1.Query1.SQL.Text := "INSERT INTO <имя таблицы> (tabnomer, fam, name) VALUES ("+ form1.Edit1.text +", "+ form1.Edit2.text +", "+ form1.Edit3.text +")";
qvProv.ExecSQL;


---

Johnmen   (2002-04-25 10:09:00) [5]

А если добавить TUpdateSQL, то запрос м.б. и не по одной тбл....

---

il   (2002-04-25 09:56:00) [6]

у Query1 св-во requestLive надо поставить в true, ну и запрос должен быть по одной таблице

---

Johnmen   (2002-04-25 09:54:00) [7]

Query1 должен быть редактируемым !

---

Наверх