delphiÏ붨Òå¸ö ÕûÐÍÖ¸Õëµ±²ÎÊýµÄ ¹ý³Ì Ôõô¶¨Ò壿
delphiÖУ¬¹ý³ÌÖÐÓиöÕûÐ͵ÄÖ¸Õë²ÎÊýÔõô¶¨Òå
procedre pd1(iPointer:integer^);
begin
iPointer^:=iPointer^+1;
end;
ÕâÑù²»ÐÐѽ¡£
procedure pd1(pValue: PInteger);
²»ÊÇÌØÊâÐèÒª£¬DelphiÒ»°ã¶¼ÊÇÓÃÒýÓ㬺ÜÉÙÓÃÕâÀàÖ¸ÕëÀàÐÍ×÷ÐβΣº
procedre pd1(var iPointer: integer);
begin
iPointer :=iPointer + 1;
end;
Ö¸Õë×÷Ϊ²ÎÊýµÄÀàÐÍʱ£¬ÐèÒªÏȰÑËü¶¨ÒåΪһ¸öÀàÐÍ
type
Pxxx=^Txxx;
È»ºó
procdure fun(x:Pxxx);
ѧϰÁË¡£
ÓÃÒýÓþͿÉÒÔ
maozefa µÄ»Ø´ðºÜok
Ïà¹ØÎÊ´ð£º
Õâ¸öÊÇÀ¹½Ø°´¼üÏûÏ¢²¢²âÊÔÊÇ·ñΪENTER¼ü¡£
begin
case wParam of
WM_KEYDOWN:
fEatKeystroke := (p.vkCode = VK_RETURN);
& ......
ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£
µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË
ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......
ÕâÓïÑÔºÃÄѰ¡ ѧdelphi¼òµ¥ ¿Þ
Ò»¸ödll ºÍÒ»¸ö Ö¸Õ뺯Êýµ÷Óà ¸ãÁËÎÒ2Àñ°Ý »¹ÊÇÔÚÎÒÓÐdelphi»ù´¡µÄÇé¿öÏ ¿Þ
ÄÑ¶È ±È delphi ¸ßºÜ¶à¡£¼ÌÐøÅ¬Á¦Ñ§°¡¡£
ºÃÏñÒ²²¢²»±ÈdelphiÄѶàÉÙ°É
Ö÷Òª´úÂë ²»Ö±¹ÛÁË¡ ......
procedure RunFunction;
type
TFunc = function(A: Integer): Integer;stdcall;¡¡//ÕâÀï¸ù¾ÝDLLÀïÃæº¯ÊýµÄÉùÃ÷ÐÞ¸Ä
var
......
×òÍíÔÚDelphiÊý¾Ý¿â²éѯÖÐÓöµ½ÁËÒ»¸öÒɻ󡣴úÂëÈçÏ£º
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
XY : string;
begin
XY := comboboxxy.Items[comboboxx ......