声明: function GetFontHEX(P1,P2,P3:PChar;P3,P4,P5,P6,P7:shortint):ineger;stdcall; 实现: function GetFontHEX(P1,P2,P3:PChar;P3,P4,P5,P6,P7:shortint):ineger;stdcall;external fnthex32.dll
楼上的,参数的顺序不对也可以吗? 呵呵,我这个一定对:) 声明: function ChangeWord(cText,cFontName:pchar;nOrientation,nHeight,nwidth,nBold,nItalic:word;cBuf:pchar):integer; StdCall; 实现: function ChangeWord; external 'Fnthex32.dll' name 'GETFONTHEX'; 不过分还是大家分了吧!
function GetFontHEX(P1,P2,P3:PChar;P3,P4,P5,P6,P7:shortint):ineger;stdcall;
实现:
function GetFontHEX(P1,P2,P3:PChar;P3,P4,P5,P6,P7:shortint):ineger;stdcall;external fnthex32.dll
呵呵,我这个一定对:)
声明:
function ChangeWord(cText,cFontName:pchar;nOrientation,nHeight,nwidth,nBold,nItalic:word;cBuf:pchar):integer; StdCall;
实现:
function ChangeWord; external 'Fnthex32.dll' name 'GETFONTHEX';
不过分还是大家分了吧!