主页
Top.Mail.Ru Yandeks.Metrika
论坛:“主要”;
当前存档:2003.09.01;
下载:[xml.tar.bz2];

向下

带小数分隔符的毛刺 找到类似的分支


Franzy   (2003-08-17 12:37) [0]

博尔曼叔叔不会厌倦让我感到惊讶。 这一次,我的意外是由delfie处理小数分隔符的方式引起的,在我们看来,使用小数分隔符号。 毛刺出现是因为它们有这个标志 - 一个点,我们有一个逗号。
这是两个例子。 进行编辑。 用你的耳朵做出这样的假动作:edit.text:= floattostr(pi);
值pi:3,14159将出现在字段中...在SEPARATE之后还有多少字符。
我们进一步这样做:
val(edit.text,x,ErrorCode);
你认为pi的值会输入x吗? 绝不是。 将有完全3。 并且ErrorCode将等于“违规字符”编号,在本例中为2,即逗号不适合delfi,给它一点:)
这是一个具有区域标准的独木舟:) Delphi自己对要编写的标准数字感到困惑。

与此我正在写这个...如何处理这个垃圾?
我这样做:在应用val插入之前:

index.text [pos(index.text,“,”)]:=“。”;

但这是一个男人的决定,5多年来一直在帕斯卡尔身上,而且仅在一个月前搬到了德尔福。 也许尊敬的大师会告诉你最好的方法,使用Delphi的语法和软件功能(与Pascal相比),或者使用棘手的编译器设置(不提供区域标准:))



Просто случайный   (2003-08-17 12:47) [1]

在您的会话中,分配您需要的DecimalSeparator(记住默认设置),并在会话(程序)结束时,将所有内容恢复正常。 就个人而言,我是这样做的。



Anatoly Podgoretsky   (2003-08-17 12:54) [2]

无需向弗兰克叔叔滚动桶
Val不适用于区域设置,它适用于FloatToStr



Юрий Зотов   (2003-08-17 13:05) [3]

> Franzy©(17.08.03 12:37)
> Borman叔叔不会厌倦让我感到惊讶。

我也是 他对一切的想法如何。
X:= StrToFloat(Edit.Text);
一切都将根据地区设置。 并且不要更改DecimalSeparator /

德尔福本人很困惑
混淆。 但不是德尔福。
:o)

>只是随机(17.08.03 12:47)[1]

在与其他程序交换数据时,有一个真正的机会遇到错误。 例如,在Excel中卸载时。



pasha_golub   (2003-08-17 13:06) [4]

一致,如果你使用floattostr,然后侧面使用strtofloat。

2只是一个随机的
丑陋这样做,恕我直言



Anatoly Podgoretsky   (2003-08-17 13:15) [5]

哦多么丑陋



Franzy   (2003-08-17 15:02) [6]

总的来说,我更喜欢val而不是strtofloat,因为在后一种情况下,如果用户不在字段中输入数字,而是输入abracadabra,则可以运行运行时计时器,并且需要进行错误处理。 在Val中,此错误处理已经“连线”。 因此,我在一个方向使用val而在另一个方向使用smthtostr。

> 2只是随机的
我最喜欢你的选择:)如果你不与其他应用程序共享,为什么不使用它?
以及如何改变? 只需制作decimalseparator =“。”; ?

> 2阿纳托利
我对这个事实感到愤怒,在一个案例中使用区域标准,而不是在另一个案例中。 我知道这是为了与旧版本的兼容性而完成的...它可以覆盖函数:)

> 2尤里和帕维尔
见上文为什么我使用Val。 防止傻瓜......



Anatoly Podgoretsky   (2003-08-17 15:19) [7]

Franzy©(17.08.03 15:02)[6]
在一种情况下使用整数,字符串,字节会不会让您感到困扰?
有哪些功能和其他程序?
除了结束之外,还提供了针对傻瓜的保护,而不是在不适当的功能的帮助下。 或者您可以编写自己的函数,这更适合条件下的条件,没有人试图隐藏它在其中尝试除了结束并使它几乎与VAL兼容,顺便说一下它不是函数,但编译器替代此函数而不是此函数几个中的一个,取决于参数。 它应该像多年前的20一样工作,否则基于它的所有程序都会飞。 对于新的程序是StrToXXX和其他。 所以不可能覆盖。
你因缺乏经验而打击了他的叔叔,随着时间的推移,你会学会对自己冒犯。

关键是我对证书中可以强调上述事实并不完全满意。 关于伪程序和区域设置,与StrToFloat一样



Anatoly Podgoretsky   (2003-08-17 15:20) [8]

对弗兰克更友好



olookin   (2003-08-17 17:40) [9]

最多有这样的变量DecimalSeparator。 在这种情况下,当我启动程序时(在主窗体的OnCreate上),我只需编写DecimalSeparator:=“。” - 并且将来我和她一起工作...自然地,所有其他的功能/程序都把它作为一个有效的分隔符......



Palladin   (2003-08-17 17:47) [10]


> olookin©(17.08.03 17:40)[9]

你觉得它是怎么回事? 或者你是......关于你...



Anatoly Podgoretsky   (2003-08-17 17:53) [11]

olookin©(17.08.03 17:40)[9]
你能否为头部的其他功能提供一个截止点?
你与“他人”的不同之处在于对妓女的暴力和问题。



Просто случайный   (2003-08-17 18:44) [12]

2 Anatoly Podgoretsky©(17.08.03 12:54)[2]
<Val不适用于区域设置,但适用于FloatToStr>
哦甚至如何蔓延到 瓦尔
易于检查



Anatoly Podgoretsky   (2003-08-17 19:23) [13]

@@ dotExp:
CMP BL,“。” - “0”
JNE @@ exp



Mixa4   (2003-08-17 22:25) [14]

如果你还看看如何制作StrToXXX,你可以找到tryStrToXXX有趣的程序,让你避免繁琐的试块...除了!!!



Просто случайный   (2003-08-17 23:02) [15]

哪里有问题???
“完成”,然后我们将一起决定



Palladin   (2003-08-17 23:09) [16]

怎么在哪里 在那里,楼上,在第一个帖子。



Anatoly Podgoretsky   (2003-08-17 23:15) [17]

我故意带来了RTL的一段代码,它负责分隔符,在那里你可以看到一个硬编码点。 这是来自D7,但它在D7中是相同的,它不可能永远改变,因为很多东西都会崩溃。



Просто случайный   (2003-08-17 23:44) [18]

对不起,我在我的项目中(我不会告诉你哪个地方)允许用户在Edit中输入信息,然后我的问题(程序员)理解它而不发出运行时错误。 因此,我不太了解Podgoretsky或Palladin。
遗憾



Anatoly Podgoretsky   (2003-08-18 00:14) [19]

没有运行时错误,如果你注意到它建议使用try除了结束,但是用户非常感谢它们与程序员的格式无关,它更加明显,程序可以在任何本地化中运行,但只要它们得到程序员的支持,然后他们粗暴地发誓,他们必须使用一堆程序并进行简单的传输,通过缓冲区从一个到另一个,例如,到Excel。



Palladin   (2003-08-18 01:06) [20]

伙计们,所有你不喜欢Borcle叔叔的功能和程序,你可以通过实施他们的版本立即纠正。 幸运的是,Pascal是一件很棒的事情,如果不是全部的话,它会允许很多。 这只是你的决定是否会满足用户和你自己? 为了上帝的缘故安排。 不满意,屁股提供。
好吧,对不起,“3,14”是在Val的帮助下处理的,所以上帝命令他把自己的鼻子插入书中,更加可行,这样他就不再想回到这种教学方法了。



Страницы: 1 整个分支

论坛:“主要”;
当前存档:2003.09.01;
下载:[xml.tar.bz2];

楼上









内存:0.63 MB
时间:0.039 c
3-1337
椅子
2003-08-07 14:48
2003.09.01
提交


1-1426
可怕
2003-08-18 14:08
2003.09.01
Delphi7程序中丢失了有针对性的资源


3-1317
长Renat
2003-08-08 11:11
2003.09.01
执行SQL命令时出错


9-1269
Mef88
2003-02-28 17:10
2003.09.01
透明度高


14-1611
Veliar
2003-08-13 17:43
2003.09.01
挂起德尔福





南非荷兰语 阿尔巴尼亚人 阿拉伯语 亚美尼亚 阿塞拜疆 巴斯克 白俄罗斯 保加利亚语 加泰罗尼亚 简体中文 中国(繁体) 克罗地亚 捷克 丹麦语 荷兰人 英语 爱沙尼亚语 菲律宾人 芬兰 法文
加利亚西语 格鲁吉亚语 德语 希腊语 海地克里奥尔语 希伯来语 印地语 匈牙利 北日耳曼语 印度尼西亚人 爱尔兰语 意大利语 日本性玩偶 韩语 拉脱维亚 立陶宛 马其顿 马来语 马耳他语 挪威语
波斯语 波兰语 葡萄牙语 罗马尼亚 俄语 塞尔维亚 斯洛伐克 斯洛文尼亚 西班牙语 斯瓦希里 瑞典语 泰国人 土耳其 乌克兰 乌尔都语 越南人 威尔士语 意第绪语 孟加拉 波斯尼亚
宿务 世界语 古吉拉特语 豪萨语 苗族 伊博 爪哇 卡纳达语 高棉 老挝 拉丁语 毛利 马拉 蒙古人 尼泊尔 旁遮普 索马里 泰米尔人 泰卢固语 约鲁巴语
祖鲁
英文 Французский Немецкий Итальянский Португальский 俄文 Испанский