From 842e89c229ccc8d77c69622a6cc7e5fe974a33ae Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Tue, 2 Oct 2018 10:26:31 +0200 Subject: richtige Diagonalenfelder markieren --- raetselunit.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'raetselunit.pas') diff --git a/raetselunit.pas b/raetselunit.pas index 04052b9..1819408 100644 --- a/raetselunit.pas +++ b/raetselunit.pas @@ -244,6 +244,7 @@ begin zufallSE.hint:='Nummer'; progressbar1:=tProgressBar.create(besitzer); progressbar1.visible:=false; + progressbar1.smooth:=true; progressbar1.parent:=besitzer; end; @@ -646,7 +647,7 @@ begin s:=uebersetze(i); with zeichenflaeche.canvas do begin brush.color:=$FFFFFF; - if (x>=0) and (y>=0) and (x=0) and (y>=0) and (x