Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

delphiת»»³ÉvcµÄÎÊÌâ - VC/MFC / »ù´¡Àà

Delphi(Pascal) code:

function Test(script: pchar; enable: boolean;allocid: integer):boolean; stdcall;
//************************************
var
null:integer;
//********************************
null:=-1;
Test(pchar(memo1.text),true,@null);



ÆäÖÐ delphiµÄmemo1µÄÊôÐÔScrollbarsΪSSBoth.¿ÉÒÔ½ÓÊܶàÐÐÎı¾

55·ÖÊÇÈ«²¿µÄ·ÖÁË Çë¸÷λ´óÉñÖ¸½Ì
¶î¡£·¢´í¡£
function Test(script: pchar; enable: boolean;allocid:pinteger):boolean; stdcall;

Õâ¸öº¯Êý¶¨ÒåÓ¦¸ÃÊÇÕâÑù ×îºóÒ»¸öÊÇpinteger

pintegerÓ¦¸ÃÊÇ int*¡£

_stdcall bool Test(char* p, bool bFalg, int* pi)



ÎÒÖªµÀÄǸöº¯ÊýÔõôתÀ²- -
¹Ø¼üÊÇÏÂÃæÄǸö
Ëûmemo1¿ÉÒÔÖ±½ÓÔÚlinesÉèÖÃ×Ö·û´® µ«ÊÇVC²»ÖªµÀÔÚÄÄÉèÖà »¹ÊǵÃÓÃAPIÉèÖã¿

ÓÐÈ˰ïÏÂæÂð- -


Ïà¹ØÎÊ´ð£º

DelphiµÄÓï·¨ÎÊÌâ - Delphi / ÓïÑÔ»ù´¡/Ëã·¨/ϵͳÉè¼Æ

Àý×Ó³ÌÐò¼û¸½¼þ£¬ÓÃDelphi 7½øÐбàÒë
ÎÊÌâ´úÂëΪ 
Delphi(Pascal) code:
if Node.ChildNodes <> nil then
begin
for i := 0 to Node.ChildNodes.Count - 1 do
begin
cNode := N ......

ÓÃDelphi×öÒ»¸öÓ°ÔºÊÛÆ±¹ÜÀíϵͳ

ÀÏʦ²¼ÖÃÁËÒ»¸ö¿ÎÌ⣬ÐèÒªÓÃDelphi×öÒ»¸öÓ°ÔºÊÛÆ±¹ÜÀíϵͳ£¬µ«ÊÇÎÒÃÇ»¹Ã»ÓÐѧ¹ýDelphi£¬¸÷λ¸ßÊÖÄÜ·ñÖ¸µãһϣ¬ÈçºÎ½øÐÐϵͳÉè¼Æ£¬Ê±¼ä±È½Ï½ô¼±£¬Ð»Ð»°¡
ÎÒÒ²²»¶®£¬Ò²Ïëѧ£¡

ÎÒÒ²Êǰ¡£¬¸Ð¾õDelphiͦºÃµÄ£¬ÏÖ ......

¼òµ¥SQLÓïÑÔ - Delphi / Êý¾Ý¿âÏà¹Ø

Êý¾Ý£º Äê Ô ÈÕ ¿ªÅÌ ÊÕÅÌ
ʹÓÃÏÂÃæÓï¾äËÑË÷µ½ÁË Ã¿Äêÿ¸öÔµÄÔ³õºÍÔÂÄ©¶¼ÊǼ¸ºÅ  
select Äê,ÔÂ,MIN(ÈÕ) as frist,MAX(ÈÕ) AS laset from mt4his.DB GROUP BY Äê,ÔÂ
ÎÒÏëµÃµ½ ÿÄêÿ¸öÔµÄÔ³õºÍÔÂÄ© ......

delphi ¿ò¼Ü - Delphi / VCL×é¼þ¿ª·¢¼°Ó¦ÓÃ

ÓÐûÓа취ʵÏÖ¸úQQÓÊÏäÒ»ÑùµÄЧ¹û£¬µã»÷×ó±ßµÄ²Ëµ¥£¬ÓÒ±ßˢУ¬¶à¸öÒ³Ãæ¼äÇл»£¬¶ø×ó±ßµÄ²Ëµ¥À¸²»±ä
ÓÐºÜ¶à¿Ø¼þ¿ÉÒÔʵÏÖ

µÈÄã·Ö¼Ó·Ö£¬ÎÒ¸øÄãд¸öÔ´Âë¡£Õâµã·ÖʵÔÚûÓж¯Á¦»Ø´ð¡£

ExpressBars

¿´¿´¡£

Ò ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ