函式 void CalcFeature(const emxArray_uint8_T *image, double level, emxArray_real_T *FV)
其中emxArray_uint8_T型別為：
struct emxArray_uint8_T
{
unsigned char *data;
int *size;
int allocatedSize;
int numDimensions;
unsigned char canFreeData;
};
emxArray_real_T型別為：
struct emxArray_real_T
{
double *data;
int *size;
int allocatedSize;
int numDimensions;
unsigned char canFreeData;
};
uj5u.com熱心網友回復：
沒人嗎，自己頂一下uj5u.com熱心網友回復：
type//其中emxArray_uint8_T型別為：
emxArray_uint8_T=record
data:^char;
size:^integer;
allocatedSize:integer;
numDimensions:integer;
canFreeData:char;
end;
//emxArray_real_T型別為：
emxArray_real_T=record
data:^double;
size:^integer;
allocatedSize:integer;
numDimensions:integer;
canFreeData:char;
end;
procedure CalcFeature(emxArray_uint8:^emxArray_uint8_T, level:double , emxArray_real:^emxArray_real_T);
begin
end;
語法上大概是這樣，但C中的型別*image 和*FV在DELPHI中應該不可以這樣定義的
uj5u.com熱心網友回復：
注意C代碼編譯時所選擇的對其方式，函式直接轉換到Delphi要注意呼叫約定，若C中無特殊約定，則為cdecluj5u.com熱心網友回復：
type//其中emxArray_uint8_T型別為：
emxArray_uint8_T=record
data:PUChar;
size:^integer;
allocatedSize:integer;
numDimensions:integer;
canFreeData:Byte;
end;
//emxArray_real_T型別為：
emxArray_real_T=record
data:^double;
size:^integer;
allocatedSize:integer;
numDimensions:integer;
canFreeData:Byte;
end;
procedure CalcFeature(var emxArray_uint8:emxArray_uint8_T; level:double;var emxArray_real:emxArray_real_T);
begin
end;
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/83444.html
上一篇：Access violation at address 173426F0 in module 'BORdbk70.dll' .Write of address