AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Methode wird nicht aufgerufen

Ein Thema von Luckie · begonnen am 19. Jan 2009 · letzter Beitrag vom 19. Jan 2009
Antwort Antwort
Benutzerbild von JasonDX
JasonDX
(CodeLib-Manager)

Registriert seit: 5. Aug 2004
Ort: München
1.062 Beiträge
 
#1

Re: Methode wird nicht aufgerufen

  Alt 19. Jan 2009, 17:34
Zitat von Luckie:
Delphi-Quellcode:
procedure TContactCollection.SwapIt(Contact1, Contact2: TContact);
var
  TempObj : TContact;
begin
  TempObj := Contact1;
  Contact1 := Contact2;
  Contact2 := TempObj;
end;
Delphi meint, dass die Variablen Contact1, Contact2 und TempObj nie benutzt werden. Stimmt auch, die Methode SwapIt wird nicht aufgerufen. Aber warum nicht? In der Methode MySort wird sie doch aufgerufen.
Die Methode wird wegoptimiert. Contact1 und Contact2 werden per CallByValue übergeben, d.h. Änderungen bzgl. dieser Variablen haben außerhalb der aufgerufenen Methode keinen Effekt, und werden darin auch nicht weiter verwendet. Somit hat die Methode keinen Einfluss auf den Ablauf oder den Zustand deines Programms, ergo spart sich der Compiler die Arbeit und ruft die Methode gar nicht auf. Um die Werte in Contact1 und Contact2 (sei es ein Integer oder ein Referenzzeiger) außerhalb zu bearbeiten, musst du die Variablen per CallByReference übergeben:
procedure TContactCollection.SwapIt(var Contact1, Contact2: TContact); greetz
Mike
Mike
Passion is no replacement for reason
  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 01:45 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz