Window creation: Difference between revisions
Content deleted Content added
→{{header|Pascal}}: add example |
|||
Line 1,163:
{Window show}
end</lang>
=={{header|Pascal}}==
{{works with|Free_Pascal}}
{{libheader|SysUtils}}{{libheader|SDL}}
<lang pascal>Program WindowCreation_SDL;
{$linklib SDL}
uses
SDL,
SysUtils;
var
screen: PSDL_Surface;
begin
SDL_Init(SDL_INIT_VIDEO);
screen := SDL_SetVideoMode( 800, 600, 16, (SDL_SWSURFACE or SDL_HWPALETTE) );
sleep(2000);
SDL_Quit;
end.</lang>
=={{header|Perl}}==
|