Текущий архив: 2002.11.28;
Скачать: CL | DM;
Вниз
Мастера ! помогите, плз, решить следующую проблему: Найти похожие ветки
← →
symbol © (2002-11-08 08:24) [0]Мастера ! помогите, плз, решить следующую проблему:
Возникла проблема при сортировке таблицы.
Точнее таблица то сортируется, а вот на экране (в DBGridEh) - нет.
Есть следующая база данных(InterBase 6.5):
SET SQL DIALECT 3;
TABLE "CONTACTS"
------------------------
"NUM" CHAR(4)
"FIRSTNAME" CHAR(30)
"MIDDLENAME" CHAR(30)
"LASTNAME" CHAR(30)
"ADDRESS" CHAR(50)
"PHONE1" CHAR(20)
"PHONE2" CHAR(20)
"PHONE3" CHAR(20)
TABLE "SIGNALS"
------------------------
"NUM" CHAR(4)
"SIGNALCODE" CHAR(2)
"SIGNALNAME" CHAR(50)
"SIGNALPRIOR" INTEGER
TABLE "EVENTS"
------------------------
"DATA" DATE
"TIME1" CHAR(8)
"OBJECTNAME" CHAR(30)
"SIGNALNAME" CHAR(50)
"OPERATOR" CHAR(20)
"TIME2" CHAR(8)
"ACTIVED" INTEGER
"NUM" CHAR(4)
TABLE "OBJECTS"
---------------------------------
"NUM" CHAR(4)
"GROOP" CHAR(8)
"NAME" CHAR(30)
"MAILINDEX" CHAR(6)
"MAILCOUNTRY" CHAR(30)
"MAILREGION" CHAR(15)
"MAILCITY" CHAR(15)
"MAILOTHER" CHAR(100)
"OBJECTTYPE" CHAR(50)
"TRANSMITTYPE" CHAR(10)
TABLE "OBJECTTYPES"
------------------------
"OBJECTTYPE" CHAR(50)
TABLE "TYPES"
------------------------
"TRANSMITTER" CHAR(10)
CREATE DESCENDING INDEX "DT" ON "EVENTS"("DATA")
Таблицы "SIGNALS" и "CONTACTS" (поля "NUM") привязаны к к таблице "OBJECTS" (Поле "NUM")
Существуют поступающие данные, которые обрабатываю следующей процедурой:
procedure view;
var
st1,st2,st3:variant;
begin
if bufer.trans_s <> "OKAY" then
begin
with MainForm do
begin
events.First;
events.Insert;
st1:=bufer.trans_s;
st2:=bufer.code_s;
st3:=objects.Lookup("Num",st1,"NAME");
events.FieldValues["DATA"]:=date;
events.FieldValues["TIME1"]:=timetostr(now);
events.FieldValues["OBJECTNAME"]:=st3;
st3:=signals.Lookup("SIGNALCODE",st2,"SIGNALNAME");
events.FieldValues["SIGNALNAME"]:=st3;
events.FieldValues["NUM"]:=bufer.trans_s;
events.ApplyUpdates;
end;
end;
emptybufer;
end;
emvents.refresh не помагает.
Может стоит заполнять через SQLQuery ? Если да, то приведите, пожалуйста, пример.
← →
symbol © (2002-11-08 13:02) [1]И еще: при внесении данных в таблицу DBGridEh весь дергается.
← →
MMF © (2002-11-08 14:53) [2]Для того, чтобы увеличить скорость обработки и не дергался грид, сделай для DataSet с которым связан events DisableControls. Я бы вообще поступающие данные передавал в хранимую процедуру.
← →
symbol © (2002-11-09 08:24) [3]Пасибо, попробую...
Страницы: 1 вся ветка
Текущий архив: 2002.11.28;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.014 c