const
cName = 'Name' ;procedure GetName ;
var
Name:string ;
begin
...
cName 操作 ;
end;procedure main
begin
GetName ;
end;
---------程序1-----------
const
cName = 'Name' ;procedure GetName(sName:string);
var
Name:string ;
begin
...
sName 操作 ;
end;procedure main
begin
GetName(cName) ;
end;
---------程序2-----------
请问各位会选择程序1还是程序2,理由?
cName = 'Name' ;procedure GetName ;
var
Name:string ;
begin
...
cName 操作 ;
end;procedure main
begin
GetName ;
end;
---------程序1-----------
const
cName = 'Name' ;procedure GetName(sName:string);
var
Name:string ;
begin
...
sName 操作 ;
end;procedure main
begin
GetName(cName) ;
end;
---------程序2-----------
请问各位会选择程序1还是程序2,理由?
解决方案 »
- 关于p2p中,穿透nat的不稳定性问题
- 我在delphi中安装了控件,多余重复的属性如何解决??
- ShellExecute运行外部程序问题?
- IntraWeb中的IWGrid要删一行记录怎样做?????
- oracle中clob,blob字段
- 我在DLL中做了一个键盘钩子,收到一个特定的消息后用SENDMESSAGE向我的主窗口发一个WM_USER+1,但是在有些情况主窗口收不到,我想知道有没
- 一个有关了SOCKET的问题,大家进来帮帮我~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
- FFmpeg支持的最高码率
- 请过来看看
- 请问各位,DELPHI中的流是什么东西呀
- !!!讨论!!!成品有很多系列及型号,不同系列及型号由很多部件或零件组成,常规配置有2千多种,客户可定制,即部件和零件客户可选,6
- 关于delphi的通讯问题,分不是问题,帮顶也有分!
程序1: 只为 cName = 'Name' ; 服务
程序2: 可以自己传参数进去,灵活一点,
看你怎么用了,如果GetName这个函数只为'Name'服务的话就选1了,否则选2