实现UP、DOWN原语 产生3个进程： 两个进程模拟需要进入临界区的用户进程。 当需要进入临界区时，显示：“进程x请求进入临界区…”，同时向管理进程提出申请； 申请返回，表示进入了临界区。在临界区中等待一段随机时间，并显示：“进程x正在临界区…”； 当时间结束，显示：“进程x退出临界区…”,同时向管理进程提出退出申请； 当申请返回，显示：“进程x已退出临界区。” 一个进程作为原语的管理进程，接受其他进程的临界区进入请求： 如果允许进入，则根据DOW

Delphi随机选号程序源码下载，很有意思的随机数选号程序，选号过程中，右侧的符号动画显示，点击左侧下边的“结束”按钮，即可显示出随机选中的号码。在此基础上扩展一下，可实现一个完善的Delphi选号程序。代码中运用了for循环的原因来实现。-Delphi random selection procedure source code download, a random number meaning selection procedure, selection process, symbolic

Delphi随机生成程序序列号，程序通过MS的S.M.A.R.T.接口,直接从RING3调用API DeviceIoControl()来获取硬盘信息Get SCSI port handle，演示源码中还包括了应用此序列号的注册程序，输入序列号正确后，则将已安装信息写入注册表，main文件夹中的注册序列号判断程序需要在任务管理器退出。-Delphi random sequence number, the program through the S.M.A.R.T. interface of MS,