Что за ошибка?

← →
Washington © (2007-09-29 08:15) [0]

procedure TForm5.FormCreate(Sender: TObject); {при создании формы}
var
WinDir:PChar;
begin
getMem(WinDir,500);
GetWindowsDirectory(WinDir,500); strCat(WinDir,"\DataSource.bdp"); Label3.Caption:=strPas(WinDir);
freemem(WinDir);
ADOConnection1.Properties["Data Source"].Value:=Label3.Caption;
end;

Readonly property value was not set. В чём ошибка? Вроде всё работало, теперь вдруг нет, хотя ничего не делал :(

← →
Washington © (2007-09-29 08:17) [1]

Блиин, что ж я так туплю. Походу не выспался. Сделал connected=false.

← →
Leonid Troyanovsky © (2007-09-29 08:46) [2]

> Washington © (29.09.07 08:15)

> WinDir:PChar;

WinDir : array [0..MAX_PATH] of Char;

--
Regards, LVT.

← →
Washington © (2007-09-29 09:50) [3]

with ADOTable1 do
begin
Open;
Insert;
FieldValues["Company"]:=Imja_of_Company_for_view;
Post;
end;

Теперь тут, блин. Acess violation тытыты, ещё что-то.

← →
Washington © (2007-09-29 09:51) [4]

with ADOTable1 do begin Open; Insert; FieldValues["Company"]:=Imja_of_Company_for_view; Post; end;

Извиняюсь

← →
Kolan © (2007-09-29 09:53) [5]

> Imja_of_Company_for_view

ППЦ, ну почему? почему ты написал imja по русски а все остальное по ангийски? И еще и в сишном стиле&#133

Да не знаю. Что взбрело, то и калякнул. Теперь уже понимаю что тупо, просто переделывать не охота.

> Теперь тут, блин. Acess violation тытыты, ещё что-то.

Апо собжу как всегда 17 строка&#133

Что за ошибка? Найти похожие ветки