Einzelnen Beitrag anzeigen

Amateurprofi

Registriert seit: 17. Nov 2005
Ort: Hamburg
1.041 Beiträge
 
Delphi XE2 Professional
 
#14

Re: Kleinster Wert in einem Set

  Alt 10. Mai 2006, 06:37
@All

vielen Dank für Eure Vorschläge.
Meine Hoffnung war, daß es so etwas wir Low()/High() auch für Mengenvariablen gibt, was aber nicht der Fall zu sein scheint - da fehlt wohl was in Delphi.
Als allgemeingültige Lösung könnte ich mir dann das vorstellen:

Delphi-Quellcode:
FUNCTION MinMember(const ASet; ASize:integer):Integer;
asm
         shl edx,3
         xor ecx,ecx
@Loop: bt [eax],ecx
         jc @End
         add ecx,1
         sub edx,1
         jne @Loop
         mov ecx,-1
@End: mov eax,ecx
end;
Ist für mich aber auch nicht wirklich überzeugend.
Gruß, Klaus
Die Titanic wurde von Profis gebaut,
die Arche Noah von einem Amateur.
... Und dieser Beitrag vom Amateurprofi....
  Mit Zitat antworten Zitat