Параметры изначально созданы для создания SQL запросов. Созданы для удобства, чтобы не нужно было по 100 раз править запрос, а менять лишь его параметр. Как создать параметры в Delphi ? Я приведу пример создания в run-time, потому что пока учусь – предпочитаю этот стиль, нежели design-time.
Внимание! Если Ваш запрос должен что-то возвращать, например Select, тогда лучше использовать компоненты множества (например simpledataset), если Вы просто что-то меняете в базе – например добавляете / редактируете / удаляете запись в таблицу, тогда лучше использовать компоненты, типа SQLQuery. В общем логика в том – возвращает что-то запрос или нет или просто меняет в базе.
Ниже я привожу пример для добавления записей в таблицу с применением параметров.
Как создать параметры в Delphi?
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
with Sqlquery1 do begin Params.Clear; PK:=simpledataset1.RecordCount; // Число записей Params.CreateParam(ftinteger,'Param_Primary_key',ptinputoutput); Params.ParamByName('Param_Primary_key').Asinteger:=PK+1; Params.CreateParam(ftstring,'Param_Name',ptinputoutput); Params.ParamByName('Param_Name').Asstring:='NewRecord'+inttostr(PK+1); Params.CreateParam(ftinteger,'Param_Sort',ptinputoutput); Params.ParamByName('Param_Sort').Asinteger:=PK+1; end; |
Как применить параметры в Delphi?
1 2 3 4 |
sqlquery1.SQL.Clear; sqlquery1.SQL.Add('insert into departments(Primary_key,Name,Sort) values(:Param_Primary_key,:Param_Name,:Param_Sort)'); sqlquery1.ExecSQL; simpledataset1.Refresh; |