Forum: Win32/Win64 API (native code)
Delphi
by Dezipaitor,
24. Feb 2010
Vllt. braucht man GetFirstResult zuerst?
Forum: Win32/Win64 API (native code)
Delphi
by Dezipaitor,
24. Feb 2010
Du wirst es mir vllt. nicht glauben, aber jemand anderes würde den Quelltext ohne zu zucken einfach kopieren und verwenden. Kenne so manchen falschen Quellcode, der im Internet damit verbreitet wurde ("Checking if a user is an administrator").
Forum: Win32/Win64 API (native code)
Delphi
by Dezipaitor,
24. Feb 2010
if not Succeeded(result) then
begin
e := EOleSysError.Create('', result, 0);
MessageDlg(e.Message, mtError, , 0);
end;
???????? Was ist das?
Forum: Win32/Win64 API (native code)
Delphi
by Dezipaitor,
24. Feb 2010
D.h. einfach, dass entweder hr = 0 oder ein Wert ist, den du nicht abfängst.
Nimm OleCheck(ADBla()); ,um eine FehlerException zu bekommen.
Forum: Win32/Win64 API (native code)
Delphi
by Dezipaitor,
4. Feb 2010
Also, wenn bei mir soetwas passiert, dann gehe ich meist so vor:
Eliminiere alles Unnötige. D.h. extrahiere die Essenz, also das Wesentliche in ein eigenes Projekt ohne Klasse, ohne tolle Tricks und teste es dort.
Die Referenzzählung kommt mir schon etwas suspekt vor, besonders da ich noch nie soetwas gesehen habe, dass nur mit NewInstance statt Create arbeitet. Insbesodere funktioniert...