copymemory(@dest,@source,length(source));
@作取地址用
The @ operator returns the address of a variable, or of a function, procedure, or method; that is, @ constructs a pointer to its operand. For more information about pointers, see Pointers and pointer types. The following rules apply to @.If X is a variable, @X returns the address of X. (Special rules apply when X is a procedural variable; see Procedural types in statements and expressions.) The type of @X is Pointer if the default {$T杴 compiler directive is in effect. In the {$T+} state, @X is of type ^T, where T is the type of X.
If F is a routine (a function or procedure), @F returns F抯 entry point. The type of @F is always Pointer.When @ is applied to a method defined in a class, the method identifier must be qualified with the class name. For example,@TMyClass.DoSomethingpoints to the DoSomething method of TMyClass. For more information about classes and methods, see Classes and objects.
@作取地址用
The @ operator returns the address of a variable, or of a function, procedure, or method; that is, @ constructs a pointer to its operand. For more information about pointers, see Pointers and pointer types. The following rules apply to @.If X is a variable, @X returns the address of X. (Special rules apply when X is a procedural variable; see Procedural types in statements and expressions.) The type of @X is Pointer if the default {$T杴 compiler directive is in effect. In the {$T+} state, @X is of type ^T, where T is the type of X.
If F is a routine (a function or procedure), @F returns F抯 entry point. The type of @F is always Pointer.When @ is applied to a method defined in a class, the method identifier must be qualified with the class name. For example,@TMyClass.DoSomethingpoints to the DoSomething method of TMyClass. For more information about classes and methods, see Classes and objects.
若X為一變量, @X返回X的地址;
若F為一Fnction或Procedure, @F返回F的入口點,@F的類型總是Pointer;
若@作用于類的方法時,則必須用類名限定方法名:
@TMyClass.DoSomething,它指向TMyClass的方法DoSomething.
(註: 以上引用 Object Pascal 參考手冊Ver1.0)
建議看一看Object Pascal基本語法(若愿意,把Email地址放上來,我可以給你丟過去!).
[email protected]