t_id
577
t_version
1.1
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=25 Percentage= 50.00
Skipped=11 Percentage= 22.00
{ %version=1.1 } { %TARGET=linux } {$linklib c} type tprintfproc=procedure(t:pchar);varargs;cdecl; procedure printf(t:pchar);varargs;cdecl;external; var t : tprintfproc; begin printf('Proc test %d %s %f'#10,1,'test',1234.5678); t:=@printf; t('Procvar test %d %s %f'#10,2,'test',1234.5678); end.