Delphi与Flash之间的数据传递技巧
要实现这一功能，首先要用到ActiveX控件中的TShockwaveFlash控件。
首先让我们来将TShockwaveFlash控件加入到Delphi的组件面板中（没有装Flash的朋友可以从网上下载一个Flash8.ocx文件来进行安装）
1.打开Delphi（本人用的是Delphi7.0）点击菜单中的Component->Import ActiveX Control...
2.在弹出的窗口中的Import ActiveX子窗口中找到Shockwave Flash(Version1.0)，然后点击Install...按钮，根据提示执行就可以了
3.安装完成后，你可以发现TShockwaveFlash控件已经加入到Delphi的ActiveX面板中了。
在这里有必要跟大家讲一些关于TShockwaveFlash控件的属性与方法：
属性：
ReadState：读一个Flash文件时的状态。
TotalFrames：总帧数，只有当ReadyState＝4时才能访问该属性。
FrameNum：当前播放的帧。
Playing：播放或暂停一个Flash。
Quality：指定当前渲染的质量，0=Low、1=High、2=AutoLow、3=AutoHigh。
ScaleMode：缩放模式，0=ShowAll、1=NoBorder、2=ExactFit。
AlignMode：对齐模式，Left=1、Right=2、Top=4、Bottom=8。
BackgroundColor：背景色，－1为默认颜色。
Loop：是否循环。
Movie：指定播放的Flash文件路径，可以为一个URL。
事件&方法：
Play()：开始播放动画。
Stop()：停止播放动画。注意：要实现停止功能，必须同时调用Stop()和Rewind()函数。
Back()：播放前以帧动画。
Forward()：播放后一帧动画。
Rewind()：播放第一帧动画。
SetZoomRect(int left,int top,int right,int bottom)：设置缩放的区域。
Zoom(int percent)：缩放（按百分比）。
Pan(int x,int y,int mode)：缩放播放面板，其中模式0为按像素、1为按窗口百分比。
TsetProperty（target:widestring，property_:integer,const value widestring）：设定Flash中影片的属性。
TgetProperty（target:widestring,property_:integer）：取得Flash中影片的属性。
GetVariable（const name:widestring）：取得Flash中变量的值。
SetVariable（const name:widestring,const value:widestring）：设定Flash中变量的值。
OnProgress（int percent）：读取一个Flash时触发。
OnReadyStateChange（int state）：状态改变时触发。States的值0=Loading、1=Uninitialized、2=Loaded、3=Interactive、4=Complete。
OnFSCommand（const command,args:WideString）：用来读取Flash按钮中的参数。
我们要实现Delphi与Flash之间的数据传递
相关文档：
以Caps Lock键举例，其它(VK_NUMLOCK),类同：
判断状态：
方法1
Level: integer;
Level := GetKeyState(VK_CAPITAL);
if Level = 0 then
//没亮
else
//亮了(1)
方法2
KeyState : TKeyBoardState;
GetKeyboardState(KeyState);
if KeySt ......
DELPHI中操作ACCESS数据库(建立.mdb文件,压缩数据库)
以下代码在WIN2K,D6,MDAC2.6下测试通过,
编译好的程序在WIN98第二版无ACCESS环境下运行成功.
//声明连接字符串
Const
SConnectionString
= 'Provider=M ......
公司的餐饮系统出品的助记码，还没实现自动从出品名称获取汉字拼音首字母。
所以在网上找了三种解决方法，
一种是kaguo 的使用常用汉字拼音查找方法，这种代码十分简单，实现方便，但是这种代码仅仅是一级字库，只支持三千零几个字的。
//获取中文字串的声母� ......
最近需要将Magento(国外比较出名的开源PHP+MySQL电子商务网站)与一个ERP进行整合，就需要调用Magento的Webservice。
Magento提供2套api。
注：如果需要同构调用需要使用第1个wsdl，如异构程序调用需使用第2个wsdl。
1.http://xxx.xxxxxxx.xxx/magento/api/soap/?wsdl
2.http://xxx.xxxxxxx.xxx/magento/api/v2_soap/?ws ......
确实很有用，但是这个怎么把空格也默认为分割符了呢，谁知道怎样把空格不认为是分割符的？？ TStrings是一个抽象类，在实际开发中，是除了基本类型外，应用得最多的。 常规的用法大家都知道，现在来讨论它的一些高级的用法。 先把要讨论的几个属性列出来： 1
确实很有用，但是这个怎么把空格也默认为分割符了呢，谁知道怎� ......
