Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Problem mit TObject.Classname

    Delphi
    by phreax, 20. Feb 2009
  Da Du deine lokale Variable nicht initialisierst, kann diese im Zweifelsfall einen beliebigen Wert annehmen, und du bekommst einen falschen Index....
  
  Besser so:
  
  function NotifyToList(item: PObject): Word;
  var i: Word;
  begin
  i := 0;
  while ItemUsed do Inc(i);
  ItemUsed:=true;