Forum: Programmieren allgemein
by WhatAmI,
9. Sep 2004
es geht um eine schnellere suche! weiss nicht genau wie sie auf deutsch heisst! den oben genannten titel ist auf französisch!;)
am anfang ist mein suchdomain die ganze liste! da wenn ech jede einzelne zeile durchgehen würde viel zeit opfert, teile ich immer den suchdomain durch 2 und schau op das ergebnis grösser oder kleiner sein muss! fals gefunden, bekommt die boolische variable true...
Forum: Programmieren allgemein
by WhatAmI,
9. Sep 2004
procedure TForm1.Button1Click(Sender: TObject);
var liminf,limsup,milieu:integer;
trouver:boolean;
begin
trouver:=false;
liminf:=0;
limsup:=lb.items.count-1;
while (not trouver) and (liminf < limsup) do
begin
milieu:=(limsup+liminf) div 2 ;