Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - auf Index vom Array zugreifen


Splinter - Mo 28.04.03 17:48
Titel: auf Index vom Array zugreifen
Hi

Ich hab da ein Array mit 32 teilen, die alle irgendwann mal von timage abgeleitet wurden - und eins von den teilen ist jetzt ein sender... nur welcher? Wie krieg ich den Index raus, ohne dieses umständliche "berechne die 3 letzten Buchstaben des Namens und wandle sie in integer um" machen zu müssen?

MfG

Splinter


AndyB - Mo 28.04.03 19:45

Wenn ich davon ausgehen kann dass es sich um ein array[Index]: TImage handelt, dann kannst du alle Elemente des Arrays durchiterieren.

Quelltext
1:
2:
3:
4:
5:
6:
function IndexOfImage(Image: TImage; const ImageArray: array of TImage): Integer;
begin
  for Result := 0 to High(a) do
    if a[Result] = Image then Exit;
  Result := -1;
end;


maximus - Mo 28.04.03 22:41

oder du speicherst beim erstellen, der Objecte, den Index in der 'tag' property, die jede compo hat...sparste dir nervige schleifen. Ausser dir wird sie von niemanden benutzt.


Splinter - So 04.05.03 12:54

Vielen Dank ich glaub das klingt beides gut, ich probiers gleich aus.