Помогите новичку разобраться!!!

← →
Kazanova © (2003-04-01 10:08) [0]

Доброе утро, мастера!! Проблема в следующем:нужно сделлатььтак чтобы данные в поля таблицы вводились через контролы(едитбоксы)
Нашел пример:

ed1, ed2: TEdit
sq: TSQLQuery

sq.SQL.Add("INSERT INTO goods (title, count) VALUES (:goodname, :goodcount)");
sq.Parameters.Clear;
sq.Parameters.ParseSQL(sq.SQL.Text, True);
sq.Parameters.ParamByName("goodname").Value := ed1.Text;
sq.Parameters.ParamByName("goodcount").Value := ed2.Text;
sq.ExecSQL;

НО не понятно следующее, что это за юнит TSQLQuery? Как я понял он для компонента DataBase...Я его не использую(использую TDataSoutce и TQuery). Помогите, плиз....Может какие нить еще варианты возможны?

← →
Наталия © (2003-04-01 10:10) [1]

Это и есть Tquery - используй его :))

← →
Kazanova © (2003-04-01 10:13) [2]

Как? Проросто я ничего не понимаю....походу ступор:))

← →
Mike Kouzmine (2003-04-01 10:17) [3]

А начни с TTable, меньше вопросов будет.

← →
Kazanova © (2003-04-01 10:18) [4]

Надо с TQuery :))

← →
TYn (2003-04-01 10:19) [5]

Наталия, Вы, сударыня, не правы.
Kazanova, ну ё-моё! Ну F1+TQuery решение всех проблем!

← →
TYn (2003-04-01 10:22) [6]

В крайнем случае:
Query1.SQL.Text:="INSERT INTO goods (title, count) VALUES ("+ed1.Text+", "+ed2.Text+")";

в sql свойстве TQuery пишешь:
INSERT INTO goods (title, count) VALUES (:goodname, :goodcount)
А потом в коде:
with sq do
begin
Close;
ParamByName("goodname").AsString := ed1.Text;
ParamByName("goodcount").AsString := ed2.Text;
if not Prepared then Prepare;
ExecSQL;
end;

Помогите новичку разобраться!!! Найти похожие ветки