Dephi 函数中的 InLine 关键字用法

最新推荐文章于 2025-02-26 12:38:53 发布
最新推荐文章于 2025-02-26 12:38:53 发布
阅读量1k 收藏
点赞数
文章标签： 编译器
本文探讨了C++中inline函数的应用及限制条件。inline函数通过避免传统函数调用带来的开销来提升程序性能，适用于短小且频繁调用的代码片段。文章强调了inline函数不能包含复杂控制结构如switch或while，并且不适用于递归场景。

摘要生成于 C知道 ，由 DeepSeek-R1 满血版支持， 前往体验 >

inline 强类型, 不建立普通函数的栈调用环境和跳转代码,提高了运行效率
inline使用状况,一段代码非常短小,而且会被重复的大量运行,就可以考虑将他定义为inline函数
注意点:
   不能含有复杂的控制语句 如:switch,while等,不能是递归,否则编译器会将其当成一个普通函数,产生函数调用代码.

join牛牛
关注
Delphi常用关键字用法详解
yygyyygy1233的博客
02-08 424
Delphi常用关键字用法详解 更新时间：2014年07月19日 12:36:02 投稿：shichen2014 我要评论 这篇文章主要介绍了Delphi常用关键字用法,包括了各个常用的关键字及其详细用法,需要的朋友可以参考下 本文详细介绍了Delphi中常用的各个关键字名称及用法，供大家在编程过程中借鉴参考之用。详情如下： absolute： //它使得你能够创建一个新变量, 并且该变...
Delphi 关键字详解大全
yygyyygy1233的博客
11-06 668
absolute //它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同. var Str: string[32]; StrLen: Byte absolute Str; //这个声明指定了变量StrLen起始地址与Str相同. //由于字符串的第0个位置保存了字符串的长度, 所以StrLen的值即字符串长度. begin Str := ‘abc’; Edit1.Text := IntToStr(StrLen); end; abstract //它允许你创建抽象的方法, 包括有抽象方法的类称
Delphi下如何实现32位和64位都能用的Inline Hook
最新发布
passion的专栏
02-26 947
Hook在计算机术语中无论是直译为“钩子”，还是意译为“挂接”，均指的是一种对于现有机制的拦截。这个拦截实现后，会在运行期拦住现有某个流程，拐进自己的流程，自己做完特定事儿后，再按需要决定是否走回原流程。
delphi 超级hook inlinehook 类
10-28
delphi的超级hook类 纯原创，找了很久没找到 自己琢磨很久 注入yx。然后就可以愉快的hook了 处理方法暂不支持类方法 可以用了 有问题或建议可以联系我qq。
Delphi inline编译器优化问题
09-14 347
function Test():Integer; inline; var P:Pointer; begin FreeMem(P); Result := AtomicIncrement(__gr); // __gr是全局变量 ShowMessage('abc'); end; procedure TForm1.btn4Click(Sender:...
C中关键字inline用法
weixin_30572613的博客
07-08 163
一、什么是内联函数 在C语言中，如果一些函数被频繁的调用，不断地用函数入栈，即函数栈，则会造成栈空间或者栈内存的大量消耗，为了解决这个问题，特别的引入了inline关键字，表示为内联函数。栈空间指的是函数内数据的内存空间，在一个系统下，栈空间的资源是有限的，假如频繁大量的使用就会因栈空间的不足而导致出错，函数的死循坏递归调用的最终结果就是导致栈内存空间的枯竭。 像下面这个例子： #inc...
Delphi Inline Assembler
Trending Up...
12-19 2107
program Project1;{$APPTYPE CONSOLE}uses SysUtils;var str: string;{ Result := x + y }function add1(x, y: Integer): Integer;begin asm mov eax, x add eax, y mo
Delphi XE4 inline 的用法
weixin_30872733的博客
01-16 245
为了提高应用程序的性能，可以用inline声明一个函数过过程，对于声明为inline的过程，编译器在编译时，会取代正常的过程调用方式，取而代之是直接把这个函数的编译代码拿过来生成到调用该过程的地方，有多处调用一个函数，都直接在调用处插入函数的编译代码，这样的弊端，会生成较大的EXE文件。声明的方法：procedure MyFunc(x:integer):string;inline有多种情况的函数或...
Delphi之Pascal语言中的关键字及保留字汇总
09-04
以下是对Delphi中Pascal语言关键字和保留字的详细解释： 1. `absolute`：指示变量的内存位置是固定的，不随变量的类型变化而变化。 2. `abstract`：用于定义抽象方法，表示该方法没有实现，通常用于接口或抽象类中...
【Delphi函数与过程】：关键字在函数定义中的魔力解析
[【Delphi函数与过程】：关键字在函数定义中的魔力解析](https://opengraph.githubassets.com/a247e5490df54322898ca9453d72ccc60e1d16dff5cf5166cb0ea0a573f808f0/AnnoyingYugoslav/DelphiDll) # 摘要 本文对...
Delphi 7以来的新语法特性
10-17
内联函数（Inlining） D7中的inline关键字作为保留字并不会对编译器产生实际作用，在2009中此关键字起到内嵌到代码中起到实际作用。语法如下： function foo: Integer; inline; 内部函数/过程也可以使用，但在D2009测试版中，类方法的内部函数使用inline后不认Self指针；类的子过程/子函数，也可以使用inline关键字，但没有实际效果，且虚方法/继承方法（virtual/override）不能使用。 重载运算符（Operator Overloading） 可以重载部分运算符，如+、-、类型转换等，在D2006只支持到record，但从2007开始支持到Class，以下示例修改自官网： TMyClass = class // Addition of two operands of type TMyClass class operator Add(a, b: TMyClass): TMyClass; // Subtraction of type TMyClass class operator Subtract(a, b: TMyClass): TMyclass; // Implicit conversion of an Integer to type TMyClass class operator Implicit(a: Integer): TMyClass; // Implicit conversion of TMyClass to Integer class operator Implicit(a: TMyClass): Integer; // Explicit conversion of a Double to TMyClass class operator Explicit(a: Double): TMyClass; end; class operator TMyClass.Add(a, b: TMyClass): TMyClass; begin //... end; var x, y: TMyClass begin x := 12; // Implicit conversion from an Integer y := x + x; // Calls TMyClass.Add(a, b: TMyClass): TMyClass end; 类助手（Class Helpers） Helper是对原Class的扩展，是我们在不修改原类的基础上增加类方法，并加入原类的空间中。在Delphi中，对对象的调用实际上采用了两个步骤，首先是把对象地址放入eax寄存器中，然后call类方法，所以如果不使用继承类增加数据的话，用父类调用继承类的方法是没问题的，所以其实这样的方法在D7中也可以使用，但却很麻烦。所以Class Helper起到的就是这个作用，在Class Helper中可以增加的就是与实例无关的内容，所以任何需要增加实例Size的活VMT的功能不能声明，例如变量、虚方法等，但只占用类空间的没关系，如class var。在应用上我们可以通过这种方法方便的给VCL一类控件加上某个属性。 TFoo = class helper for TControl private function GetA: Integer; public class var X: Integer; procedure MSG(var Message: TMessage); message WM_MYMESSAGE; procedure ProcFoo; property A: Integer read GetA; end; // ... procedure TForm1.Foofoo; begin ProcFoo; // TControl -> TWinControl -> TScrollingWinControl-> TCustomForm -> TForm -> TFrom1: Call TFoo.ProcFoo end; strict关键字（Keyword “strict”） 众所周知，在Delphi中，类的private和protected域中的变量可以被同一单元中可以自由的被访问（Delphi的类没有“友元”的概念，但同一个unit中可以说自动友元化了），而并非是真正的私有或只能被继承类访问。而strict关键字的作用就是使该内容变成严格OO意义上的private/protected作用域，这点没有什么多说的。语法： strict private // Blah... strict protected // Blah... 结构方法（Records with Methods） 也没什么特别的，就是和class差不多，就一个不用创建和销毁、不能继承、没有作用域之类的类，很容易掌握，所以这里就不多介绍了。但是很有意思的是带参数的constructor可以通过编译，可能是为了初始化的方便吧。 抽象类和固实类（Abstract and Sealed Classes） 这两个概念在OO中也并不陌生，抽象类是不应该创建实例的（但D2006起的编译器就不给检查，连个Warning都没有，这还有啥用啊 -.- ），而固实类是不能被继承的。语法： TAnAbstractClass = class abstract // or (TParentClass) // Blah... end; TASealedClass = class sealed(TAnAbstractClass) // or empty // Blah... end; 类常量、类变量、类属性与静态类方法（Class const/var/property and Static Class Methods） 老的Delphi中只提供了类方法，而没有提供类变量、类常量和类属性，这真的是很不方便。这里先区分一下我所使用的类（Class）和对象（Object）即类的实例（Instance of Class）。当在Delphi中声明一个类的时候，这个类是有实际地址的，该地址记录了许多类的相关信息，比如实例的Size啊、虚方法信息啊一堆东西，而创建一个对象的时候则把类实例化，在堆（Heap）中分配一块地址，包括内部数据和VMT之类的东西。在调用实例的时候，首先要知道对象地址，然后才能访问内部变量和调用方法时使用Self指针即实例地址；而在调用类方法的时候，eax中的并不是实例的地址而是类的地址，然后再call方法，这时的Self指针并非实例地址而是类地址。所以对于每一个类和继承类来说，包括它和它的继承类的所有实例，类变量、常量都是同一个，这样就存在了一个唯一的可供使用的变量或常量，方便同步并且不需要使用较多的内存（可以参考C#中的类，不过C#中不允许从实例直接访问类变量、常量、方法）。而静态类方法则是在使用这个类方法的时候不传入class地址，也就是说没有Self指针，这样的类方法的访问开销要小于普通的类方法；这自然也就意味着，该类方法不能被继承（不能virtual/override）。另外，类属性的get/set方法必须使用静态类方法。 TFooClass = class private class procedure SetFoo(const Value: Integer); static; // A Static Class Method protected class var FX : Integer; // class var public const FC: Integer = 10; // class const class procedure VirtualProc; virtual; class property X: Integer read FX write FX; // class property class property Foo: Integer read FC write SetFoo; end; 类内部类型与嵌套类（Class Types and Nested Classes） 可以说现在的Class的域几乎相当于原来的整个unit，以前不能放里面的元素现在都可以放里面了，这个也没什么好多说的，试验一下就很容易明白了。 终方法（Final Methods） 这个也是建立在虚方法的基础上的，在override后使用final关键字，则表示该虚方法不能再被子类继承下去了。 TAClass = class public procedure Foo; virtual; end; TFinalMethodClass = class(TAClass) public procedure Test; override; final; // A Final Method end; For-in循环（For-in Loop） 这个应该是受.Net影响吧，支持遍历一个数组或提供了GetEnumerator函数的类。GetEnumerator要求返回一个类的实例，该类包含有Current属性和MoveNext方法。 procedure Foo(List: TStrings); i : Integer; lst : array[0..100]of Integer; s : string; begin for i in lst do ; for s in List do ; // Support of TStrings.GetEnumerator end;
Delphi函数工厂：高效编程的核心
### Delphi函数在实际开发中的应用 在实际的软件开发中，Delphi函数可以用于许多不同的场景： - **数据处理和转换**：例如，映射数据结构，或者实现自定义的排序和过滤逻辑。 - **事件驱动编程**：使用函数作为...
inline 函数的深入解析
keep_moving_cqu的专栏
05-11 1341
inline函数只是对编译器的一种建议，编译器可以选择忽略这个建议，比如你将一个长达1000行的函数指定为inline，编译器就hi忽略这个inline，将这个函数还原成普通函数。（百度百科中看的）。。 先贴几个inline函数的例子吧：（百度百科中看的） 1.在类中定义这种函数： class ClassName{ ..... .... INT GetWidth(){return
Delphi7.0常用函数-属性-事件
ajuvfe4150的博客
03-11 752
abort 函数 引起放弃的意外处理 addexitproc 函数 将一过程添加到运行时库的结束过程表中 addr 函数 返回指定对象的地址 adjustlinebreaks 函数 将给定字符串的行分隔符调整为cr/lf 序列 allocmem 函数 在堆栈上分配给定大小的块 ansicomparestr 函数 比较字符串（区分大小写） ansicomparetext 函数 ...
Delphi语法（四）函数和过程
ForAnnuus的博客
04-18 1565
Delphi语法 第五章 函数和过程 例程
向Delphi 2009转移
weixin_34344677的博客
06-16 213
　　先前公司的一个项目因开发时间与项目定位导致结构失衡。在经过前段日子的评估与调查后，从今天开始进行重构。 　　也想趁这个机会，将界面的开发由Delphi 6转向Delphi 2009。从而逐步放弃Delphi 6这个用了近7年的开发工具。也知道在转移的过程中会碰到许多问题，因此在此处对这些问题进行记录（其中包含了很多警告信息，但偶喜欢追求０警告），以供参考。 １）首先将...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值