richardzsw的专栏

procedure TMainForm.aListBoxDrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState); var i: Integer; position: Integer; str: string; begin str := aListBox.

用Delphi生成DLL时要引用ShareMem，而调用该DLL的宿主程序同样需要引用ShareMem。 应在宿主程序的dpr文件中引用ShareMem，否则宿主程序时候会爆Exception。 将引用ShareMem的DLL和程序放在没有安装Delphi的机器上运行时候，要记得在程序中加入BorlndMM.DLL，在Delphi的安装路径中可以方便地找到。