Zitat von
OldGrumpy:
Ich muss ne ganze Menge Code umschreiben, um zu sehen ob das die Fehler beseitigt.
Ich würd' nicht umschreiben, sondern das Bisherige erhalten und das Neue hinzu nehmen.
Delphi-Quellcode:
const USE_DISPATCH = TRUE
procedure TForm1.Button1click(...);
begin
if USE_DISPATCH then
TesteDasCOMObjekt_Dispatch
else
TesteDasCOMObjektMitTlb;
end;