DBLookUpComboBox

← →
pashaz © (2004-05-03 22:05) [0]

Люди, помогите, совсем башня съехала.

Не могу понять почему DBLookUpComboBox не работает.

Вот код.

procedure TForm2.SpeedButton1Click(Sender: TObject);
begin
If OpenDialog1.Execute then
begin
ADOConnection1.ConnectionString:=OpenDialog1.FileName;
try
ADOConnection1.Connected:=True;
ADODataSet1.CommandText:="select * from addit";
ADODataSet1.Active:=True;
ADODataSet2.CommandType:=cmdTable;
ADODataSet2.CommandText:="features";
ADODataSet2.Active:=True;
DBLookupComboBox1.DataField:="creator";
StatusBar1.Panels[2].Text:="Òåêóùàÿ áàçà äàííûõ: ";
StatusBar1.Panels[2].Text:=StatusBar1.Panels[2].Text + OpenDialog1.FileName;
except
ShowMessage("Íå ìîãó îòêðûòü ñîåäèíåíèå");
end;
end;
end;

← →
Desdechado © (2004-05-04 12:48) [1]

в чем вопрос-то? как ругается?
а listfield и keyfield у тя заполнены? а сорсы?

DBLookUpComboBox Найти похожие ветки