我正在寻找一个简单的(如果存在的)算法来找到球体表面上一组点的Voronoi图.源代码会很棒.我是德尔福人(是的,我知道......),但我也吃C代码.
在我的Delphi程序中,我想显示应用程序生成的一些信息.没什么好看的,只有2列文字,部分字样用彩色编码.
我想我基本上有两个选择:
HTML更标准,但似乎加载速度较慢,我不得不处理The Annoying Click Sound.如今,RTF仍然是一个不错的选择吗?
编辑:
来自dangph的好问题:"生成的文档会发生什么?"
查看后文件将被丢弃.
我有一个带有OK一个Cancel按钮的模态对话框.对于OK我将Default
属性设置为True,对于Cancel按钮Cancel
属性.ModalResult设置为mrOK
和mrCancel
,分别为.
但是,无论是按键盘上Enter的Esc键还是键,都不会关闭对话框.我在这里想念的是什么?
编辑
我使用我网站上的可疑对话框发布了一个小测试应用程序.IDE是RAD Studio XE3.
在Mathematica
a = FactorInteger[44420069694]
Run Code Online (Sandbox Code Playgroud)
受让人
{{2, 1}, {3, 1}, {7, 1}, {11, 2}, {13, 1}, {23, 2}, {31, 1}, {41, 1}}
Run Code Online (Sandbox Code Playgroud)
到了.现在,我希望每个列表都扩展,而不是指数的因素.然后上述分解将成为
{2, 3, 7, 11, 11, 13, 23, 23, 31, 41}
Run Code Online (Sandbox Code Playgroud)
我写了以下函数:
b = {}; Do[Do[b = Append[b, a[[i]][[1]]], {a[[i]][[2]]}], {i, Length[a]}]
Run Code Online (Sandbox Code Playgroud)
但如果你问我看起来很难看.肯定有一个更简洁的方法来实现这一目标吗?
我正在从磁盘加载图像,并希望将其(部分)复制到第二个TImage:
Image1.Picture.LoadFromFile(S);
with Image1.Picture.Bitmap do
Image2.Canvas.CopyRect(Image2.Canvas.ClipRect, Canvas, Canvas.ClipRect);
Run Code Online (Sandbox Code Playgroud)
Image2只显示一个白色矩形,Image1不显示磁盘上的文件.如果我删除第二个语句Image1确实显示图像.(奇怪的事情:如果我只注释掉CopyRect语句,并留下了"与"行(空语句)此搜索不显示任何!)
如何使用CopyRect复制部分图像?
编辑
当我将两个语句拆分为两个单独的操作(按钮)时,会发生以下情况:
顺便说一下,我正在使用Delphi 2009.
在这个问题中,我询问了CopyRect方法的正确用法.我得到了一个解决问题的答案,但现在复制的矩形的颜色是错误的(限制为256个值?).这是代码:
var
Bmp: TBitmap;
begin
Image1.Picture.LoadFromFile(SomeJPGimage);
Bmp := TBitmap.Create;
try
Bmp.Assign(Image1.Picture.Graphic);
with Bmp do
Image2.Canvas.CopyRect(Image2.Canvas.ClipRect, Canvas, Canvas.ClipRect);
finally
Bmp.Free;
end;
end;
Run Code Online (Sandbox Code Playgroud)
假色的插图是Image2.如果我不调整大小,颜色是正确的.
调整大小时如何获取源图像(JPG)的24位颜色?
编辑
Draw不是另一种选择; 我想复制源图像部分的缩放版本.
我在我的Delphi应用程序中使用了一个TWebbrowser组件,其内容我以编程方式加载:
(aWebBrowser.Document as IPersistStreamInit).
Load(TStreamAdapter.Create(aMemoryStream))
Run Code Online (Sandbox Code Playgroud)
在每次加载时,组件都会产生恼人的咔嗒声.可以禁用吗?
TIA
我想从 PDF 文档中的任意页面(即不一定是第一页)制作快照图像。有这方面的免费工具吗?我正在使用德尔福。
蒂亚·
史蒂文
子域名是否存在跨域策略限制?
如果我有一个应用程序paint.xxxx.com
正在操作图像image.xxxx.com
,是否有任何跨域问题?
我问这些问题,因为我正在考虑在子域上放置代理.
delphi ×6
algorithm ×1
colors ×1
cross-domain ×1
firefox ×1
font-awesome ×1
geometry ×1
html ×1
math ×1
modal-dialog ×1
page-layout ×1
pdf ×1
rtf ×1
snapshot ×1
voronoi ×1