TRasDialParamsA = record
dwSize: LongInt;
szEntryName: array[0..RAS_MaxEntryName] of AnsiChar;
szPhoneNumber: array[0..RAS_MaxPhoneNumber] of AnsiChar;
szCallbackNumber: array[0..RAS_MaxCallbackNumber] of AnsiChar;
szUserName: array[0..UNLEN] of AnsiChar;
szPassword: array[0..PWLEN] of AnsiChar;
szDomain: array[0..DNLEN] of AnsiChar;
var
rdParams: TRasDialParamsA;
FUserName: string;
程序实现部分:
中间有句类型转换即:
StrPCopy(rdParams.dwsize,PChar(FUserName));
报错说声明类型与参数类型不匹配,是ansichar与pchar的问题么?请教下
function StrPCopy(Dest: PChar; const Source: string): PChar;rdParams.dwsize是LongInt
[code=Delphi(Pascal)
StrPCopy(rdParams.szUserName,PChar(FUserName));
[/code]
不好意思,没注意,写错了
strPCopy(rdParams.szUserName, PChar(Fusername));
要提的是这个问题