界面库

整理
2022-12-13 15:04:43 +08:00
parent 328da041da
commit 532b2959b5
2 changed files with 35 additions and 48 deletions
@@ -428,8 +428,9 @@ type TVclDesigner = class(tvcform)
        if e.wparam = 123 and e.lparam=123 then 
        begin
            if o.height>Foh then 
-                o.height := Foh;
-            
+            begin
+                o.height := Foh; //gtk 逻辑正确但是设置无效
+            end             
        end 
    end 
    function openclassfile(); //打开编辑器