Forum: Programmieren allgemein
by Jackie1983,
30. Nov 2009
Servus,
VarClear(varArr) hat weitergeholfen.
Habe zwei VarClear(varArr) in den while schleifen eingebaut und nun past es.
Wenn die Funktion aufgerufen wird steigt der Speicher nur einmalig um +2MB,
denke wegen der activeds.dll einbindung.
thx
Forum: Programmieren allgemein
by Jackie1983,
24. Nov 2009
Nein gibt es nicht, hatte ich nur zum Test drin :)
Forum: Programmieren allgemein
by Jackie1983,
24. Nov 2009
:lol:
Speicherauslastung im Taskmanager meinte ich.
function ADsEnumerateNext(pEnumVariant: IEnumVARIANT; cElements: ULONG;
var pvar: OleVARIANT; var pcElementsFetched: ULONG): HRESULT; safecall; external 'activeds.dll';
//..
while (Succeeded(ADsEnumerateNext(Enum, 1, varArr, lNumElements))) and (lNumElements > 0) do