Overload
Specifies that a procedure name can be overloaded
Declare [Static] Sub procedure_name Overload [cdecl|stdcall|pascal] [Alias "external_name"] [([parameter_list])] [Constructor [priority]] [Static] [Export]
Declare [Static] Function procedure_name Overload [cdecl|stdcall|pascal] [Alias "external_name"] [([parameter_list])] As return_type [Static] [Export]
[Public|Private] Sub procedure_name Overload [cdecl|stdcall|pascal] [Alias "external_name"] [([parameter_list])] [Constructor [priority]] [Static] [Export]
[Public|Private] Function procedure_name Overload [cdecl|stdcall|pascal] [Alias "external_name"] [([parameter_list])] As return_type [Static] [Export]
In procedure declarations, Overload allows procedure names to be overloaded, that is, other procedures can then be declared with the same name if their parameter lists are unique. Two parameter lists are unique if they contain a different number of parameters, or have parameters of different types. Note that this means that two or more procedures cannot be declared with the same name if they differ in return type alone.
Once a procedure name has been declared overloaded, further declarations using the name need not specify *Overload*, but it is allowed.
Overload is not necessary in member procedure declarations, as they are always implicitly overloaded.
Syntax
Declare [Static] Sub procedure_name Overload [cdecl|stdcall|pascal] [Alias "external_name"] [([parameter_list])] [Constructor [priority]] [Static] [Export]
Declare [Static] Function procedure_name Overload [cdecl|stdcall|pascal] [Alias "external_name"] [([parameter_list])] As return_type [Static] [Export]
[Public|Private] Sub procedure_name Overload [cdecl|stdcall|pascal] [Alias "external_name"] [([parameter_list])] [Constructor [priority]] [Static] [Export]
..procedure body..
End Sub[Public|Private] Function procedure_name Overload [cdecl|stdcall|pascal] [Alias "external_name"] [([parameter_list])] As return_type [Static] [Export]
..procedure body..
End FunctionDescription
In procedure declarations, Overload allows procedure names to be overloaded, that is, other procedures can then be declared with the same name if their parameter lists are unique. Two parameter lists are unique if they contain a different number of parameters, or have parameters of different types. Note that this means that two or more procedures cannot be declared with the same name if they differ in return type alone.
Once a procedure name has been declared overloaded, further declarations using the name need not specify *Overload*, but it is allowed.
Overload is not necessary in member procedure declarations, as they are always implicitly overloaded.
Example
Declare Function SUM Overload (A As Integer,B As Integer) As Integer
Declare Function SUM Overload (A As Single,B As Single) As Single
Function SUM (A As Integer,B As Integer) As Integer
Function=A+B
End Function
Function SUM (A As Single,B As Single) As Single
Function=A+B
End Function
Dim As Integer A,B
Dim As Single A1,B1
A=2
B=3
A1=2.
b1=3.
Print SUM(A,B)
Print SUM (A1,B1)
Sleep
Declare Function SUM Overload (A As Single,B As Single) As Single
Function SUM (A As Integer,B As Integer) As Integer
Function=A+B
End Function
Function SUM (A As Single,B As Single) As Single
Function=A+B
End Function
Dim As Integer A,B
Dim As Single A1,B1
A=2
B=3
A1=2.
b1=3.
Print SUM(A,B)
Print SUM (A1,B1)
Sleep
Differences from QB
- New to FreeBASIC
See also
