ADO GetFieldnames buggy?

[p80286]

Schrottlevel ist gut!

Mir ging's nicht darum die Werte zu holen, da nutze ich z.Zt.

Code:

'select distinct COLUMN_NAME from ALL_COL_COMMENTS where OWNER=:_owner order by COLUMN_NAME';

(comments ist schon richtig!)
sondern einfach die Möglichkeiten der ADO-Schnittstelle auszuloten.

Vielen Dank für Eure Infos!

Gruß
K-H

[shmia]

Beim Programmieren kann man ja sooo viele Fehler machen.
Deshalb defensiv programmieren und fleissig Asserts einsetzen:

Delphi-Quellcode:

procedure TDM_EV.Get____(liste:tstrings);
var
  i,j : integer;
  dummyl : twidestrings;
begin
  Assert(Assigned(self));
  Assert(Assigned(ADOConnection1));
  Assert(Assigned(liste));
  Assert(ADOConnection1.Connected);

  dummyl:=twidestringlist.Create;
  Liste.clear;
  ADOConnection1.GetTableNames(liste);