Hier ein Beispielcode:
Code:
procedure TForm1.Button1Click(Sender: TObject);
var
SI:TSchemaInfo ; i:integer;
begin
//Select a type of metadata
query
case ComboBox1.ItemIndex of
0: SI:=siCubes;
1: SI:=siDimensions;
2: SI:=siHierarchies;
3: SI:=siLevels;
4: SI:=siMeasures;
5: SI:=siProperties;
6: SI:=siMembers;
end;
//Retrieve results of the metadata
query to ADODataSet1
ADOConnection1.OpenSchema(SI,EmptyParam,
EmptyParam,ADODataSet1);
//Open a
query result
ADODataSet1.Open; // HIER KRACHT ES
end;
Und gibt es Beispiele wie man evtl. anders an diese Informationen kommt ?
Mal eine Frage:
Ist im ADODataSet1 nicht schon die Ergebnismenge, sprich das DataSet bereits OPEN?
Denn mit ADOConnection1.OpenSchema werden doch die Daten geholt...