文档章节

学习官方示例 - System.Frac: 返回小数部分

涂孟超
 涂孟超
发布于 2014/09/26 15:34
字数 74
阅读 1
收藏 0
点赞 0
评论 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}

procedure TForm1.Button1Click(Sender: TObject);
var
  x,y: Real;
begin
  x := Frac(456.123);
  y := Frac(-456.123);

  ShowMessage(FloatToStr(x)); {返回:0.123}
  ShowMessage(FloatToStr(y)); {返回:-0.123}
end;

end.

 
 
 
 
 

 

 

  

本文转载自:http://www.cnblogs.com/del/archive/2008/09/11/1289081.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
《Python从小白到大牛》第6章 数据类型

在声明变量时会用到数据类型,在前面已经用到一些数据类型,例如整数和字符串等。在Python中所有的数据类型都是类,每一个变量都是类的“实例”。没有基本数据类型的概念,所以整数、浮点和字...

tony关东升
07/09
0
0
如何解决0.1 +0.2===0.30000000000000004类问题

上篇博客深度剖析了0.1+0.2 === 0.30000000000000004的原因。 这篇博客将主要提供几种解决小数精度丢失问题的Javascript类库的代码示例,以及简单的原生EcmaScript方法的代码示例。 一.类库部...

趁你还年轻
2017/11/08
0
0
如何解决0.1 +0.2===0.30000000000000004类问题

上篇博客深度剖析了0.1+0.2 === 0.30000000000000004的原因。 这篇博客将主要提供几种解决小数精度丢失问题的Javascript类库的代码示例,以及简单的原生EcmaScript方法的代码示例。 一.类库部...

趁你还年轻233
2017/11/08
0
0
智能合约语言Solidity语法详解 - 类型介绍1

现在的Solidity中文文档,要么翻译的太烂,要么太旧,决定重新翻译下。 尤其点名批评极客学院名为《Solidity官方文档中文版》的翻译,机器翻译的都比它好,大家还是别看了。 写在前面 Solidi...

熊丽兵
2017/12/06
0
0
Python类型——数字类型

“//”取整除 - 返回商的整数部分 Eg:9//2 输出结果 4 , 9.0//2.0 输出结果 4.0 “<>”不等于 - 比较两个对象是否不相等,这个运算符类似 != (但在Python3.0中,“<>”符号已被移除) Eg:...

Cattleya_W
2016/03/08
32
0
python学习之数字

coerce() 内建函数来帮助你实现这种转换 *位运算符(只适用于整数) 位运算符 功能 ~num 单目运算,对数的每一位取反。结果为 num1 << num2 Num1 左移 num2 位 num1 >> num2 Num1 右移 num2...

happyliferao
2015/10/12
5
0
智能合约语言 Solidity 教程系列1 - 类型介绍

现在的Solidity中文文档,要么翻译的太烂,要么太旧,决定重新翻译下。尤其点名批评极客学院名为《Solidity官方文档中文版》的翻译,机器翻译的都比它好,大家还是别看了。 写在前面 Solidi...

Tiny熊
05/17
0
0
[翻译]ElasticSearch官方文档-查询语言

本文翻译自:https://www.elastic.co/guide/en/elasticsearch/reference/current/introducingthequery_language.html 本文是Elasticsearch的入门文档,将会介绍ElasticSearch中的查询语言。 ......

飞来来
2017/11/05
0
0
js 实现四舍五入&fixed方法异常处理

JS四舍五入的函数:toFixed(n),n为要保留的小数位数,n取0~20。 问题:当n超过20的时候,JS会出错。 举例一: 输出结果:10.01 举例二: 输出结果:0.00 解决方案: (一)对JS中的Numbe...

荆瑶
2016/10/31
15
0
[翻译]ElasticSearch官方文档-执行查询和过滤操作

image 本文翻译自:https://www.elastic.co/guide/en/elasticsearch/reference/current/executingsearches.html#executing_searches 本文是Elasticsearch的入门文档,将会介绍ElasticSearch......

飞来来
2017/11/15
0
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

RESTful API 设计规范

关于「能愿动词」的使用 为了避免歧义,文档大量使用了「能愿动词」,对应的解释如下: 必须 (MUST):绝对,严格遵循,请照做,无条件遵守; 一定不可 (MUST NOT):禁令,严令禁止; 应该 (S...

niithub
10分钟前
0
0
Spring Cloud云服务架构 - common-service 项目过程构建

我们将对common-service整个项目进行剖析,将整个构建的流程给记录下来,让更多的关注者来参考学习。 首先在构建spring cloud的common-service之前,我们需要准备的技术: Maven(项目构建)...

itcloud
12分钟前
0
0
oracle 如何查看日志?

Oracle日志查看一.Oracle日志的路径:登录:sqlplus "/as sysdba"查看路径:SQL> select * from v$logfile;SQL> select * from v$logfile;(#日志文件路径)二.Oracle日...

youfen
13分钟前
0
0
sap netweaver developer studio安装svn插件

问题 我现在在Sap的IDE(netweaver developer studio)上面安装svn插件。 步骤 确定IDE使用的eclipse版本 Help→About SAP NetWeaver Developer Studio→Installation Details→Features→F...

亚林瓜子
19分钟前
0
0
大数据开发学习的内容介绍,成都大数据培训机构哪里好?

大数据开发培训已经成为了越来越多人的选择,大数据开发工程师也是各公司争相争夺的金领人才之一了,在当今科技发展非常迅速的社会里,越来越多人把职业规划投向了大数据开发。这里为大家整理...

加米谷大数据
24分钟前
2
0
函数

函数 函数是Python中最主要也是最重要的代码组织和复用手段。作为最重要的原则,如果你要重复使用相同或非常类似的代码,就需要写一个函数。通过给函数起一个名字,还可以提高代码的可读性。...

火力全開
26分钟前
0
0
gulp-webserverf启动服务,局域网无法访问

如题,gulp-server启动的服务,只能本机访问,局域网通过ip无法访问; 启动的其它项目,均可以访问成功; 网上资源,很多说什么防火墙之类的问题,都无果; 只需要给启动服务添加参数即可, ...

littleFaye
28分钟前
0
0
RabbitMQ实战:5种模式和示例

应用RabbitMQ的5种队列 一、简单队列 P:消息的生产者 C:消息的消费者 红色:队列 生产者实现思路: 创建连接工厂ConnectionFactory,设置服务地址127.0.0.1,端口号5672,设置用户名、密码...

spinachgit
29分钟前
0
0
mysql常见报错标号对应原因以及处理方法

mysql常见报错标号以及对应解决方法 报错标号 报错现象 解决方法 原因 1449 Cause: java.sql.SQLException: The user specified as a definer ('authplat_dev'@'%') does not exist 在控制台...

ChinaHYF
31分钟前
0
0
Java 监控系统技术选型

(1)操作系统监控 Sigar oshi (2)Tomcat监控 JMX 日志 (3)Oracle监控 日志 直连SQL查询 基于Druid连接池 (4)拓扑图 jtopo http://www.jtopo.com/demo/statictis.html...

cccyb
32分钟前
1
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部