Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Состояние датасета [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


Наверх

Титульная страница Поиск, карта сайта Написать письмо