Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Delphi Sichtbarkeit eines Objekts (https://www.delphipraxis.net/203874-sichtbarkeit-eines-objekts.html)

Royal Ranger 2. Apr 2020 10:25


Sichtbarkeit eines Objekts
 
Hallo,
ich bin noch Anfänger und habe ein merkwürdiges Problem...
Ich habe ein Shape Objekt so programmiert, dass ich es mit Pfeiltasten steuern kann.
die Procedure lautet:
Delphi-Quellcode:
procedure TForm2.OnKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
var
  x: ShortInt;
  y: ShortInt;
begin
x := Shape1.Left ;
y := Shape1.Top;
if
  key=VK_left
then
  Shape1.Left := (x -1);
if
  key=VK_right
then
  Shape1.Left := x + 1;
if
  key=VK_up
then
  Shape1.Top := y +1;
if
  key=VK_down
then
  Shape1.Top := y -1;
end;
Alles funktioniert und ich kann das Objekt steuern... Jedoch ist dieses Objekt nur innerhalb eines bestimmten Bereiches sichtbar. Ich weiß dass das an irgendeiner Eigenschaft im Objektinspektor liegt. Könnte mir da jemand weiterhelfen?

BerndS 2. Apr 2020 10:38

AW: Sichtbarkeit eines Objekts
 
Da ShortInt nur von -128..127 geht solltes du X und Y auf Integer ändern.

Royal Ranger 2. Apr 2020 10:42

AW: Sichtbarkeit eines Objekts
 
Vielen Dank das ist mir erst nicht aufgefallen :-D

Royal Ranger 2. Apr 2020 10:51

AW: Sichtbarkeit eines Objekts
 
Ja es lag an dem ShortInt...Jetzt Funktioniert alles:-D:)


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:39 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz