typedef struct __TransDataItem_Down
{
int flowNr; // 帐单流水号
char Seller[8]; //员工名称
struct{
short UploadYear; // char[2]
char UploadMonth;
char UploadDay;
char UploadHour;
char UploadMinute;
char UploadSecond;
char PrintHour;
char PrintMinute;
char PrintSecond;
} time;
char desk[30]; //台号名称
short peopleNr; //每桌人数
short dishNr; /菜品数量
char dishUnit[4]; // 菜品数量单位
char dishName[28]; // 菜品名称
char dishsort[10]; // 类别
char append[100]; // 附加项目
int barCodeNr; //条码
}TransDataItem_Down;
{
int flowNr; // 帐单流水号
char Seller[8]; //员工名称
struct{
short UploadYear; // char[2]
char UploadMonth;
char UploadDay;
char UploadHour;
char UploadMinute;
char UploadSecond;
char PrintHour;
char PrintMinute;
char PrintSecond;
} time;
char desk[30]; //台号名称
short peopleNr; //每桌人数
short dishNr; /菜品数量
char dishUnit[4]; // 菜品数量单位
char dishName[28]; // 菜品名称
char dishsort[10]; // 类别
char append[100]; // 附加项目
int barCodeNr; //条码
}TransDataItem_Down;
解决方案 »
- delphi中多个文件压缩问题
- 大哥哥,大姐姐,动画的图片如何进行点阵(比如在LED屏上显示一只鸟儿在飞)?
- 生日。老衲25岁了。唉,老了。小小的散分。
- 请问怎么更新由几张表join的视图啊?
- 报表名次排序问题!解决即给分
- [菜鸟问题]怎样在delphi中保存自己的喜好设置呢?
- 急求一个问题!!!!!!!!!在线等待大家帮忙
- 程序中须备份文件时,大家用什么方法?
- 谁能解决,我给一千一百分!!!说话算话,决不食言!解决问题者独得1000分!Up有分!
- 急!我要安裝在大富翁下载的D6,急需要SN, 請哪位大俠告訴我,thank you very much
- 本人经过半年多的努力开发的中式报表系统(AnyCell Report),欢迎下载!并请大家多多关注!
- 内存映像文件的有关问题。。。。。。。。。
_time =record
UploadYear: shortint;
UploadMonth: char;
UploadDay: char;
UploadHour: char;
UploadMinute: char;
UploadSecond: char;
PrintHour: char;
PrintMinute: char;
PrintSecond: char;
end; __TransDataItem_Down = record
flowNr: integer; // ??流水?
Seller: array[0..7] of char; //?工名?
time: _time;
desk: array[0..29] of char; //台?名?
peopleNr: shortint; //每桌人?
dishNr: shortint; //菜品?量
dishUnit: array[0..3] of char; // 菜品?量?位
dishName: array[0..27] of char; // 菜品名?
dishsort: array[0..9] of char; // ??
append: array[0..99] of char; // 附加?目
barCodeNr: integer; //??
end;
var TransDataItem_Down: __TransDataItem_Down;
char Art_Bez[28]; //品名
long int price; //new price after changing
long int weight; //weight
long int amount; //amount
unsigned short Table; //桌号
unsigned short Method; //做法
unsigned short SellerNr; //操作员号
用這樣操作就可: GetDate(@TransDataItem_Down);你看看delphi的對應類型就可!
Generic integer types for 32-bit implementations of Delphi
Type Range Format
Integer -2147483648..2147483647 signed 32-bit
Cardinal 0..4294967295 unsigned 32-bit
Fundamental integer types include Shortint, Smallint, Longint, Int64, Byte, Word, and Longword.Fundamental integer types
Type Range Format
Shortint -128..127 signed 8-bit
Smallint -32768..32767 signed 16-bit
Longint -2147483648..2147483647 signed 32-bit
Int64 -2^63..2^63-1 signed 64-bit
Byte 0..255 unsigned 8-bit
Word 0..65535 unsigned 16-bit
Longword 0..4294967295 unsigned 32-bit
type
PTransDataItem_Down = ^__TransDataItem_Down;
__TransDataItem_Down = record
............
...........
end; GetDate(TransDataItem_Down : PTransDataItem_Down);Delphi中能这样用吗,数据能带上来吗?
是用Delphi调用VC++做的DLL,我做了一个测试结果出错误,我将代码全发给,你能帮我看看吗?