Скачать: CL | DM;

вопрос SQL   Найти похожие ветки 

← →
RomanLN   (2007-05-02 09:54) [0]

как заполнить таблицу с помощью SQL запроса элементами TStrings

procedure SQL_Insert_Opr;
begin
Q_Create := TQuery.Create(Application) ;
   try
   Q_Create.DatabaseName := "sociologist";
   with Q_Create.SQL do
     begin
       Add("insert into " + name_table   );
       ....
   end;
   Q_Create.ExecSQL;
 finally
   Q_Create.Free;
 end;
end;

---

← →
clickmaker ©   (2007-05-02 10:31) [1]

> RomanLN   (02.05.07 09:54)


> Q_Create := TQuery.Create(Application) ;

нет нужды указывать Owner, если сам говоришь Q_Create.Free;

> Add("insert into " + name_table   );

обычно "insert into " + name_table + " (field1, ...) values (" + QuotedStr(value1) + ",...

PS. В любом мануале, прилагаемом к SQL серверу, описаны синтаксисы команд.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.046 c