ActiveX-dlls, Interface mit call by reference Methode

[termlich]

Gefunden:

Delphi-Quellcode:

function TC1.alterString(var s1: WideString): HResult;
begin
 s1 := s1 + PAnsiChar(' DRANGEHÄNGT');
end;

Jetzt läuft's.

Aber wie kann ich jetzt z.B. eine ComboBox (s.o.) mittels ActiveX-dll traktieren?

[himitsu]

ANSI?

Delphi-Quellcode:

function TC1.alterString(var s1: WideString): HResult;
begin
  s1 := s1 + PWideChar(' DRANGEHÄNGT');
end;

Sollte aber genauso funktionieren, wie ein

Delphi-Quellcode:

function TC1.alterString(var s1: WideString): HResult;
begin
  s1 := s1 + ' DRANGEHÄNGT';
end;

Klassen über Modulgrenzen?
NEIN!!!

Nur wenn man seine EXE/DLL gegen die nötigen Packages linkt.
Und dann müssen Beide mit der selben Delphi-Verison kompiliert werden, womit sich das mit dem ActiveX irgendwie sinnlos gestaltet.

Du kannst das Windows-Handle der ComboBox übergeben und in der ActiveX-DLL via WinAPI direkt damit arbeiten.

Zitat:

procedure sel_CB(SelText: string; var CBox: TComboBox);

Und wieso war/ist das eigentlich VAR?

[termlich]

Hi Himitsu,

klasse! Vielen Dank. Du hast Recht, var wird nicht benötigt
(das sind ziemlich alte Code-Brocken, ich hatte sie lange nicht
mehr gesichtet).

Kannst Du mir zu dem Handle-Ansatz ein paar Codezeilen pasten... (den Transfer bekomme ich dann hin).

Viele Grüße
Tilo

[himitsu]

Über CBox.Handle kommt man an das HWND und damit ans interne Windows-Control
und dann schaut man ins MSDN und schon hat man die zugehörige Dokumentateion der entsprechenden WinAPI.
http://msdn.microsoft.com/en-us/libr.../bb775792.aspx