VCµ÷ÓÃDELPHI дµÄÒ»¸öDLL£¬È»ºó½«Á½¸ö²ÎÊý´«µÝ¸øËü£¬´«µÝµÄÊý¾ÝÀàÐÍÊÇ×Ö·û´®ÀàÐÍ
DELPHI ÖеÄSTRING»òÕßÓÃPCHARÓëVCÖеÄÄĸöÀàÐͶÔÓ¦£¿
VCÖе÷ÓÃÕ¦ÀÏÌáʾ´íÎó
error C2197: 'int (__stdcall *)(void)' : too many actual parameters
VCÕâÑùµ÷Óà µÄ
//µ÷ÓÃdll
......
1.°´ÏÂÃæµÄ·½·¨´ò¿ªword,µ«ÊÇûÓÐÐÂÎĵµ,µÃ×Ô¼ºÐ½¨,Äܲ»ÄÜ×Ô¶¯Éú³ÉÒ»¸öÐÂÎĵµ.
2.´ò¿ªwordµÄʱºò,³ÌÐò½çÃæÒ²Ìø³öÀ´ÁË,Äܲ»ÄÜÈÃËüÔÚwordºó,»òÕß×îС»¯
Delphi(Pascal) code:
uses comobj;
procedure TForm1.word1Click(Sender: TObject);
var Word: Variant;
begin
try
Word := CreateOLEObject('W ......
delphiÖÐÔõô°ÑÎļþÊôÐÔÉèÖóÉÒþ²Ø?
ÎÒÏë°Ñ±¸·ÝµÄMDBÎļþÒþ²ØÆðÀ´.
»¹ÓÐ,Ôõô°ÑÒþ²ØÊôÐÔµÄÏÔʾ³öÀ´?
attrib -h -a -r -s
FileSetAttr('C:\aa.txt',faReadOnly or faSysFile or faHidden);
FileSetAttr('c:\a.txt',0);
Â¥ÉϵÄÊÇÒþ²Ø£¬Õâ¾äÊǻָ´
´Ó×ÖÃæÓ¦¸ÃÄÜÀí½âÁ˰É
......
ÔÚXPϵͳÓÃdelphi7¿ª·¢µÄ³ÌÐò£¬¿Í»§»ú£¨XP£©ÉÏÕý³£Ê¹ÓùýÒ»¶Îʱ¼ä¡£ÏÖÔÚ
¿ÉÒÔ´ò¿ª.exe½çÃæ,µ«ÊÇÊäÈëÃÜÂëµÇ½¼°½øÐÐÓйØÊý¾Ý²Ù×÷»á±¨´íÈçÏ£º
An error occurred while attempting to initialize the Borland Database Engine (error $251E).
¿Í»§»úÉÏ»¹ÓÐÆäËûdelphi¿ª·¢ÏµÍ³£¬¿ÉÓÃ; ´ ......
Ò»¸ö¿ÉÖ´ÐгÌÐò(Èç a.exe )Òªµ÷ÓÃÆäËüµÄ¿ÉÖ´ÐгÌÐò(Èç b.exe; c.exe..), µ«b.exe,c.exe ²»Ï£Íû±»ÈË¿´µ½,ÇÒ²»ÉèÒþ²Ø,
ÈçºÎ×öµ½¼È¿ÉÒÔµ÷ÓÃb.exe,c.exe...¶øb.exe,c.exeÓÖ²»±»ÈËÖªµÀ,ÇÒ²»±»ÈËɾ³ý? (²»Í¨¹ý¸Äºó׺Ãû)
Çë´óϺ°ïæ¿´Ò»ÏÂÓÐûÓкõĽâ¾ö°ì·¨,½«²»Éõ¸Ð¼¤!!!
µ÷ÓÃDLL»¹²»¼òµ¥?
ÎÒÒ²Óöµ½ÁËÀàËÆµÄÎÊ ......
ÎÒĿǰÓöµ½µÄÎÊÌâÈçÏ£º
Delphi(Pascal) code:
IA = interface
function GetA: Integer;
end;
TB = class(TInterfacedObject, IA)
public
...Ê¡ÂÔÆäËûN¸öº¯Êý
function GetA: Integer;
end;
TC = class(TB)
public
...
function GetA: Integer;
priva ......