Hello, I noticed that when I open one database and want to open another, it does not open. What do I need to fix for the code to work properly?
procedure TfGlowna.SpeedButton2Click(Sender: TObject);
begin
if not OpenDialog1.Execute then Exit;
ZConnection1.Database:= OpenDialog1.FileName;
ZConnection1.Connected:= True;
ZQuery1.close;
ZQuery1.SQL.Clear;
ZQuery1.SQL.Text:= 'SELECT * FROM product';
ZQuery1.Open;
end;