Einzelnen Beitrag anzeigen

Benutzerbild von turboPASCAL
turboPASCAL

Registriert seit: 8. Mai 2005
Ort: Sondershausen
4.274 Beiträge
 
Delphi 6 Personal
 
#40

Re: [Bitte mal Testen (die Zweite)] 3D nonVCL Demo

  Alt 4. Dez 2007, 15:18
Zitat von himitsu:
Dann bau doch ein z.B. Sleep(10) dort ein oder wie sieht denn deine Schleife aus?
(Hagen hatte mal hier irgendwo eine schöne Schleife vorgestellt, welche bis zu einem Event/Message schläft)
Ja, die bin ich am suchen, im Moment schaut die Schleife "wie üblich" aus:

Delphi-Quellcode:
while not finished do
  begin
    if (PeekMessage(msg, 0, 0, 0, PM_REMOVE)) then
    begin
      if (msg.message = WM_QUIT) then //...
       else begin
        TranslateMessage(msg);
        DispatchMessage(msg);
      end;
    end else
    begin
      glDraw; // Szene zeichnen
      SwapBuffers(h_DC);

      // Sleep(5); // sollte reichen für rund 2% CPU Last...
    end;
  end;
  //...

Zitat von Luckie:
Auch hier im Büro bekomme ich die Fehlermeldung. Windows XP SP2. Prozessor und
Grafikkarte kann ich jetzt nicht sagen.
Das ist Schade. Ich vermute einfach mal das die Graka. daran Schuld ist. Multitexturing etc.
sollte diese schon sachaffen sonst sieht es schlecht aus (auch wenn im Demo keine Texturen
dabei sind, die muss ich erst noch malen).
Matti
Meine Software-Projekte - Homepage - Grüße vom Rüsselmops -Mops Mopser
  Mit Zitat antworten Zitat