t_id
1025
t_adddate
2003/10/14
Flag
t_graph
set
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=0 Percentage= 0.00
Skipped=50 Percentage= 100.00
| Result type | Cat. | Count | Percentage | First date | Last Date |
| Skipping test because it uses graph | 50 | 100.0 | 2024/05/08 23:55:00 41 | 2024/05/09 01:28:00 28 | |
| i386 | 28 | 56.0 | 2024/05/09 00:23:00 26 | 2024/05/09 01:28:00 28 | |
| sparc | 3 | 6.0 | 2024/05/08 23:55:00 41 | 2024/05/09 01:13:00 46 | |
| x86_64 | 8 | 16.0 | 2024/05/09 00:13:00 26 | 2024/05/09 01:24:00 21 | |
| powerpc64 | 10 | 20.0 | 2024/05/09 00:27:00 46 | 2024/05/09 01:26:00 54 | |
| aarch64 | 1 | 2.0 | 2024/05/09 00:58:00 35 | 2024/05/09 00:58:00 35 | |
| linux | 45 | 90.0 | 2024/05/09 00:23:00 26 | 2024/05/09 01:28:00 28 | |
| solaris | 3 | 6.0 | 2024/05/08 23:55:00 41 | 2024/05/09 01:13:00 46 | |
| win64 | 2 | 4.0 | 2024/05/09 00:13:00 26 | 2024/05/09 00:57:00 26 | |
| 3.3.1 | 39 | 78.0 | 2024/05/09 00:13:00 26 | 2024/05/09 01:28:00 28 | |
| 3.2.3 | 11 | 22.0 | 2024/05/08 23:55:00 41 | 2024/05/09 01:16:00 28 |
{ %GRAPH }
{ %TARGET=go32v2,win32,linux }
{ Old file: tbs0037.pp }
{ tests missing graph.setgraphmode OK RTL (FK) }
uses
graph,
crt;
var
gd,gm,res : integer;
begin
gd:=detect;
initgraph(gd,gm,'');
res := graphresult;
if res <> grOk then
begin
graphErrorMsg(res);
halt(1);
end;
setviewport(0,0,getmaxx,getmaxy,clipon);
line(1,1,100,100);
{readkey;}
setgraphmode(m1024x768);
setviewport(0,0,getmaxx,getmaxy,clipon);
res := graphresult;
if res <> grOk then
begin
closegraph;
graphErrorMsg(res);
{ no error, graph mode is simply not supported }
halt(0);
end;
line(100,100,1024,800);
{readkey;}
delay(1000);
closegraph;
end.