文档章节

试试带参数的 Exit

涂孟超
 涂孟超
发布于 2014/09/26 15:37
字数 79
阅读 7
收藏 0
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

function fun(str: string): string;
begin
  if str = '' then Exit('空'); {Delphi 2009 支持}
  Result := str + str;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  s: string;
begin
  s := fun('ABC');
  ShowMessage(s);  {ABCABC}

  s := fun('');
  ShowMessage(s);  {空}
end;

end.

 
 
 
 
 

 

 

  

本文转载自:http://www.cnblogs.com/del/archive/2008/08/12/1266439.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
私信 提问
35:python中的异常

Python提供了两个非常重要的功能来处理异常和错误: 1) 异常处理try….except 2) 断言assert 异常和断言,可以用于我们调试python程序,跟踪程序执行状态,尽快排查问题。 35.1 python中的...

下家山
2017/08/05
0
0
exit-shell退出状态

1. intruduction exit 使shell(脚本)以指定状态值退出, 不带参数执行exit时,shell或脚本以最后执行命令的状态值退出。 shell退出前, trap会捕猎EXIT信号。0表示执行成功,非0值表执行失败。...

adelphos
2015/04/20
0
0
PHP跳出循环的方法及continue、break、exit的区别

continue continue 是用来用在循环结构中,控制程序放弃本次循环continue语句之后的代码并转而进行下一次循环。continue本身并不跳出循环结构,只是放弃这一次循环。如果在非循环结构中(例如...

度_
2018/10/08
0
0
python functools.wraps装饰器模块

这里实现一个完整的判断是否带参数的装饰器: 执行结果: D:Python27python.exe D:/Python/functools_study/完整的装饰器.py 这是不带参数的装饰器,开始执行 3 结束执行: 5.08444509009e-05...

_周小董
2017/12/24
0
0
Eclipse 无法启动 JVM terminated. Exit code=-1

1、自从公司配了2G内存的PC后,想让Eclipse跑的欢畅点,就调整eclipse.ini里头的内存大小,如下: -showsplash org.eclipse.platform --launcher.XXMaxPermSize 456M -framework plugins\or...

黄平俊
2009/09/12
11K
9

没有更多内容

加载失败,请刷新页面

加载更多

漏洞防御与修复工作

漏洞管理工作是企业安全建设必不可少的一环,在风险管理工作中,漏洞管理能够防患于未然,企业对漏洞管理有着广泛的基础建设和实践经验。但随着攻防技术的发展,传统漏洞管理的安全技术和管理...

linuxprobe16
33分钟前
1
0
MicroPython技术及应用前景

1 Micropython技术是什么? MicroPython极精简高效的实现了Python3语言。它包含Python标准库的一小部分,能在单片机和受限环境中运行。 1.1 MicroPython发展 由剑桥大学的理论物理学家乔治....

bodasisiter
39分钟前
1
0
跟我学Spring Cloud(Finchley版)-13-通用方式使用Hystrix

本节详细讲解使用Hystrix的通用方式。 简介 Hystrix是由Netflix开源的一个延迟和容错库,用于隔离访问远程系统、服务或者第三方库,防止级联失败,从而提升系统的可用性与容错性。Hystrix主要...

周立_ITMuch
48分钟前
1
0
🛠️Hanjst/汉吉斯特更新加JavaScript运行时优化等

这是 Hanjst/汉吉斯特 发布以来的首个主要升级更新版本。这次的主要升级更新的内容包括移除HTML Comments注释行, 优化在 Hanjst include模板文件时的JavaScript运行时环境。 Hanjst 在设计和...

wadelau
今天
2
0
OSChina 周六乱弹 —— 舔狗是没有好下场的

Osc乱弹歌单(2019)请戳(这里) 【今日歌曲】 @我没有抓狂 :#今天听什么# #今天听这个# 分享 Nirvana 的歌曲《Smells Like Teen Spi...》 《Smells Like Teen Spi...》- Nirvana 手机党少...

小小编辑
今天
538
14

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部