Stringlist in einer DLL

[Tanne]

Die Stringliste ist in der DLL.

Delphi-Quellcode:

type
  TKontextMenuShellExt = class(TComObject, IShellExtInit, IContextMenu)
    public
       tempstrlist:tstringlist;

und bei dem hier wird sollte sie erstellt werden

function TKontextMenuShellExt.SEInitialize(pidlFolder: PItemIDList;
  lpdobj: IDataObject; hKeyProgID: HKEY): HResult;
begin
    temp:=tstringlist.Create;

so dass, das hier möglich ist

function TKontextMenuShellExt.InvokeCommand(var lpici: TCMInvokeCommandInfo): HResult;
var i:integer;
begin
...
  for i:=0 to temp.Count-1 do
    SendMSG(pchar(temp.strings[i]));

[edit=SirThornberry]Delphitags ergänzt. Mfg, SirThornberry[/edit]