Вместо Table1

← →
Demon Ltd (2002-04-25 09:47) [0]

Люди, у меня вопрос. Когда я заношу данные в таблицу с помощью 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 09:54) [1]

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

← →
il (2002-04-25 09:56) [2]

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

← →
Johnmen (2002-04-25 10:09) [3]

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

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

а так разве нельзя сделать ?
form1.Query1.SQL.Text := "INSERT INTO <имя таблицы> (tabnomer, fam, name) VALUES ("+ form1.Edit1.text +", "+ form1.Edit2.text +", "+ form1.Edit3.text +")"; qvProv.ExecSQL;

← →
Dy-Ty (2002-04-25 10:34) [5]

ИЗВИНЯЮСЬ, ОШИБСЯ
вместо qvProv.ExecSQL; form1.Query1.ExecSQL;

← →
il (2002-04-25 10:39) [6]

Можно еще вот так сделать:
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(";)");

← →
Johnmen (2002-04-25 10:44) [7]

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

Вместо Table1 - Query1 Найти похожие ветки