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 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ͦºÃµÄ£¬ÏÖ ......
Êý¾Ý£º Äê Ô ÈÕ ¿ªÅÌ ÊÕÅÌ
ʹÓÃÏÂÃæÓï¾äËÑË÷µ½ÁË Ã¿Äêÿ¸öÔµÄÔ³õºÍÔÂÄ©¶¼ÊǼ¸ºÅ
select Äê,ÔÂ,MIN(ÈÕ) as frist,MAX(ÈÕ) AS laset from mt4his.DB GROUP BY Äê,ÔÂ
ÎÒÏëµÃµ½ ÿÄêÿ¸öÔµÄÔ³õºÍÔÂÄ© ......
ÓÐûÓа취ʵÏÖ¸úQQÓÊÏäÒ»ÑùµÄЧ¹û£¬µã»÷×ó±ßµÄ²Ëµ¥£¬ÓÒ±ßˢУ¬¶à¸öÒ³Ãæ¼äÇл»£¬¶ø×ó±ßµÄ²Ëµ¥À¸²»±ä
ÓÐºÜ¶à¿Ø¼þ¿ÉÒÔʵÏÖ
µÈÄã·Ö¼Ó·Ö£¬ÎÒ¸øÄãд¸öÔ´Âë¡£Õâµã·ÖʵÔÚûÓж¯Á¦»Ø´ð¡£
ExpressBars
¿´¿´¡£
Ò ......