I am trying to convert nano-X.h to a pas file but I get some errors. This is 2 of them. I cannot se what the problem is, can anyone give me a hint.
h2pas is not perfect, some things it doesn't understand, and other "C" things simply don't make sense in Pascal. So you will probably end up translating a lot by hand. My guess, the two problems you posted would look something like this: (**************************) const GR_ERROR_STRINGS: array[0..17] of pchar = ( ' ', 'Bad window id: %d'#10, 'Bad graphics context: %d'#10, 'Bad cursor size'#10, 'Out of server memory'#10, 'Bad window size: %d'#10, 'Keyboard error'#10, 'Mouse error'#10, 'Input only window: %d'#10, 'Illegal on root window: %d'#10, 'Clipping overflow'#10, 'Screen error'#10, 'Unmapped focus window: %d'#10, 'Bad drawing mode gc: %d'#10, 'Bad line attribute gc: %d'#10, 'Bad fill mode gc: %d'#10, 'Bad region id: %d'#10, nil ); procedure GrSetWindowBackgroundColor(wid:GR_WINDOW_ID; color:GR_COLOR); var props: GR_WM_PROPERTIES; begin props.flags := GR_WM_FLAGS_BACKGROUND; props.background := color; GrSetWMProperties(wid, @props); end; (**************************) You might also try pre-processing the headers with cpp -nostdinc (or gcc -E) - Jeff _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
