在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
function Test():Integer; inline; var P:Pointer; begin FreeMem(P); Result := AtomicIncrement(__gr); // __gr是全局变量 ShowMessage('abc'); end; procedure TForm1.btn4Click(Sender: TObject); var r:Integer; begin ShowMessage('ab'); Test(); end;
结论1: Result := AtomicIncrement(__gr);
===========================================================================================================================
function Test():Integer; inline; var P:Pointer; begin FreeMem(P); Result := AtomicIncrement(__gr); // __gr全局变量 ShowMessage('abc'); end; procedure TForm1.btn4Click(Sender: TObject); var r:Integer; begin ShowMessage('ab'); r := Test(); end;
结论2:
Result := AtomicIncrement(__gr); // __gr全局变量
|
2023-10-27
2022-08-15
2022-08-17
2022-09-23
2022-08-13
请发表评论