Bei was genau erhälst du eine Division durch Null?
Wenn du irgendwie durch eine Variable teilst: überprüfe sie doch einfach vorher und setze sie etweder auf einen vernünftigen Wert oder lass dann das Dividieren.
Mach ich doch timeGetTime läuft weiter oder ? Wie soll ich das aufhalten..
Delphi-Quellcode:
for IntI := 0 to 100 do
begin
dwStartCount := timeGetTime;
if m_hNewBitmap <> 0 then
begin
DeleteObject(m_hNewBitmap);
m_hNewBitmap := 0;
end;
m_hNewBitmap := FadeBitmap(m_hBitmap, IntI);
OnDraw(ClientDC);
dwEndCount := timeGetTime;
if nStep = 0 then
begin
// timer frequency calculation
if (dwEndCount > dwStartCount) then
nStep := 1500 div (dwEndCount - dwStartCount)
else
nStep := 20;
// time to frequency
nStep := 100 div nStep;
nStep := max(nStep, 3);
nStep := min(nStep, 49);
end;
end;
Hier kracht es meistens
Aber nur wenn ich die Schleife duch einen Haltepunkt unterbreche.
nStep := 100 div nStep;
gruss