delphiÉϵ÷ÓöþάÊý×éÎÊÌâ
ÓÐaµ¥ÔªºÍbµ¥Ôª.
bµ¥ÔªÐ´Á˹ý³Ìprocedure Ttest.getarray(arr:array of array of string; sqla:string);
begin
¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£
¡£¡£¡£¡£
¡£¡£¡£¡£¡£¡£¡£¡£¡£
end;
ÔÚaµ¥ÔªÉϵ÷ÓÃgetarray(testarray);
ÕâÑùÓдíÎóÇë¸ßÊÖ½â´ð
ÎÒÔÚÍøÉÏ¿´µ½ÁËÔÚbµ¥ÔªµÄinterfaceÏÂдһ¸ötype ttowarray=array of array of string;
È»ºóÔÚbµ¥ÔªÐ´Á˹ý³Ìprocedure Ttest.getarray(arr:ttowarray; sqla:string);
µ«ÊÇÔÚµ÷ÓÃʱÔÚaµ¥ÔªÉÏûÓÐtype ttowarray=array of array of string;
ËùÒÔ²»Äܵ÷ÓûòÕßÊÇÔÚÀïÃæ²»ÄܷŽø¶þάÊý×é¡£
»¹ÓÐÓÐÈËÊÇÓÃÖ¸Õ뵫²»ÖªµÀ¾ßÌåÔõô×ö£¿
Çë¸÷λ¸ßÊÖ°ïæ¡£
°ÑÊý×鶨Òå³ÉÀàÈ¥´«µÝ
µ«ÊÇÔÚµ÷ÓÃʱÔÚaµ¥ÔªÉÏûÓÐtype ttowarray=array of array of string;
Äã¿ÉÒÔ¶¨ÒåÒ»¸öÍêȫһÑù½á¹¹µÄÀàÐÍÈ¥ÓÃ
Êý×éÖ¸Õë°¡£¬ÔõôÁË
SZ=array of array of char;
PSZ=^sZ;
var
s:Psz;
getarray(arr:Psz; sqla:string);
ARR^[0]£º=1
Êý×é
±±¾©ÌÚ¶ÈÍøÂç¿Æ¼¼ÓÐÏÞ¹«Ë¾
ÕÐÆ¸:
DelphiÈí¼þ¹¤³Ìʦ
1¡¢¾«Í¨Delphi¿ª·¢£¬ÊìϤVCL¼Ü¹¹£¬´úÂë·ç¸ñÁ¼ºÃ¡£
2¡¢ÓÐÁ¼ºÃµÄÍŶӺÏ×÷¾«Éñ£¬¸»Óд´Ð¾«Éñ;
3¡¢ÊìÏ¤ÍøÂç±à³Ì£¬¶ÔIndy×é¼þ£¬Socket¿ª·¢ÓÐÒ»¶¨µÄÁ˽â;
4¡¢ÊìÏ¤ÃæÏò¶ÔÏó±à³Ì˼Ïë,ÓÐ×é¼þ»ò¿Ø¼þ±à³Ì¾Ñé;
5¡¢ÄÜÊìϤʹÓöàÏ̼߳¼ÊõÌá¸ß³ÌÐòÔËÐÐЧÂÊ;
6¡
Ïà¹ØÎÊ´ð£º
ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ
ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......
×òÍíÔÚDelphiÊý¾Ý¿â²éѯÖÐÓöµ½ÁËÒ»¸öÒɻ󡣴úÂëÈçÏ£º
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
XY : string;
begin
XY := comboboxxy.Items[comboboxx ......
VC ¿ØÖÆÌ¨³ÌÐò:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
ÈçÌ⣺
ÎҵijÌÐò Create µÄʱºò ´´½¨ÁËN ¸öỊ̈߳»ÕâN¸öÏ̲߳»Í£µÄÔÚ ¼àÌýN¸öCOM¿ÚµÄÊý¾Ý£»µ±·ÖÎöÊý¾Ýʱ£¬ÓÐЩʱºòÒªµ¯³öapplication.messagebox ¶Ô»°¿òÅÐ¶Ï ÊÇ·ñ¼ÌÐø Ö´ÐÐỊ̈߳¬»¹ÊÇ¹ÒÆðÏ̡߳£µ±¶à¸öÏß³Ìͬʱ ......
´íÎóÌáʾΪ£º
Exception EOleSysError in module TwServer.exe at 0007CABD.
·ÃÎÊOLE×¢²á±í´íÎó
ËÄÜÌṩһϽâ¾ö°ì·¨°¡£¿
Delphi¼¸¿ª·¢µÄѽ?
ÒýÓÃ
Delphi¼¸¿ª·¢µÄѽ?
del ......