Delphi Befehle aus Listbox ausgliedern?

Thema durchsuchen

Ansicht

Themen-Optionen

Befehle aus Listbox ausgliedern?

Ein Thema von Hallo_Thomas · begonnen am 24. Apr 2005 · letzter Beitrag vom 24. Apr 2005

Vorheriger Beitrag

Nächster Beitrag

leddl

Registriert seit: 13. Okt 2003
Ort: Künzelsau
1.613 Beiträge

Delphi 2006 Professional

Re: Befehle aus Listbox ausgliedern?

24. Apr 2005, 13:29

Also als allererstes mal kannst du natürlich - wie ich dir bereits in deinem alten Thread gesagt habe - die Anzeige im Label aus der For-Schleife auslagern. Das geht sowieso nicht so schnell.
Außerdem kannst du doch einfach bei jeder Eingabe direkt prüfen, wieviele 1er, 3er und 7er seit der letzten 6 eingegeben wurden. Mußt ja nich jedes mal die ganze ListBox durchgehen.
Einfach zb ne globale Variable, die du im Create auf 0 setzt. Dann überprüfst du bei jeder Eingabe, obs ne 1, 3 oder 7 is und erhöhst sie. Wird ne 6 eingegeben, setzt du sie halt wieder auf 0. Sollte dir viel Rechenzeit sparen.

Axel Sefranek

A programmer started to cuss, cause getting to sleep was a fuss.
As he lay there in bed, looping round in his head
was: while(!asleep()) ++sheep;