易截截图软件、单文件、免安装、纯绿色、仅160KB

delphi存放到一个数组里

定义： 
type
  pm= packed record { IO记录 }
  Name:string[16]; { IO名称 }
  CHn:Byte; {输入通道号 }
  Pvh:Double; { 量程上限 }
  Pvl:Double; { 量程下限 }
  DW:string[8]; { 量程单位 }
  Bjh:Double; { 报警上限 }
  Bjl:DOuble; { 报警下限 }
  BjCHn:Byte; { 报警输出通道 }
  Pv:Double; { 测量值 }
  Code:Word; { 测量值代码 }
  BZ1:Byte;
  BZ2:Byte;
  BZ3:Byte;
 end;

IOtalab:array[0..3]of pm;

Sbuf : Array[0..8191] of Byte;

如何将IOtalab表 存放到Sbuf里面？、、、、、、、、、、
请教。。。。。。。。。。。
用Stream写
CopyMemory
引用
CopyMemory


用了copymemory 但不行
把IOtalab写入到stream中，然后再把stream写入到Sbuf 中
两种方法：

1. 使用move之类的复制函数；
2. 使用变体记录，需要稍微改变一下类型定义：
  TSbuf = packed record
  case integer of
  0: (IOtalab: array[0..3] of pm);
  1: (sbuf: Array[0..8191] of byte);
  end;

var
  IOtalab: array[0..3]of pm;
  Sbuf: TSbuf;
使用：
  sbuf.iotalab[1].name := 'hello';
  sbuf.sbuf[8000] := 123;



相关问答：

Delphi怎么取返回内容中的指定部分.

返回的内容是如下代码,怎么能渠道2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......

delphi 本地装载驱动 - Delphi / Windows SDK/API

delphi 手动装载驱动文件提示：
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
是不是这个驱动必需要用INF来安装。。用自带的INF来装是正常的。用手动装载就提示如上� ......

delphi如何备份orcal数据库？ - Delphi / 数据库相关

程序使用的是Orcal数据库，想定期（每季度）对数据库进行备份，没啥头绪，请问应该怎么弄？
有什么特殊要求吗，比如要前端界面？
一般用数据库自带的“计划任务”配置一下就够了

没有什么特殊要求。例如，只要� ......

会delphi又会c#的进来帮个忙。。。。。

把这段代码翻译为c#是什么样的麻烦帮帮忙
Delphi(Pascal) code:

unit SMSHTTP;
interface
uses InvokeRegistry, SOAPHTTPClient, Types, XSBuiltIns;
type
GetInMessa ......

VC调用DELPHI DLL乱码

Delphi(Pascal) code:

library HealthDocDll;
uses
SysUtils,
Classes,
Forms,
Dialogs,
Windows,
HealthDoc in 'HealthDoc.pas' {frmHealthDoc},
pub in 'pub.pas';
{$R *.res}
proced ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号