Source position: tcl80.pp line 915
function Tcl_CreateObjCommand(
interp: PTcl_Interp;
name: PChar;
cmdProc: TTclObjCmdProc;
clientData: Tcl_ClientData;
deleteProc: TTclCmdDeleteProc
):pTcl_Command;