Hallo Jungs,
ich hab das ganze hier nur mal so grob überflogen. Das mit den statischen Geschichten lässt sich für gewöhnlich mit folgendem Trick übergehen.
Delphi-Quellcode:
type
TStaticArray = array[0..16000] of Integer;
PStaticArray = ^TStaticArray;
procedure Wasauchimmer;
var
pArr = PStaticArray;
begin
getMem(pArr, 100*SizeOf(Integer));
// Jetzt Array Füllen
// Aufruf dann ungefähr so
FindKey(pArr^, ..,..);
end;