Hi!
Which console GT You prefer for Windows 98 ?
Sample program:
*********************
PROCEDURE main
LOCAL x,t
DBCREATE("test",{{"ABC","N",5,0}})
USE test EXCLUSIVE
FOR x:=1 TO 10000
  DBAPPEND()
  field->abc := x
NEXT
CLS
GO TOP
t:=SECONDS()
DO WHILE !EOF()
 x:=RECNO()
 ? x  // display and scroll
 SKIP
ENDDO
? "time1:",SECONDS()-t
?
GO TOP
t:=SECONDS()
DO WHILE !EOF()
 x:=RECNO()
 @ 24,1 SAY x  // only display
 SKIP
ENDDO
? "time2:",SECONDS()-t
?
GO TOP
t:=SECONDS()
DO WHILE !EOF()
 x:=RECNO()
 SKIP     //not display
ENDDO
? "time3:",SECONDS()-t
USE
RETURN
***********************

I compile it in Clipper and Harbour, and run on Win98 and WinXP
Result on Windows 98 in seconds:
-Harbour:
--full screen               7.20 ;     2.52 ; 0.00
--full screen + key   237.39 ;  110,18 ; 0.00    
--window               170.70 ;    25.10 ; 0.00        
--window + key        10.82 ;    17,30 ; 0.00
-Clipper
--full screen           10.98 ; 0.06 ; 0.05
--full screen + key  11.04 ; 0.11 ; 0.05
--window                0.17 ; 0.06 ; 0.05
--window + key        0.17 ; 0.11 ; 0.05

On Window XP:
-Harbour
--full screen (key or not)  4.09 ; 0.67 ; 0.00
--window (key or not)      4.94 ; 0.89 ; 0.00
-Clipper
--full screen (key or not)  10.38 ; 0.11 ; 0.00
--window (key or not)       0.16 ; 0.06 ; 0.00

(key - down and hold any key on keyboard)

I usualy use Clipper/Harbour not for dispaly realtime animation :-) .
So, maybe You make GT work like Clipper in window - aplication write to
memory buffer, and extra thread in fixed cycles (200 miliseconds)
display (copy) it to system console.

Adam
(sorry my English)
-- 
View this message in context: 
http://www.nabble.com/Console-GT-for-Windows-98-tp23274976p23274976.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to