2)在VB6中有一段代码:
Dim SymbolSet As New SymbolSrv.symbol
SymbolSet.GetCustomSymbol()
如何转换成Delphi6的语句?
...全文
334打赏收藏
一个关于动态链接库的问题?
我有一个VB6程序,想移植到Delphi6中, 1)SymbolSrv在VB里是引用了C:\windows\system32\SymbolSrv.dll文件, 那在Delphi6里怎么将其引用啊? 2)在VB6中有一段代码: Dim SymbolSet As New SymbolSrv.symbol SymbolSet.GetCustomSymbol() 如何转换成Delphi6的语句?
1:可以这样收入这个DLL(看你的代码这应是个COM对象)
Project->Import Type Library
2:先引用ComObj单元
var
SymbolSet: Variant;
begin
SymbolSet := CreateOleObject(SymbolSrv);
SymbolSet.GetCustomSymbol;
end;