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

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

При попытке Refresh таблицы получаю ошибку. [D5, Access]

Valet ©   (2003-06-06 16:07:00) 

ADOTable
CursorLocation=clUseServer

При попытке Refresh таблицы получаю - "Проводник не поддерживает обновление связанных значений"

Что это такое? Как увидить изменения сделаные другими?

---

Севостьянов Игорь   (2003-06-06 17:33:00) [1]

Что-то тут не так у Вас. У меня работает:




Unit1.pas

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Db, Grids, DBGrids, ADODB, StdCtrls;

type
TForm1 = class(TForm)
ADOTable1: TADOTable;
DBGrid1: TDBGrid;
DataSource1: TDataSource;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
ADOTable1.Open;
ADOTable1.Refresh;
end;

end.

Unit1.dfm


object Form1: TForm1
Left = 192
Top = 106
Width = 696
Height = 480
Caption = "Form1"
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = "MS Sans Serif"
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object DBGrid1: TDBGrid
Left = 120
Top = 40
Width = 409
Height = 353
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = "MS Sans Serif"
TitleFont.Style = []
end
object Button1: TButton
Left = 568
Top = 16
Width = 75
Height = 25
Caption = "Button1"
TabOrder = 1
OnClick = Button1Click
end
object ADOTable1: TADOTable
ConnectionString =
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Salary\Salary.mdb;Persist Security Info=False"
TableName = "Сотрудники"
Left = 40
Top = 32
end
object DataSource1: TDataSource
DataSet = ADOTable1
Left = 48
Top = 80
end
end


---

Valet   (2003-06-06 16:24:00) [2]

Опытным путём выяснил, что Refresh работает только для clUseClient.

Процес проверки.
1.Старт приложения, болльше к БД ни кто не присоединён
2. Делаю Refresh
3. Ошибка :(

---

Севостьянов Игорь   (2003-06-06 16:23:00) [3]

Вообще-то рекомендую все операции с таблицей (UPDATE, INSERT, DELETE) делать через TADOQuery. Конфликт транзакций ? Вопросы по мылу

---

Севостьянов Игорь   (2003-06-06 16:22:00) [4]

Вообще-то рекомендую все операции с таблицей (UPDATE, INSERT, DELETE) делать через TADOQuery. Конфликт транзакций ?

---

Севостьянов Игорь   (2003-06-06 16:19:00) [5]

Посмотри другие настройки ADOTable.
Возможно это возникает в случае редактирования таблицы ?

---

Наверх