Помогите не как не могу понять в чём дело

← →
ExE (2003-09-17 16:55) [0]

На форме есть DBComboBox При запуске формы в него по запросу вносятся данные
procedure TFormBuxPrihod.FormActivate(Sender: TObject);
var Query:TQuery;
begin
DBComboBox1.Clear;
Query:=TQuery.Create(self);
Query.DatabaseName:="vip";
Query.SQL.text:="Select NameKlient From Klient";
Query.Open;
Query.First;
while not Query.Eof do begin
DbComboBox1.Items.Add(Query.FieldByName("NameKlient").AsString);
Query.Next;
end;
end;
при запуске программы из Delphi работает всё нормально
итемсы выбераются а при запуске с Экзешника выдаёт ошибку
Record alredy locked by this session

← →
Vlad © (2003-09-17 17:02) [1]

А на какой строчке ошибка возникает ?

В дизайне убрать Active в false, а лучше и коннект у TDataBase тоже.

Помогите не как не могу понять в чём дело Найти похожие ветки