forum.datacad.com

D4D: Legacy code conversion to Delphi Information, inquiries, and discussions regarding rewriting the code. Subjects could include working with Urecords, UInterfaces & Uvariables; what’s missing in the D4D and any work arounds if needed.

This is stolen from elsewhere in the DatacAd site, but is applicable as a reference item here.

The following DCAL functions are either no longer supported or missing from the current version of DCAL for Delphi. In many cases, you can now use built-in Delphi routines instead.



PROCEDURE do_writeIniStr;
PROCEDURE do_readIniStr;
PROCEDURE do_writeIniBool;
PROCEDURE do_readIniBool;
PROCEDURE do_writeIniInt;
PROCEDURE do_readIniInt;
PROCEDURE do_writeIniReal;
PROCEDURE do_readIniReal;
PROCEDURE do_setMSPSheetToPlotByName;
PROCEDURE do_setMSPSheetToPlotByNum;
PROCEDURE do_getMSPSheetName;
PROCEDURE do_setToPlotQuickLayout;
PROCEDURE do_setPenTableNameToLoad;
PROCEDURE do_setPrinterByName;
PROCEDURE do_plotClose10;
PROCEDURE do_GetPrinterNames;

PROCEDURE do_dcx_CreateWinObj;
PROCEDURE do_dcx_GetValWinObj;
PROCEDURE do_dcx_PutValWinObj;
PROCEDURE do_dcx_ShowWinDlg;
PROCEDURE do_dcx_EnterWinDlg;
PROCEDURE do_dcx_ExitWinDlg;
PROCEDURE do_dcx_GetWinDlgEvents;

PROCEDURE do_configTab;

PROCEDURE do_getv; get variable from variable record
PROCEDURE do_setv; set variable into variable record

PROCEDURE do_atrGetDis; use atr.dis
PROCEDURE do_atrGetAng; use atr.ang
PROCEDURE do_atrGetPnt; use atr.pnt
PROCEDURE do_atrSetDis; set atr.dis
PROCEDURE do_atrSetAng; set atr.ang
PROCEDURE do_atrSetPnt; set atr.pnt
PROCEDURE do_symGetRef; use sym.refflag
PROCEDURE do_symNum; use sym.num
PROCEDURE do_atrSetname; set atr.name
PROCEDURE do_atrGettyp; use atr.typ
PROCEDURE do_atrSetint; set atr.int
PROCEDURE do_atrSetrl; set atr.rl
PROCEDURE do_atrSetstr; set atr.str
PROCEDURE do_atrGetint; use atr.int
PROCEDURE do_atrGetrl; use atr.rl
PROCEDURE do_atrGetstr; use atr.str
PROCEDURE do_atrGetname; use atr.name

PROCEDURE do_symNext; use sym.next
PROCEDURE do_symGetname; use sym.name
PROCEDURE do_symGetaddr; use sym.addr field
PROCEDURE do_flDel; Use Delphi DeleteFile
PROCEDURE do_flCopy; Use Delphi CopyFile
PROCEDURE do_flRen; Use Delphi renamfile
PROCEDURE do_flExist; Use Delphi fileexists
PROCEDURE do_flPattern; Use Findfirst and findnext
PROCEDURE do_flFind; Use findfirst and findnext
PROCEDURE do_mkdir;Delphi mkdir
PROCEDURE do_chdir;Delphi chdir
PROCEDURE do_rmdir;Delphi rmdir

PROCEDURE do_plotmulti;
PROCEDURE do_plotline;

PROCEDURE do_round4;Use Delphi round
PROCEDURE do_trunc4;Use Delphi trunc
PROCEDURE do_light;

PROCEDURE do_sqr; Use Delphi sqr
PROCEDURE do_fsqrt; Use Delphi sqrt
PROCEDURE do_flog; use Delphi ln
PROCEDURE do_fexp; use Delphi Exp

PROCEDURE do_strAssign; Use simple assignment

PROCEDURE do_setplotpen;Use ClrSetPen

PROCEDURE do_GetConeAng;Use sv.coneang;

PROCEDURE do_getCurrFont;
PROCEDURE do_setCurrFont;

PROCEDURE do_resetMsePrt;
PROCEDURE do_cnfReadLString;
PROCEDURE do_cnfReadInteger;
PROCEDURE do_cnfReadReal;
PROCEDURE do_cnfReadBOOL;
PROCEDURE do_cnfWriteString;
PROCEDURE do_cnfWriteInteger;
PROCEDURE do_cnfWriteReal;
PROCEDURE do_cnfWriteBool;
PROCEDURE do_printStr;
PROCEDURE do_textmode;
PROCEDURE do_grafmode;
PROCEDURE do_lgonclg;
PROCEDURE do_lgondraw;
PROCEDURE do_lgonmenu;
PROCEDURE do_lgonsysval;
PROCEDURE do_lgonfileop;
PROCEDURE do_lgonmonit;
PROCEDURE do_lgonextra;
PROCEDURE do_allmvv;
PROCEDURE do_fremvv;
PROCEDURE do_offset;
PROCEDURE do_segment;
PROCEDURE do_settextcurs;
PROCEDURE do_gettextcurs;
PROCEDURE do_CorrectVersion;
PROCEDURE do_ScreenNumber;
PROCEDURE do_CharSize;
PROCEDURE do_ButtonSize;
PROCEDURE do_IMayRun;
PROCEDURE do_SecondScreen;
PROCEDURE do_lyrutil_del;

PROCEDURE do_view_setflag;
PROCEDURE do_view_chkflag;
PROCEDURE do_clrGetPen;
PROCEDURE do_clrSetPen;

PROCEDURE do_lyr_find_longName; use lyr_find
PROCEDURE do_get_dimfont;
PROCEDURE do_lgl2ints;
PROCEDURE do_ints2lgl;
PROCEDURE do_SetMacroHints;

Datacad curretly only supports standard ascii 255 characters. Does Datacad market extend to any locations where ansi wide char and wide string support is needed. Basically I wonder if future versions of Datacad may make changes to string types.