dfm算法
㈠ 什么是设计技术参数
参数化设计（Parametric）设计（也叫尺寸驱动Dimension-Driven）是CAD技术在实际应用中提出的课题，它不仅可使CAD系统具有交互式绘图功能，还具有自动绘图的功能。目前它是CAD技术应用领域内的一个重要的、且待进一步研究的课题。利用参数化设计手段开发的专用产品设计系统，可使设计人员从大量繁重而琐碎的绘图工作中解脱出来，可以大大提高设计速度，并减少信息的存储量。
由于上述应用背景，国内外对参数化设计做了大量的研究，目前参数化技术大致可分为如下三种方法：（1）基于几何约束的数学方法；（2）基于几何原理的人工智能方法；（3）基于特征模型的造型方法。其中数学方法又分为初等方法（Primary Approach）和代数方法（Algebraic Approach）。初等方法利用预先设定的算法，求解一些特定的几何约束。这种方法简单、易于实现，但仅适用于只有水平和垂直方向约束的场合；代数法则将几何约束转换成代数方程，形成一个非线性方程组。该方程组求解较困难，因此实际应用受到限制；人工智能方法是利用专家系统，对图形中的几何关系和约束进行理解，运用几何原理推导出新的约束，这种方法的速度较慢，交互性不好；特征造型方法是三维实体造型技术的发展，目前正在探讨之中。
参数化设计有一种驱动机制枣参数驱动，参数驱动机制是基于对图形数据的操作。通过参数驱动机制，可以对图形的几何数据进行参数化修改，但是，在修改的同时，还要满足图形的约束条件，需要约束间关联性的驱动手段枣约束联动，约束联动是通过约束间的关系实现的驱动方法。对一个图形，可能的约束十分复杂，而且数量很大。而实际由用户控制的，即能够独立变化的参数一般只有几个，称之为主参数或主约束；其他约束可由图形结构特征确定或与主约束有确定关系，称它们为次约束。对主约束是不能简化的，对次约束的简化可以有图形特征联动和相关参数联动两种方式。
所谓图形特征联动就是保证在图形拓补关系不变的情况下，对次约束的驱动，亦即保证连续、相切、垂直、平行等关系不变。反映到参数驱动过程就是要根据各种几何相关性准则去判识与被动点有上述拓补关系的实体及其几何数据，在保证原关系不变的前提下，求出新的几何数据。称这些几何数据为从动点。这样，从动点的约束就与驱动参数有了联系。依*这一联系，从动点得到了驱动点的驱动，驱动机制则扩大了其作用范围。
所谓相关参数联动就是建立次约束与主约束在数值上和逻辑上的关系。在参数驱动过程中，始终要保持这种关系不变。相关参数的联动方法使某些不能用拓补关系判断的从动点与驱动点建立了联系。使用这种方式时，常引入驱动树，以建立主动点、从动点等之间的约束关系的树形表示，便于直观地判断图形的驱动与约束情况。
由于参数驱动是基于对图形数据的操作，因此绘制一张图的过程，就是在建立一个参数模型。绘图系统将图形映射到图形数据库中，设置出图形实体的数据结构，参数驱动时将这些结构中填写出不同内容，以生成所需要的图形。
参数驱动可以被看作是沿驱动树操作数据库内容，不同的驱动树，决定了参数驱动不同的操作。由于驱动树是根据参数模型的图形特征和相关参数构成的，所以绘制参数模型时，有意识地利用图形特征，并根据实际需要标注相关参数，就能在参数驱动时，把握对数据库的操作，以控制图形的变化。绘图者不仅可以定义图形结构，还能控制参数化过程，就象用计算机语言编程一样，定义数据、控制程序流程。这种建立图形模型，定义图形结构，控制程序流程的手段称作图形编程。
在图形参数化中，图形编程是建立在参数驱动机制、约束联动和驱动树基础上的。利用参数驱动机制对图形数据进行操作，由约束联动和驱动树控制驱动机制的运行。这与以往的参数化方法不同，它不把图形转化成其他表达形式，如方程，符号等；也不问绘图过程，而是着重去理解图形本身，把图形看作是一个模型，一个参数化的依据，作为与绘图者“交流”信息的媒介。绘图者通过图形把自己的意图“告诉”参数化程序，参数化程序返回绘图者所需要的图形。它关心的是图形，也就是图形数据库的内容，边理解，边操作，因此运行起来简洁、明了；实现起来也较方便。
参数驱动是一种新的参数化方法，其基本特征是直接对数据库进行操作。因此它具有很好的交互性，用户可以利用绘图系统全部的交互功能修改图形及其属性，进而控制参数化的过程；与其他参数化方法相比较，参数驱动方法具有简单、方便、易开发和使用的特点，能够在现有的绘图系统基础上进行二次开发。而且适用面广，对三维问题也同样适用。
变量化方法
长期以来，变量化方法只能在二维上实现，三维变量化技术由于技术较复杂，进展缓慢，一直困扰着CAD厂商和用户。
全国首届CAD应用工程博览会上，一种新兴技术引起了与会者的广泛关注。这一被业界称为21世纪CAD领域具有革命性突破的新技术就是VGX。它是变量化方法的代表。
VGX的全称为variational Geometry Extended，即超变量化几何，它是由SDRC公司独家推出的一种CAD软件的核心技术。我们在进行机械设计和工艺设计时，总是希望零部件能够让我们随心所欲地构建，可以随意拆卸，能够让我们在平面的显示器上，构造出三维立体的设计作品，而且希望保留每一个中间结果，以备反复设计和优化设计时使用。VGX实现的就是这样一种思想。VGX技术扩展了变量化产品结构，允许用户对一个完整的三维数字产品从几何造型、设计过程、特征，到设计约束，都可以进行实时直接操作。对于设计人员而言，采用VGX，就象拿捏一个真实的零部件面团一样，可以随意塑造其形状，而且，随着设计的深化，VGX可以保留每一个中间设计过程的产品信息。美国一家着名的专业咨询评估公司D.H.Brown这样评价VGX：“自从10年前第一次运用参数化基于特征的实体建模技术之后，VGX可能是最引人注目的一次革命。”。VGX为用户提出了一种交互操作模型的三维环境，设计人员在零部件上定义关系时，不再关心二维设计信息如何变成三维，从而简化了设计建模的过程。采用VGX的长处在于，原有的参数化基于特征的实体模型,在可编辑性及易编辑性方面得到极大的改善和提高。当用户准备作预期的模型修改时，不必深入理解和查询设计过程。与传统二维变量化技术相比，VGX的技术突破主要表现在以下两个方面。
第一、VGX提供了前所未有的三维变量化控制技术。这一技术可望成为解决长期悬而未决的尺寸标注问题的首选技术。因为传统面向设计的实体建模软件，无论是变量化的、参数化的，还是基于特征的或尺寸驱动的，其尺寸标注方式通常并不是根据实际加工需要而设，往往是根据软件的规则来确定。显然，这在用户主宰技术的时代势必不能令用户满意。采用VGX的三维变量化控制技术，在不必重新生成几何模型的前提下，能够任意改变三维尺寸标注方式，这也为寻求面向制造的设计(DFM)解决方案提供了一条有效的途径。
第二、VGX将两种最佳的造型技术枣直接几何描述和历史树描述结合起来，从而提供了更为易学易用的特性。设计人员可以针对零件上的任意特征直接进行图形化的编辑、修改，这就使得用户对其三维产品的设计更为直观和实时。用户在一个主模型中，就可以实现动态地捕捉设计、分析和制造的意图。
在SDRC公司1997年6月20日宣布的新版软件I-DEAS Master Series 5中，已经用到了这一技术。而且，这一产品自在美国宣布之日起，已经在北美、欧洲和亚太等地区，引起了不小的冲击波。福特汽车公司已经决定把I-DEAS Master Series 5软件应用到开发完整产品的数字样车的各个方面，认为这一包含诸多新技术的产品是实现该公司“Ford 2000”目标的关键。在同年7月北京展览馆的全国首届CAD应用工程博览会上，I-DEAS Master Series 5再度掀起热浪，其VGX技术已经初露锋芒。
㈡ 数据结构的排序怎么比较时间
LARGE_INTEGER litmp;
LONGLONG qt1,qt2;
double dft,dff,dfm;
QueryPerformanceFrequency(&litmp);//获得时钟频率
dff=(double)litmp.QuadPart;
QueryPerformanceCounter(&litmp);//获得初始值
qt1=litmp.QuadPart;
quicksort(A,n,k);//这里是放你写的排序
QueryPerformanceCounter(&litmp);//获得终止值
qt2=litmp.QuadPart;
dfm=(double)(qt2-qt1);
dft=dfm/dff*1000;//获得对应的时间值，单位为毫秒
这些函数在头文件 windows.h中
㈢ 关于Delphi中动态数组的问题
从TComponent下来的组件都有一个属性：Tag，可以利用这个属性满足你的要求,可以用类似这样的代码:
var
Form1: TForm1;
ImageBuffer: Array[0..2] of TImage;
implementation
{$R *.dfm}
procere TForm1.FormCreate(Sender: TObject);
begin
ImageBuffer[0] := TImage.Create(SELF);
ImageBuffer[0].Tag := 0;
...
ImageBuffer[0].OnClick := Image0Click;
ImageBuffer[1] := TImage.Create(SELF);
...
end;
procere TForm1.Image0Click(Sender: TObject);
begin
ShowMessage('Image0 Clicked!');
end;
Delphi语法还是很活的，只有想不到的，没有做不到的
㈣ 有关delphi的random随机函数使用问题
（看后面的例子）我不明白你说我写的这个不能解决问题？可能是你对我的意思不太明白吧。我干脆做一个实例出来，新建一个工程，在窗体上加一个按钮和一个MEMO.代码如下：
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Memo1: TMemo;
Button1: TButton;
procere Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
id:integer;
implementation
{$R *.dfm}
function MyRan(oldval:integer):integer;
begin
repeat
Result:=random(10);
until Result<>oldval;
end;
procere TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
for i:=0 to 100 do
begin
id:=MyRan(id);
Memo1.Lines.Add(inttostr(id)) ;
end;
end;
end.
点击按钮后，MEMO1里面就产生100个不与上一个重复的10以内数字。
变颜色有何难，新建一个工程，在窗体上加一个按钮，然后代码如下：
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procere Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
id:integer;
AColor: Array[0..3] of TColor;
implementation
{$R *.dfm}
function MyRan(oldval:integer):integer;
begin
repeat
Result:=random(4);
until Result<>oldval;
end;
procere TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
id:=MyRan(id);
Color:=AColor[id];
end;
begin
AColor[0]:=clRed;
AColor[1]:=clWhite;
AColor[2]:=clGreen;
AColor[3]:=clBlue;
end.
㈤ delphi四舍六入函数问题
在DELPHI中Round()和RoundTo()都是四舍五入的函数，但DELPHI用的四舍五入与一般的四舍五入不同，它采用的是四舍六入五留双。
即当舍或入位大于或小于五时按四舍五入来处理，而当舍或入位等于五时，就要看前面一位是什么，根据奇进偶不进，它总是返回一个偶数值。这种算法其实是按照银行家算法，统计学上一般都用这种算法，比传统的"四舍五入"要科学。在VB、.net相关的语言中都有这个问题。
例如：
表达式 返回值
Round(11.5) 12
Round(10.5) 10
RoundTo(1234567, 3) 1234000
RoundTo(1.234, -2) 1.23
RoundTo(1.235, -2) 1.24
RoundTo(1.245, -2) 1.24
如果要使用传统的"四舍五入"方法，可以使用下面函数：
function RoundEx(R: Real): Int64;
begin
Result:= Trunc(R);
if Frac(R) >= 0.5 then
Result:= Result + 1;
end;
function DRound(const Value: Extended; const Digit: Byte = 0): Extended;
var
tmp: Extended;
begin
tmp := Power(10, Digit);
if Value > 0 then
Result := Value * tmp + 0.5
else
Result := Value * tmp - 0.5;
Result := Trunc(Result) / tmp;
end;
㈥ Delphi 关于多维数组计算
直接生成的话貌似有点麻烦。。
我的思路：
生成一个3*3矩阵
1 1 1
0 0 0
0 0 0
依次变化为
1 1 0 1 1 0 1 0 1
0 0 1 -> 0 0 0 -> 0 1 0
0 0 0 0 0 1 0 0 0
这样，将你的矩阵与这个矩阵相乘可以得到。。
for i:=0 to 2 do
for i :=0 to power(行,(列-1)) do
begin
//矩阵相乘（结果不能为sum(Xi*Yi)，而应该加权）
//对输出数组赋值
//矩阵改变
end;
㈦ delphi中如何获取汉字的拼音首字母~!
function GetPYIndexChar( hzchar:string):char;
begin //的到一个汉字的拼音头个字母
case WORD(hzchar[1]) shl 8 + WORD(hzchar[2]) of
$B0A1..$B0C4 : result := 'A';
$B0C5..$B2C0 : result := 'B';
$B2C1..$B4ED : result := 'C';
$B4EE..$B6E9 : result := 'D';
$B6EA..$B7A1 : result := 'E';
$B7A2..$B8C0 : result := 'F';
$B8C1..$B9FD : result := 'G';
$B9FE..$BBF6 : result := 'H';
$BBF7..$BFA5 : result := 'J';
$BFA6..$C0AB : result := 'K';
$C0AC..$C2E7 : result := 'L';
$C2E8..$C4C2 : result := 'M';
$C4C3..$C5B5 : result := 'N';
$C5B6..$C5BD : result := 'O';
$C5BE..$C6D9 : result := 'P';
$C6DA..$C8BA : result := 'Q';
$C8BB..$C8F5 : result := 'R';
$C8F6..$CBF9 : result := 'S';
$CBFA..$CDD9 : result := 'T';
$CDDA..$CEF3 : result := 'W';
$CEF4..$D188 : result := 'X';
$D1B9..$D4D0 : result := 'Y';
$D4D1..$D7F9 : result := 'Z';
else
result := char(0);
end;
end;
以下是我的原码100%可以
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Button1: TButton;
procere Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
function GetPYIndexChar( hzchar:string):char;
var
Form1: TForm1;
implementation
{$R *.dfm}
function GetPYIndexChar( hzchar:string):char;
begin //的到一个汉字的拼音头个字母
case WORD(hzchar[1]) shl 8 + WORD(hzchar[2]) of
$B0A1..$B0C4 : result := 'A';
$B0C5..$B2C0 : result := 'B';
$B2C1..$B4ED : result := 'C';
$B4EE..$B6E9 : result := 'D';
$B6EA..$B7A1 : result := 'E';
$B7A2..$B8C0 : result := 'F';
$B8C1..$B9FD : result := 'G';
$B9FE..$BBF6 : result := 'H';
$BBF7..$BFA5 : result := 'J';
$BFA6..$C0AB : result := 'K';
$C0AC..$C2E7 : result := 'L';
$C2E8..$C4C2 : result := 'M';
$C4C3..$C5B5 : result := 'N';
$C5B6..$C5BD : result := 'O';
$C5BE..$C6D9 : result := 'P';
$C6DA..$C8BA : result := 'Q';
$C8BB..$C8F5 : result := 'R';
$C8F6..$CBF9 : result := 'S';
$CBFA..$CDD9 : result := 'T';
$CDDA..$CEF3 : result := 'W';
$CEF4..$D188 : result := 'X';
$D1B9..$D4D0 : result := 'Y';
$D4D1..$D7F9 : result := 'Z';
else
result := char(0);
end;
end;
procere TForm1.Button1Click(Sender: TObject);
begin
edit2.Text:=GetPYIndexChar(edit1.Text);
end;
end.
㈧ 无人机系统六大组成要素
与硬件、飞控沟通确定电子部件组成形式：电子部件有飞控、电调、射频、视觉、GPS、外置IMU、外置磁力计、云台、其他（天线、LED等）. 进行整机堆叠布局：将无人机中所有的关键部件罗列出来，包括但不限于机臂、电机、桨叶、电池、（云台）、相机、（脚架）和电子部件，GPS、天线等位置要考虑怎样对对射频信号收发性能有。 一般消费类影像无人机是塑胶件加五金（主要是云台需要用、因为刚度要求高）、行业应用无人机有塑胶也有碳板、碳管搭配一些五金。就是电子产品结构设计，考虑DFM、DFA。结合具体情况，可能需要设计一些结构。 结构设计过程中确定了模块PCB结构就输出结构要素图给硬件画板。 所以对无人机结构工程师来说，结构设计方法和其他产品没什么区别，但首先要熟悉无人机系统，一个优秀的结构工程师会主动去了解与它相关的所有领域，不管是传感器、视觉、图传、地面站还是算法.
㈨ delphi冒泡排序问题
这些程序用的都是最简单的DELPHI语言啊？难道是没学过DELPHI？用了两个全局变量，一个是数组num，另一个是整数i。这不是一个好的程序，虽然也能用。