【搞定】怎样定义数组（？）**

lixy · 发表于 2007-9-4 08:46:52

你在delphi中调用你写的那个封装单元，看看错在哪里！

liubin · 发表于 2007-9-4 08:49:44

delphi中是Pchar

liubin · 发表于 2007-9-4 09:02:30

27.  如何引入数组
由于对指针不直接支持，如果需要从ocx中传递数组到Studio中，需要在
Delphi中定义一个对象来对数组的内容进行访问，在对象中定义一个数组属
性。
1)  首先在接口定义中，定义传过来的指针为整数型

procedure AfterShapeDraw(DeviceTypeNum: Integer; DeviceIDNum: Integer;
            DeviceTypeArray: Integer; DeviceIDArray: Integer);

这个方法是写在类型声明文件里吗?

liubin · 发表于 2007-9-4 09:35:05

2) 在Delphi中，定义一个对象来访问数组，传入指针，通过访问属性来访问
数组的每一个元素。下面以整数型数组为例，如果是其他类型，请修改红色
背景的部分为需要的类型。

在Delphi 中定义对象和我包的完的DLL, 还有平台怎么联系?

lixy · 发表于 2007-9-4 09:47:51

请先看21楼的，楼主试验是否报错？

liubin · 发表于 2007-9-4 09:52:37

在Delphi 中不出错

lixy · 发表于 2007-9-4 09:57:13

那你可以用StrPCopy ，getmem等函数，在接口单元函数里声明一个pchar。
把传入的string类型copy成一个pchar。

liubin · 发表于 2007-9-4 10:00:39

请看12楼, DLL要求传的是指针和Pchar 和String 没关系

lixy · 发表于 2007-9-4 10:04:50

pchar其实是个指针。
你先试验下。
如下我zz的帮助：
A PChar is a pointer to a null-terminated string of characters of the type Char. Each of the three character types also has a built-in pointer type:

A PChar is a pointer to a null-terminated string of 8-bit characters.
A PAnsiChar is a pointer to a null-terminated string of 8-bit characters.
A PWideChar is a pointer to a null-terminated string of 16-bit characters.

PChars are, with short strings, one of the original Object Pascal string types. They were created primarily as a C language and Windows API compatibility type.

liubin · 发表于 2007-9-4 10:31:42

平台有GetMem方法吗? 我没找到,在哪个空间下?

		自动登录	找回密码
密码			立即注册