From 3b3b6d0da9e15e0ece5f381c94050bda0a285e73 Mon Sep 17 00:00:00 2001
From: anon <anon@anon.anon>
Date: Mon, 22 Jul 2024 19:39:19 +0200
Subject: [PATCH] Added 'C_C++/Tcl/width_vs_bg.tcl'

---
 C_C++/Tcl/width_vs_bg.tcl | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 C_C++/Tcl/width_vs_bg.tcl

diff --git a/C_C++/Tcl/width_vs_bg.tcl b/C_C++/Tcl/width_vs_bg.tcl
new file mode 100644
index 0000000..72946c0
--- /dev/null
+++ b/C_C++/Tcl/width_vs_bg.tcl
@@ -0,0 +1,13 @@
+package require Tk
+set tileWidth 50
+set wallWidth 10
+
+canvas .c11 -width $::tileWidth -height $::tileWidth
+.c11 create line 0 0 0 $::tileWidth -fill black -width $::wallWidth
+
+#canvas .c12 -width $::wallWidth -height $::tileWidth -bg black
+canvas .c12 -width $::tileWidth -height $::tileWidth
+.c12 create line 0 0 0 $::tileWidth -fill black -width $::wallWidth
+
+grid .c11 -row 1 -column 1
+grid .c12 -row 1 -column 2