Suche Hilfe bei Bewegung einer Form

[Ginko]

Was meinst du damit ? Die Geschwindigkeit der Bewegung ?

[abi9]

hat sich schon geklärt :) trotzdem danke :D

weiß einer, wie dieser destructor zu schreiben ist?

[Der schöne Günther]

Zweieinhalb Dinge:

1. Falls in zwei Jahren jemand vor dem gleichen Problem steht den "Schritt der Bewegung zu schreiben" würde es ihm helfen, wenn du vlt. genauer ausführen kannst, was denn nun dein Problem war und vor allem wie du es gelöst hast.
   
2. Wenn du hier im Forum nach "Destructor" suchst, bekommst du eine vierstellige Trefferzahl. Ein halbes Dutzend davon sind Tutorials. Eins davon sogar sehr frisch: [Tutorial] Den Destruktor verstehen
   Kann man mehr wollen?

War die Aufteilung in Schlangen, Schwänze, Hintergründe usw. zwingend so vorgegeben?

[baumina]

Zitat:

Zitat von DeddyH (Beitrag 1219058)

Und gewöhn Dir lieber gar nicht erst an, mit true oder false zu vergleichen, das kann zu falschen Ergebnissen führen.

Das würde mich aber nun auch interessieren was du damit genau meinst?

[Der schöne Günther]

http://www.detlef-heibing.de/program...onstanten.html

[baumina]

Ah OK, verstanden aber mir zu weit hergeholt ... wer macht schon solch unnützen Typumwandlungen.

[p80286]

Kann oft genug passieren, vor allem wenn Du unbekannte dlls nutzen mußt.

Gruß
K-H

[baumina]

Aber dass -1 dann true ergibt, find ich schon krass :lol:

[Sir Rufo]

Zitat:

Zitat von baumina (Beitrag 1219160)

Aber dass -1 dann true ergibt, find ich schon krass :lol:

Nö, das ist as designed

False entspricht 0 und True entspricht <> False, also <> 0

Somit ist alles <> 0 auch True und nicht krass ;)

[abi9]

Noch eine Hilfe bräuchte ich :)

Wieso klappt mein Destruktor nicht?

Anhang 39438

Anhang 39439

Anhang 39440

Anhang 39441

Anhang 39442

[DeddyH]

Wieso "nicht überschreibbar"? Man sollte Objekte nicht mittels Destroy freigeben, sondern mittels Free, und auch nur die Objekte, die man selbst angelegt hat. Das Setzen auf nil im Destruktor schadet zwar nicht, ist aber sinnlos.

[abi9]

Tut mir Leid, aber ich blick da nicht mehr durch..
Was ist denn das Problem, dass da nichts passiert? :(

[Ginko]

Zu Unit1:

Delphi-Quellcode:

procedure TForm1.FormDestroy(Sender: TObject);
begin
  Hintergrund.Free;
  Kopf.Free;
  Schlange.Free;
  //Futter.Free; wird nicht mit TFutter.create erstellt, deshalb ist die Freigabe hier sinnlos
  //Schwanz.Free; ebenfalls
end;

Zu mtKopf:

Delphi-Quellcode:

destructor TKopf.destroy;
begin
  Icon.Free;  
  inherited;
end;

In der Unit mTHintergrund.pas fehlt noch ein Destruktor, weil hier Bild erzeugt wird und keine Freigabe erfolgt:

Delphi-Quellcode:

Bild := TJpegImage.Create;

Du musst dich immer um die Freigabe von Klassen selbst kümmern, wenn du sie mit dem Aufruf TKlasse.Create(...) selbst erzeugst.

Zitat:

Was ist denn das Problem, dass da nichts passiert?

Passieren tut beim Destrukor auch nichts, was man irgendwie visuell mitbekommt (außer man baut ihn fehlerhaft, dann kommt meistens eine Meldung). Es wird nur Speicher wieder freigegeben.

Mfg