delphi Öв»ÄÜɾ³ýÊý¾Ý
¸ßÊÖ¿´¿´ÊÇʲôÎÊÌâ,ÄÜÐ޸IJåÈë, ɾ³ýʱ¾ÍÓÐÒÔÉÏÌáʾ!!
£¿¿´²»µ½Í¼
ɶÌáʾ°¡
Project xxx.exe raised exception class EDBEngineError with message 'Netword initialization failed.
File or directory does not exist.
File:C:\PDOXUSRS.NET
Permission denied.
Directory:C:\'.Process stopped. Use Step or Run to continue.
These are the tips!!
˵ÊÇÎļþ²»´æÔÚ
²¢ÇÒPDOXUSRS.NET ²»ÄÜ·ÃÎÊ
ÈÃÄãµ÷ÊÔ¿´Ï¡£
¿ÉÊÇÒªÔõôµ÷ÊÔÄØ,???
´úÂëÖÐÉèÖöϵôµ÷ÊÔ°¡
´ò¿ªBDE Administrator ,µãConfiguration->Drivers->Native->PARADOX
½«NET DIR ¸Äµ½ÆäËüÅÌ·û»òĿ¼ÊÔÊÔ
Ã²ËÆºÍȨÏÞÓйØ
ºÃ¸´ÔÓ°¡¡£¡£¡£¡£¡£³õѧ ·¹ý¡£¡£¡£¡£¡£¡£
Ïà¹ØÎÊ´ð£º
ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ
ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......
ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£
µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË
ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......
procedure RunFunction;
type
TFunc = function(A: Integer): Integer;stdcall;¡¡//ÕâÀï¸ù¾ÝDLLÀïÃæº¯ÊýµÄÉùÃ÷ÐÞ¸Ä
var
......
¼±Óá£ÁªÏµQQ£º8775262£¬Ð»Ð»¡£
ÐèÒª½øÐÐDllImportµÄµØ·½Ö±½ÓдDLLImport.·½·¨Ãû¡£
È磺DLLImport.GlobalAddAtom(¡¡);
Îļþ£ºUShare.pas
Delphi(Pascal) code:
unit UShare;
interface
uses Windows, Me ......