摘要:
this.PicId = NumberSeq::newGetNumFromCode('PicId',true).num(); 阅读全文
摘要:
其实AX中条形码就是一种特殊有字体,如下代码中,将barCode的Font属性设成BC I25 Narrow字体后,打印出来的内容将以条形码显示。 (此处Barcode是StringEdit) public boolean fetch() { // boolean ret; // ret = super(); ; m_BarCodeSetup = barCodeSetup::find("... 阅读全文
摘要:
static void Update(thread t) { CCADOConnection connection; str strSQL; CCADOCommand Command; CCADORecordSet RSet; InventTable it; SysOperationProgress simpleProgress; int i,RecCount; ; c... 阅读全文
摘要:
static client void ShowProgressBar() { #avifiles SysOperationProgress simpleProgress; int i; ; simpleProgress = SysOperationProgress::newGeneral(#aviUpdate, 'Updating...', 100); for(i=1;i<=100;i... 阅读全文
摘要:
lines = UploadText.text(); line = strLine(lines, 0); while (strlen(line) > 0) { cnt++; sStrings += (line+","); if((cnt mod 20) ==0) { qbsProdTable.addRange(fieldnum(ProdTable,ProdId)).value(sS... 阅读全文
摘要:
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) btn1: TButton; btn2: TButton; btn3: TButton... 阅读全文