搜索结果
找到约 31 项符合
sender 的查询结果
按分类筛选
Delphi/CppBuilder 人民币大写金额转换程序(修正版v0.0.3) =================================== 1.使用方法: ------------- 将Cash_RMB.dcu
人民币大写金额转换程序(修正版v0.0.3)
===================================
1.使用方法:
-------------
将Cash_RMB.dcu放入Delphi安装目录下的Lib中,在uses中加入Cash_RMB,
即可引用CashRMB方法.
function CashRMB(CashAmount: Double): String
如:
procedure TForm1.Button1Click(Sender: TObject)
begin
QRLabel ...
通讯/手机编程 利用WM5 实现电话功能 在程序中进行电话拨号 “项目”—“添加引用”—“Microsoft.WindowsMobile.Telephony”—“确定” Imports Microsoft
利用WM5 实现电话功能
在程序中进行电话拨号
“项目”—“添加引用”—“Microsoft.WindowsMobile.Telephony”—“确定”
Imports Microsoft.WindowsMobile.Telephony
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim TestPhone As New Phone
Tes ...
Delphi/CppBuilder unit Video interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, stdctrl
unit Video
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, stdctrls,
ExtCtrls, avicap, mmsystem, dsgnintf
// Types for event-procedures
type
TCapStatusProc = procedure(Sender: TObject) of object
TCapStatusCallback = procedure(Sender: TObject nID: integer status: st ...
Internet/网络编程 这是一个学习WinSocket编程的程序
这是一个学习WinSocket编程的程序，它由3部分组成，一是发送Sender的程序，另一个是接收Receiver的程序，还有一个是信道channel。发送方发送的数据需要经过信道才能够被接收方接收到。这个信道是一个模拟信道，可以自由设置它成为可靠或者不可靠，在不可靠时又有几种情况。这些都是为了能够更好地去理解数据链路层的编程， ...
串口编程 unit comm interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, D
unit comm
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
SPComm, StdCtrls, ExtCtrls
type
TFcomm = class(TForm)
Comm1: TComm
GroupBox1: TGroupBox
Memo1: TMemo
Memo2: TMemo
GroupBox2: TGroupBox
Button1: TButton
Btn_send: TButton
Button2: ...
网络 pashload是应用在linux下的网络带宽测试源程序精确度比较高 ///////////////////////////////////// Pathload is a tool for es
pashload是应用在linux下的网络带宽测试源程序精确度比较高
/////////////////////////////////////
Pathload is a tool for estimating the available bandwidth
of an end-to-end path from a host S (sender) to a host R (receiver).
The available bandwidth is the maximum IP-layer
throughput that a flow can ge ...
Delphi控件源码 MD5变换动态链接库文件调用：（delphi例子） =======================================================================
MD5变换动态链接库文件调用：（delphi例子）
=========================================================================
function transfer(tran:widestring):widestring stdcall external md5.dll name transfer
//edit1为输入字符，edit2为输出md5摘要
procedure TForm1.Button1Click(Sender: TObject)
begin
e ...
网络 udp-cast!可以用multicasting的方式把檔案傳送到一個群組
udp-cast!可以用multicasting的方式把檔案傳送到一個群組，很好用~~~~!有興趣的人式式吧。
1.先make
2.會產生兩個兩進位檔，sender用來擴播檔案
詳細就man udp-cast吧
医药行业 先运行力控应用程序（如演示工程——反应釜）
先运行力控应用程序（如演示工程——反应釜），实时数据库系统亦随之启动。
然后启动delphi6.0，创建一个新的工程。
在form1窗体中，放置DdeClientConv控件（system标签页），设置ConnectMode属性值为ddeAutomatic、DdeService属性值为db、DdeTopic属性值为db；
接下来放置DdeClientItem控件（s ...
嵌入式/单片机编程 procedure senddata var i:integer commflg : Boolean begin commflg:=true for i:=1
procedure senddata
var
i:integer commflg : Boolean
begin
commflg:=true
for i:=1 to 8 do
begin
if not fcomm comml writecommdata(sendbutter,i) then
begin
Commflg=false
break
end
end
end
(4) 接收数据
在编写基于串口的计算机工业测控时，通常需要由下位机向PC机发送数据以使PC机了解系 ...