![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Состояние датасета [D6, Firebird]
pashaz © (2004-09-19 00:53:00)Добрый вечер.
Помогите разобраться.
Есть код.
procedure TForm1.AdvToolButton1Click(Sender: TObject);
begin
try
ZConnection1.Connect;
with ZQuery1 do
begin
Active:=False;
Sql.Clear;
Sql.Add('select * from MARCONI_SPARE for update');
Open;
if CanModify = True then Edit Else
ShowMessage('Can not execute because of DataSet is in ReadOnly state');
end;
AdvToolButton1.Enabled:=False;
AdvToolButton2.Enabled:=True;
AdvToolButton3.Enabled:=True;
StatusBar1.Panels[0].Text:='Status: Connected';
StatusBar1.Panels[1].Text:='Host: '+Zconnection1.HostName+ ' Database: '+ Zconnection1.Database;
with ZQuery2 do
begin
Active:=False;
Sql.Clear;
Sql.Add('select Unit from LISTED_PRODUCTS');
Active:=True;
AdvComboBox1.Items.Clear;
while not Eof do
begin
AdvComboBox1.Items.Add(FieldByName('Unit').AsString);
Next;
end;
end;
except
ShowMessage('Can not connect to the DataBase');
AdvToolButton1.Enabled:=True;
end;
end;
Почему датасет в режиме ридонли? Как это победить?
pashaz (2004-09-19 15:57:00) [1]Вроде разобрался, оказалось нужно в AutoUpdateOption прописать Update Table.
jack128 (2004-09-19 15:01:00) [2]pashaz (19.09.04 14:55) [7]
ты прописал InsertSQL, DeleteSQL, UpdateSQL ??
pashaz (2004-09-19 14:55:00) [3]Разобрался, вот только та же фигня. Датасет опять ридонли.
jack128 (2004-09-19 14:38:00) [4]pashaz (19.09.04 13:58) [4]
А можно узнать, чем ТЕБЕ не нравятся стандартные компоненты IBX??
Роман Снегирев (2004-09-19 14:09:00) [5]Поставил FIBPlus. Подскажите, как законнектить pFIBDatabase ?
правильный выбор, а уж как приконнектитьться думаю сам разберешься
pashaz (2004-09-19 13:58:00) [6]Поставил FIBPlus. Подскажите, как законнектить pFIBDatabase ?
Плохиш (2004-09-19 03:06:00) [7]Поставить LiveUpdate, или что там у них, в true
pashaz (2004-09-19 01:39:00) [8]У них нету аналога датасета. Только кверь.
jack128 (2004-09-19 01:15:00) [9]
> ZQuery2
- это Zeos (или как он там называтся) ? использовать их аналог IbDataSet