2022年11月6日
Delphi 经典游戏程序设计40例 的学习 例36　增加格子线便于观察改进
摘要： 1 unit R36; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 Dialogs, ExtCtrls, StdCtrls; 8 9 typ 阅读全文
posted @ 2022-11-06 21:50 D7mir 阅读(68) 评论(0) 推荐(0)
Delphi 经典游戏程序设计40例 的学习 例36　增加格子线便于观察
摘要： procedure TRei36.LineRed; var x,y : Byte; begin MakeBmap.Canvas.Pen.Width := 1; MakeBmap.Canvas.Pen.Color := clRed; for y := 0 to 3 do begin MakeBmap. 阅读全文
posted @ 2022-11-06 17:43 D7mir 阅读(50) 评论(0) 推荐(0)
Delphi 经典游戏程序设计40例 的学习 例36 不可思议的房间和迷宫
摘要： unit R36; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls; type TRoom = record / 阅读全文
posted @ 2022-11-06 16:48 D7mir 阅读(192) 评论(0) 推荐(0)