AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi TImageSprite bewegt sich
Thema durchsuchen
Ansicht
Themen-Optionen

TImageSprite bewegt sich

Ein Thema von Flogo · begonnen am 8. Mai 2003 · letzter Beitrag vom 12. Mai 2003
Antwort Antwort
Benutzerbild von Flogo
Flogo

Registriert seit: 24. Mär 2003
Ort: Freiburg im Breisgau
317 Beiträge
 
Delphi 7 Professional
 
#1

TImageSprite bewegt sich

  Alt 8. Mai 2003, 18:16
und zwar mit dem Mauszeiger. Das ist zwar an sich ganz schön wenn man einen Mauszeigerersatz haben will (was ich an ner anderen Stelle auch schon drin hab) aber das lässt sich nicht "abschalten". Ich hab sogar meinen gesammten OnMouseMove auskkommentiert aber nichts Das blöde Bild bewegt sich weiter mit dem Cursor mit.
Ich hoffe ihr könnt mir da irgentwie helfen
cu
flo
If one coincidence can occur, then another coincidence can occur. And if one coincidence happens to occur just after another coincidence, then that is just a coincidence.
DNA

www.Anyxist.de
  Mit Zitat antworten Zitat
chrys

Registriert seit: 21. Jan 2003
Ort: Italien
34 Beiträge
 
Delphi 6 Personal
 
#2
  Alt 9. Mai 2003, 23:04
ein wenig code waere angebracht !!!
  Mit Zitat antworten Zitat
Benutzerbild von Flogo
Flogo

Registriert seit: 24. Mär 2003
Ort: Freiburg im Breisgau
317 Beiträge
 
Delphi 7 Professional
 
#3
  Alt 10. Mai 2003, 10:53
Delphi-Quellcode:
type
  TItem = class(TImageSprite)
  public
    Name: string;
    constructor Create(AParent: TSprite; Sprites: TDXImageList; SName: String;
                       Sx,Sy: Integer); overload;
  end;

implementation

constructor TItem.Create(AParent: TSprite; Sprites: TDXImageList; SName: String;
                         Sx,Sy: Integer);
begin
  inherited create(AParent);
  X := Sx;
  y := Sy;
  z := 3;
  Name := SName;
  Image := Sprites.Items.Find(SName);
end;

end.
Das ist mein TItem. Eigentlich nur ein TImageSprite mit neuem Constructor um die Erstellung zu vereinfachen und um die Unterscheidung von anderen TImagesprite möglich zu machen.
Wenn ich das programm starte und ein TItem erzeuge (-> TObjectList) dann sehe ich es doppelt: einmal knapp neben den Koordinaten an denen es sein sollte und einmal neben dem Mauszeiger(bewegt sich mit).

[edit=Daniel B]Delphi-Tags eingefügt. MfG Daniel B.[/edit]
If one coincidence can occur, then another coincidence can occur. And if one coincidence happens to occur just after another coincidence, then that is just a coincidence.
DNA

www.Anyxist.de
  Mit Zitat antworten Zitat
Benutzerbild von Flogo
Flogo

Registriert seit: 24. Mär 2003
Ort: Freiburg im Breisgau
317 Beiträge
 
Delphi 7 Professional
 
#4
  Alt 12. Mai 2003, 21:42
Hat sich erledigt. Ich weiß zwar immer noch nich worans eigentlich lag aber nachdem ich dran gedacht hab den destrucor von der TObjectlist in der sie drin waren zu benutzen ists nicht mehr passiert
If one coincidence can occur, then another coincidence can occur. And if one coincidence happens to occur just after another coincidence, then that is just a coincidence.
DNA

www.Anyxist.de
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:28 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