HTML и базы данных
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: реферат н, реферат на политическую тему
| Добавил(а) на сайт: Строганов.
Предыдущая страница реферата | 1 2 3 4 5 6 7 8 | Следующая страница реферата
begin
gn1 := IndexOfName('Kind');
if (gn10) then OperKind := StrToIntDef(Values['Kind'],0);
if gn1>=0 then Delete(gn1);
gn1 := StrToIntDef(Values['Gr1'],0);
gn2 := StrToIntDef(Values['Gr2'],0);
end; //with
if gn1=0 then Response.Content := CommonLook+CreateGroupList(gn1,gn2,OperKind)
else if gn2=0 then Response.Content := CommonLook+CreateGroupList(gn1,gn2,OperKind)
else
begin
//define group name
with GroupQuery do
begin
SQL.Text := 'SELECT * FROM Groups WHERE (MainGroup=:gn1) and (SubGroup=:gn2)';
Params[0].AsInteger := gn1;
Params[1].AsInteger := gn2;
Open;
with StoreQTP do
begin
Header.Clear;
Header.Add(CommonLook);
if OperKind>0 then
begin
OrderCol := THTMLTableColumn.Create(StoreQTP.Columns);
Рекомендуем скачать другие рефераты по теме: шпоры по социологии, бесплатные ответы.
Категории:
Предыдущая страница реферата | 1 2 3 4 5 6 7 8 | Следующая страница реферата
Главная