V8.53

2024-03-11 18:11:21 +01:00
parent 81d5c007d4
commit 4a82a86965
13 changed files with 569 additions and 507 deletions
--- a/UnitDebug.pas
+++ b/UnitDebug.pas
@@ -275,9 +275,9 @@ end;
 procedure TFormDebug.EditNivDebugKeyPress(Sender: TObject; var Key: Char);
  var i,e  : integer;
 begin
- if ord(Key) = VK_RETURN then
+ if ord(Key)=VK_RETURN then
  begin
-    Key := #0; // prevent beeping
+    Key:=#0; // prevent beeping
    val(EditNivDebug.text,i,e);
    if e=0 then
    begin