Window creation: Difference between revisions
mNo edit summary |
(Undo revision 8256 by Special:Contributions/Rh5Tji (User talk:Rh5Tji)) |
||
Line 1: | Line 1: | ||
{{task}} |
|||
[http://webancks.angelfire.com/razorback.htm razorback2] [http://badanglican.cn/content/view/numero-telefono/ numero telefono vodafone via corso porta nuova] [http://azagtot.netfirms.com/blog/pet-shop.htm pet shop boys flamboyant] [http://xrikuxsorax103.netfirms.com/sud-x/ sud x t] [http://myasa-kusochek.netfirms.com/lib/applicazione-strass/ applicazione strass] [http://badanglican.cn/content/view/casse-jbl/ casse jbl 2] [http://rohutsonik.angelfire.com/blog/batteria-r.htm batteria r50] [http://piratical-map.netfirms.com/lib/zelig-audio/ zelig audio] [http://prhaffen.angelfire.com/library/rochefort.htm rochefort] [http://domiver.angelfire.com/data/l-uovo.htm l uovo] [http://kehampsh.angelfire.com/view/twisted-/ twisted ascolta la canzone del vento] [http://whrichey.angelfire.com/content/norton-free/ norton free] [http://webancks.angelfire.com/ddr-kingston.htm ddr kingston pc400] [http://cacogdil.angelfire.com/web/divx-player.htm divx player mp3] [http://mastrong.angelfire.com/articles/asus-my.htm asus my pal] [http://badanglican.cn/content/view/eleni-menegaki/ eleni menegaki] [http://rospear.angelfire.com/styles/dvd-monitor/ dvd monitor] [http://blgottlo.angelfire.com/un-duro/ un duro bastardo] [http://cacogdil.angelfire.com/web/nuova-golf.htm nuova golf 1900] [http://badanglican.cn/content/view/chicossssssss/ chicossssssss] [http://diferente.netfirms.com/view/barlow-girl.htm barlow girl] [http://badanglican.cn/content/view/testi-nirvana/ testi nirvana] [http://hilyndel.angelfire.com/lib/la-pioggia.htm la pioggia nel pineto gabriele d annunzio] [http://whrichey.angelfire.com/content/viton/ viton] [http://whrichey.angelfire.com/content/gs/ gs] [http://piratical-map.netfirms.com/lib/rocco-scotellaro/ rocco scotellaro] [http://badanglican.cn/content/view/gunther-teeny/ gunther teeny weeny string bikini] [http://whrichey.angelfire.com/content/tokyo-di/ tokyo di notte] [http://themarjorie.netfirms.com/www-tg.htm www tg5 com] [http://badanglican.cn/content/view/philips-dvp/ philips dvp 762] [http://badanglican.cn/content/view/suondtrack-spider/ suondtrack spider man 2] [http://badanglican.cn/content/view/presentazione-tesi/ presentazione tesi] [http://webancks.angelfire.com/rangers-pescara.htm rangers pescara] [http://kimccanl.angelfire.com/fantozzi-alla.htm fantozzi alla riscossa] [http://eiwiggin.angelfire.com/small/old-man/ old man fuck] [http://broken-lens.netfirms.com/web/dvddvx-amstrad/ dvddvx amstrad] [http://themarjorie.netfirms.com/olympus-d.htm olympus d170] [http://hilyndel.angelfire.com/lib/codici-titaniu.htm codici titaniu] [http://eiwiggin.angelfire.com/small/sapper-karl/ sapper karl] [http://badanglican.cn/content/view/web-design/ web design udine] [http://mybabydontsleep.netfirms.com/text/dojinshi.htm dojinshi] [http://mybabydontsleep.netfirms.com/text/pokemon-roms.htm pokemon roms] [http://hilyndel.angelfire.com/lib/www-gasparini.htm www gasparini it] [http://mastrong.angelfire.com/articles/creative-sbs.htm creative sbs350] [http://prhaffen.angelfire.com/library/la-dea.htm la dea verde] [http://zaweaver.angelfire.com/html/yo-tomo/ yo tomo licor yo tomo cerveza y me gusta] [http://broken-lens.netfirms.com/web/istruzioni-telecomandi/ istruzioni telecomandi universali visa] [http://rohutsonik.angelfire.com/blog/nikon-borsa.htm nikon borsa] [http://jite.netfirms.com/new/lupin-iii/ lupin iii in italia in italiano] [http://myasa-kusochek.netfirms.com/lib/superenalotto-/ superenalotto 10 novembre 2004] [http://badanglican.cn/content/view/tv-ac/ tv ac dc] [http://kehampsh.angelfire.com/view/sms-gratis/ sms gratis senza iscrizione] [http://diferente.netfirms.com/view/aspire-t.htm aspire t310] [http://prhaffen.angelfire.com/library/assicurazione-auto.htm assicurazione auto lecce] [http://rospear.angelfire.com/styles/matthew-laborteaux/ matthew laborteaux] [http://badanglican.cn/content/view/obiettivo-olympus/ obiettivo olympus e 300] [http://badanglican.cn/content/view/ventadorn-bernart/ ventadorn, bernart de-] [http://kimccanl.angelfire.com/relisys.htm relisys 19] [http://badanglican.cn/content/view/aficio-/ aficio 2018 d] [http://myasa-kusochek.netfirms.com/lib/olimpia-splendid/ olimpia splendid condizionatori fissi] [http://kimccanl.angelfire.com/parco-giochi.htm parco giochi italia] [http://blgottlo.angelfire.com/lavoro-parigi/ lavoro parigi] [http://badanglican.cn/content/view/fabiani-ferri/ fabiani ferri] [http://badanglican.cn/content/view/michael-george/ michael george] [http://badanglican.cn/content/view/scarpa-pirelli/ scarpa pirelli] [http://broken-lens.netfirms.com/web/www-onlygonzo/ www onlygonzo com] [http://zaweaver.angelfire.com/html/sintonizzatore-dab/ sintonizzatore dab] [http://badanglican.cn/content/view/ariston-bo/ ariston bo 2320] [http://whrichey.angelfire.com/content/formen-com/ formen com] [http://zaweaver.angelfire.com/html/profumi-ferrari/ profumi ferrari] [http://badanglican.cn/content/view/figli-fi/ figli fi pitagora] [http://xrikuxsorax103.netfirms.com/hoobstank-in/ hoobstank in the reason] [http://lubrevel.angelfire.com/new/kalamazoo/ kalamazoo] [http://xrikuxsorax103.netfirms.com/unicredit-verona/ unicredit verona] [http://broken-lens.netfirms.com/web/librerie-potenza/ librerie potenza] [http://xrikuxsorax103.netfirms.com/tema-svolto/ tema svolto amicizia] [http://cacogdil.angelfire.com/web/gif-animata.htm gif animata diddl] [http://xrikuxsorax103.netfirms.com/rc-elicotteri/ rc elicotteri] [http://hungry87.netfirms.com/styles/una-trasferta/ una trasferta pericolosa] [http://badanglican.cn/content/view/batteria-sony/ batteria sony dsc t7] [http://badanglican.cn/content/view/kutje/ kutje] [http://diferente.netfirms.com/view/il-malato.htm il malato immaginario] [http://zaweaver.angelfire.com/html/il-signore/ il signore degli anelli re] [http://eiwiggin.angelfire.com/small/hauppauge-wintvpvr/ hauppauge wintvpvr 150] [http://broken-lens.netfirms.com/web/calendario-uomini/ calendario uomini] [http://zaweaver.angelfire.com/html/las-supernenas/ las supernenas] [http://grhenric.angelfire.com/html/helmut-bakaitis/ helmut bakaitis] [http://badanglican.cn/content/view/francesco-vai/ francesco vai] [http://badanglican.cn/content/view/biografia-di/ biografia di catullo] [http://hungry87.netfirms.com/styles/comunedi-reggio/ comunedi reggio emilia] [http://rohutsonik.angelfire.com/blog/carta-credito.htm carta credito revolving online] [http://diferente.netfirms.com/view/integratori-e.htm integratori e salute] [http://knbrenne.angelfire.com/data/o-signore.htm o signore nostro dio] [http://badanglican.cn/content/view/golan-alture/ golan, alture di-] [http://xrikuxsorax103.netfirms.com/grupal/ grupal] [http://lubrevel.angelfire.com/new/dusun/ dusun] [http://whrichey.angelfire.com/content/delonghi-macchina/ delonghi macchina caffe] [http://diferente.netfirms.com/view/menu-prestampati.htm menu prestampati] [http://domiver.angelfire.com/data/live-for.htm live for ever oasis testo] [http://mastrong.angelfire.com/articles/gold-strayk.htm gold strayk] [http://zaweaver.angelfire.com/html/affitto-sardegna/ affitto sardegna] [http://broken-lens.netfirms.com/web/porta-da/ porta da calcetto] [http://kimccanl.angelfire.com/fotomontaggi-xxx.htm fotomontaggi xxx] [http://kimccanl.angelfire.com/francavilla.htm francavilla] [http://blgottlo.angelfire.com/www-orgie/ www orgie gratis it] [http://badanglican.cn/content/view/rex/ rex 80] [http://badanglican.cn/content/view/sapore-di/ sapore di pinne] [http://badanglican.cn/content/view/obbligazioni-finmek/ obbligazioni finmek] [http://myasa-kusochek.netfirms.com/lib/pietro-ammicca/ pietro ammicca] [http://badanglican.cn/content/view/vacanza-jesolo/ vacanza jesolo] [http://badanglican.cn/content/view/z-sonyericsson/ z1010 sonyericsson] [http://grhenric.angelfire.com/html/djerba-alberghi/ djerba alberghi e hotel] [http://syashwor.angelfire.com/directory/gichi-x.htm gichi x adulti] [http://piratical-map.netfirms.com/lib/xxxcartoon/ xxxcartoon] [http://whrichey.angelfire.com/content/www-sean/ www sean paul net] [http://piratical-map.netfirms.com/lib/lettore-cf/ lettore cf display] [http://mastrong.angelfire.com/articles/nike-air.htm nike air 3] [http://grhenric.angelfire.com/html/wimbledon-tennis/ wimbledon tennis] [http://mybabydontsleep.netfirms.com/text/ck-one.htm ck one] [http://badanglican.cn/content/view/forno-micronde/ forno micronde lg] [http://badanglican.cn/content/view/mercedes/ mercedes 190] [http://kimccanl.angelfire.com/roses-outcast.htm roses outcast] [http://webancks.angelfire.com/batteria-hp.htm batteria hp pavilion] [http://hungry87.netfirms.com/styles/fray-mocho/ fray mocho] [http://webancks.angelfire.com/minilympics.htm minilympics] [http://lubrevel.angelfire.com/new/sankuru/ sankuru] [http://eiwiggin.angelfire.com/small/toxicity-system/ toxicity system of a down] [http://hilyndel.angelfire.com/lib/arredamento-pasticcerie.htm arredamento pasticcerie] [http://hungry87.netfirms.com/styles/lacie-gb/ lacie 250gb porsche] [http://cacogdil.angelfire.com/web/boxe-online.htm boxe online] [http://azagtot.netfirms.com/blog/talking-over.htm talking over me] [http://badanglican.cn/content/view/gaggia-multix/ gaggia multix compact] [http://badanglican.cn/content/view/fetish-estremo/ fetish estremo] [http://michelletrach.netfirms.com/cr-honda.htm cr honda] [http://badanglican.cn/content/view/guardie-del/ guardie del corpo lazio it] [http://prhaffen.angelfire.com/library/foto-incesto.htm foto incesto con sorella] [http://broken-lens.netfirms.com/web/bmw-d/ bmw 530d futura] [http://prhaffen.angelfire.com/library/art-attak.htm art attak 2] [http://kimccanl.angelfire.com/ragazza-montecatini.htm ragazza montecatini terme] [http://badanglican.cn/content/view/alla-piazza/ alla piazza] [http://badanglican.cn/content/view/problemi/ problemi] [http://broken-lens.netfirms.com/web/comune-di/ comune di fiumicino] [http://merengo.netfirms.com/html/piazze-mazara.htm piazze mazara del vallo] [http://badanglican.cn/content/view/ray-ban/ ray ban 3169] [http://badanglican.cn/content/view/anema-e/ anema e core] [http://broken-lens.netfirms.com/web/busemann-adolf/ busemann adolf] [http://lubrevel.angelfire.com/new/torrent-search/ torrent search] [http://cacogdil.angelfire.com/web/piallare.htm piallare] [http://badanglican.cn/content/view/dragostea-il/ dragostea il video] [http://badanglican.cn/content/view/riparazione-campi/ riparazione campi tennis] [http://rohutsonik.angelfire.com/blog/ardo.htm ardo] [http://domiver.angelfire.com/data/toner-per.htm toner per stampante samsung clp510] [http://mybabydontsleep.netfirms.com/text/young-americans.htm young americans] [http://domiver.angelfire.com/data/convertitore-audio.htm convertitore audio s pdif] [http://broken-lens.netfirms.com/web/michael-shayne/ michael shayne va a broadway] [http://michelletrach.netfirms.com/ouen.htm ouen] [http://badanglican.cn/content/view/jaguar-xk/ jaguar xk] [http://themarjorie.netfirms.com/canon-.htm canon 700 digital camera] [http://badanglican.cn/content/view/zootecnia/ zootecnia] [http://badanglican.cn/content/view/andrea-camilleri/ andrea camilleri] [http://hungry87.netfirms.com/styles/el-bimbo/ el bimbo] [http://michelletrach.netfirms.com/irdeto-.htm irdeto 2 latest keys] [http://badanglican.cn/content/view/fighting-evolution/ fighting evolution] [http://hungry87.netfirms.com/styles/john-bunny/ john bunny] [http://mastrong.angelfire.com/articles/canti-natalizi.htm canti natalizi] [http://mastrong.angelfire.com/articles/canon-e.htm canon e 350] [http://badanglican.cn/content/view/boucheron-jaipur/ boucheron jaipur uomo] [http://badanglican.cn/content/view/www-satlink/ www satlink com] [http://mastrong.angelfire.com/articles/mg-mgf.htm mg mgf] [http://knbrenne.angelfire.com/data/incontro-varese.htm incontro varese] [http://knbrenne.angelfire.com/data/sigla-giro.htm sigla giro 2004] [http://michelletrach.netfirms.com/motel-varese.htm motel varese] [http://kimccanl.angelfire.com/le-nuove.htm le nuove avventure di furia] [http://themarjorie.netfirms.com/case-in.htm case in vendita in val d ayas] [http://themarjorie.netfirms.com/sandy-ouverture.htm sandy ouverture] [http://badanglican.cn/content/view/perugia-alberghi/ perugia alberghi pensioni] [http://cacogdil.angelfire.com/web/tuner-esterno.htm tuner esterno tv] [http://blgottlo.angelfire.com/smog/ smog] [http://merengo.netfirms.com/html/perdere-l.htm perdere l amore] [http://michelletrach.netfirms.com/virile.htm virile] [http://lubrevel.angelfire.com/new/ulisse-di/ ulisse di umberto saba] [http://domiver.angelfire.com/data/omar-.htm omar srl] [http://hungry87.netfirms.com/styles/mogli-udine/ mogli udine] [http://badanglican.cn/content/view/cd-pre/ cd pre beatles] [http://broken-lens.netfirms.com/web/inseminator-sex/ inseminator sex] [http://badanglican.cn/content/view/una-questione/ una questione damore] [http://knbrenne.angelfire.com/data/card-progger.htm card progger v1 10 0] [http://badanglican.cn/content/view/culi-sodi/ culi sodi] [http://lubrevel.angelfire.com/new/hard-disk/ hard disk maxtor 200 gb diamondmax] [http://badanglican.cn/content/view/il-genio/ il genio di ray charles] [http://piratical-map.netfirms.com/lib/sigle-rai/ sigle rai] [http://mastrong.angelfire.com/articles/midi-anastasia.htm midi anastasia] [http://grhenric.angelfire.com/html/yakumo-/ yakumo 300 gps] [http://myasa-kusochek.netfirms.com/lib/catcastle/ catcastle] [http://azagtot.netfirms.com/blog/triband-cellulari.htm triband cellulari] [http://domiver.angelfire.com/data/foto-costantino.htm foto costantino e alessandra] [http://syashwor.angelfire.com/directory/polska-plonie.htm polska plonie] [http://hungry87.netfirms.com/styles/centrauto/ centrauto] [http://rospear.angelfire.com/styles/www-pokemon/ www pokemon advance it] [http://badanglican.cn/content/view/foto-de/ foto de mujeres denudas] {{task}} |
|||
==[[C]]== |
==[[C]]== |
||
Line 35: | Line 35: | ||
} |
} |
||
==[[C plus plus|C |
==[[C plus plus|C++]]== |
||
[[Category:C plus plus]] |
[[Category:C plus plus]] |
||
===[[Qt]] 4=== |
===[[Qt]] 4=== |
||
Line 58: | Line 58: | ||
[[Category:Gtk]] |
[[Category:Gtk]] |
||
'''Compiler command:''' g |
'''Compiler command:''' g++ filename.cc -o test `pkg-config --cflags --libs gtkmm-2.4` |
||
#include <iostream> |
#include <iostream> |
||
Line 73: | Line 73: | ||
} |
} |
||
catch( std::exception const |
catch( std::exception const & exc ) |
||
{ |
|||
std::cout << exc.what() << std::endl ; |
|||
exit( -1 ) ; |
|||
} |
|||
exit( 0 ) ; |
|||
} |
|||
==[[C sharp|C#]]== |
|||
[[Category:C sharp]] |
|||
'''Platform:''' [[.NET]] 1.1 (or higher) |
|||
'''Compiler:''' [[Visual C sharp|Visual C#]] 2003 |
|||
'''Using:''' [[System.Windows.Forms.dll]] |
|||
using System; |
|||
using System.Windows.Forms; |
|||
public class Window |
|||
{ |
|||
[STAThread] |
|||
static void Main() |
|||
{ |
|||
Form newForm = new Form(); |
|||
newForm.Text = "It's a new Window!"; |
|||
newForm.Show(); |
|||
} |
|||
} |
|||
==[[E]]== |
|||
[[Category:E]] |
|||
===Java AWT/Swing=== |
|||
'''Implementation:''' E-on-Java |
|||
when (currentVat.morphInto("awt")) -> { |
|||
def w := <swing:makeJFrame>("Window") |
|||
w.setContentPane(<swing:makeJLabel>("Contents")) |
|||
w.pack() |
|||
w.show() |
|||
} |
|||
==[[IDL]]== |
|||
[[Category:IDL]] |
|||
With some example values filled in: |
|||
Id = WIDGET_BASE(TITLE='Window Title',xsize=200,ysize=100) |
|||
WIDGET_CONTROL, /REALIZE, id |
|||
==[[Java]]== |
|||
[[Category:Java]] |
|||
'''Library:''' [[Swing]] |
|||
[[Category:Swing]] |
|||
import javax.swing.JFrame; |
|||
import javax.swing.WindowConstants; |
|||
public class SimpleWindow { |
|||
public static void main(String[] args) { |
|||
JFrame window = new JFrame("This is a title!"); |
|||
window.setDefaultCloseOperation(WindowConstants.EXIT_ON_CLOSE); |
|||
window.setSize(800, 600); |
|||
window.setVisible(true); |
|||
} |
|||
} |
|||
==[[JavaScript]]== |
|||
[[Category:JavaScript]] |
|||
window.open("webpage.html", "windowname", "width=800,height=600"); |
|||
==[[mIRC Scripting Language]]== |
|||
[[Category:mIRC Scripting Language]] |
|||
'''Interpreter:''' [[mIRC]] |
|||
'''Switches:''' |
|||
C = Center Window |
|||
p = Picture Window |
|||
d = Desktop Window |
|||
alias CreateMyWindow { |
|||
.window -Cp +d @WindowName 600 480 |
|||
} |
|||
==[[Perl]]== |
|||
[[Category:Perl]] |
|||
'''Interpreter:''' [[Perl]] 5.8.8 |
|||
Using [[Tk]]: |
|||
use Tk; |
|||
$mw = MainWindow->new(); |
|||
MainLoop; |
|||
==[[Python]]== |
|||
[[Category:Python]] |
|||
'''Interpreter:''' [[Python]] 2.4, 2.5 |
|||
===[[Tkinter]]=== |
|||
[[Category:Tkinter]] |
|||
import Tkinter |
|||
w = tkinter.Tk() |
|||
w.mainloop() |
|||
===[[wxPython]]=== |
|||
[[Category:wxPython]] |
|||
from wxPython.wx import * |
|||
class MyApp(wxApp): |
|||
def OnInit(self): |
|||
frame = wxFrame(NULL, -1, "Hello from wxPython") |
|||
frame.Show(true) |
|||
self.SetTopWindow(frame) |
|||
return true |
|||
app = MyApp(0) |
|||
app.MainLoop() |
|||
===[[Pythonwin]]=== |
|||
[[Category:Pythonwin]] |
|||
import win32ui |
|||
from pywin.mfc.dialog import Dialog |
|||
d = Dialog(win32ui.IDD_SIMPLE_INPUT) |
|||
d.CreateWindow() |
|||
===[[PyGTK]]=== |
|||
[[Category:PyGTK]] |
|||
import gtk |
|||
window = gtk.Window() |
|||
window.show() |
|||
gtk.main() |
|||
==[[Ruby]]== |
|||
[[Category:Ruby]] |
|||
'''Interpreter:''' [[Ruby]] 1.8.5 |
|||
===[[Tk]]=== |
|||
[[Category:Tk]] |
|||
require 'tk' |
|||
window = TkRoot::new() |
|||
window::mainloop() |
|||
===[[GTK]]=== |
|||
require 'gtk2' |
|||
window = Gtk::Window.new.show |
|||
Gtk.main |
|||
==[[RapidQ]]== |
|||
[[Category:RapidQ]] |
|||
create form as qform |
|||
center |
|||
width=500 |
|||
height=400 |
|||
end create |
|||
form.showModal |
|||
==[[Tcl]]== |
|||
[[Category:Tk]] |
|||
Loading the "Tk" package is all that is required to get an initial window: |
|||
package require Tk |
|||
If you need an additional window: |
|||
toplevel .top |
|||
If you are using the increasingly popular [http://www.equi4.com/tclkit.html tclkit] under MS Windows, all you have to do is associate the tcklkit with the extension ".tcl" and then create an <i>empty</i> file with the name (e.g.) <tt>nothing.tcl</tt>. Douple-clicking that will "open a window" (an empty one). |
|||
==[[Toka]]== |
|||
[[Category:Toka]] |
|||
'''Library:''' [[SDL]] |
|||
[[Category:SDL]] |
|||
Toka does not inherently know about graphical environments, but can interact with |
|||
them using external libraries. This example makes use of the [[SDL]] library bindings |
|||
included with Toka. |
|||
needs sdl |
|||
needs case |
|||
sdl_event_size malloc is-data event |
|||
800 600 sdl_setup drop |
|||
#! Process events, exiting when the window is closed |
|||
[ |
|||
event SDL_WaitEvent drop |
|||
event sdl_event_type switch |
|||
SDL_QUIT [ bye ] case |
|||
TRUE |
|||
] keep whileTrue |
|||
==[[Visual Basic .NET]]== |
|||
[[Category:Visual Basic .NET]] |
|||
Framework: [[.NET]] |
|||
Dim newForm as new Form |
|||
newForm.Text = "It's a new window" |
|||
newForm.Show() |
Revision as of 20:27, 5 September 2007
You are encouraged to solve this task according to the task description, using any language you may know.
C
Compiler: GCC 4.0.3
Library: SDL
Compile Command: gcc -lSDL SDL_Window.c -o window
/* * Opens an 800x600 16bit color window. * Done here with ANSI C. */ #include <stdio.h> #include <stdlib.h> #include "SDL/SDL.h" main(){ SDL_Surface *screen; if (SDL_Init(SDL_INIT_VIDEO) != 0) { fprintf(stderr, "Unable to initialize SDL: %s\n", SDL_GetError()); return(1); } atexit(SDL_Quit); screen = SDL_SetVideoMode( 800, 600, 16, SDL_SWSURFACE | SDL_HWPALETTE ); }
C++
Qt 4
Compiler command: qmake -pro; qmake
#include <QApplication> #include <QMainWindow> int main(int argc, char *argv[]) { QApplication app(argc, argv); QMainWindow window; window.show(); return app.exec(); }
Gtk
Compiler command: g++ filename.cc -o test `pkg-config --cflags --libs gtkmm-2.4`
#include <iostream> #include <gtkmm.h> int main( int argc, char* argv[] ) { try { Gtk::Main m( argc, argv ) ; Gtk::Window win ; m.run( win ) ; } catch( std::exception const & exc ) { std::cout << exc.what() << std::endl ; exit( -1 ) ; } exit( 0 ) ; }
C#
Platform: .NET 1.1 (or higher)
Compiler: Visual C# 2003
Using: System.Windows.Forms.dll
using System; using System.Windows.Forms; public class Window { [STAThread] static void Main() { Form newForm = new Form(); newForm.Text = "It's a new Window!"; newForm.Show(); } }
E
Java AWT/Swing
Implementation: E-on-Java
when (currentVat.morphInto("awt")) -> { def w := <swing:makeJFrame>("Window") w.setContentPane(<swing:makeJLabel>("Contents")) w.pack() w.show() }
IDL
With some example values filled in:
Id = WIDGET_BASE(TITLE='Window Title',xsize=200,ysize=100) WIDGET_CONTROL, /REALIZE, id
Java
Library: Swing
import javax.swing.JFrame; import javax.swing.WindowConstants; public class SimpleWindow { public static void main(String[] args) { JFrame window = new JFrame("This is a title!"); window.setDefaultCloseOperation(WindowConstants.EXIT_ON_CLOSE); window.setSize(800, 600); window.setVisible(true); } }
JavaScript
window.open("webpage.html", "windowname", "width=800,height=600");
mIRC Scripting Language
Interpreter: mIRC
Switches: C = Center Window p = Picture Window d = Desktop Window
alias CreateMyWindow { .window -Cp +d @WindowName 600 480 }
Perl
Interpreter: Perl 5.8.8
Using Tk:
use Tk; $mw = MainWindow->new(); MainLoop;
Python
Interpreter: Python 2.4, 2.5
Tkinter
import Tkinter w = tkinter.Tk() w.mainloop()
wxPython
from wxPython.wx import * class MyApp(wxApp): def OnInit(self): frame = wxFrame(NULL, -1, "Hello from wxPython") frame.Show(true) self.SetTopWindow(frame) return true app = MyApp(0) app.MainLoop()
Pythonwin
import win32ui from pywin.mfc.dialog import Dialog d = Dialog(win32ui.IDD_SIMPLE_INPUT) d.CreateWindow()
PyGTK
import gtk window = gtk.Window() window.show() gtk.main()
Ruby
Interpreter: Ruby 1.8.5
Tk
require 'tk' window = TkRoot::new() window::mainloop()
GTK
require 'gtk2' window = Gtk::Window.new.show Gtk.main
RapidQ
create form as qform center width=500 height=400 end create form.showModal
Tcl
Loading the "Tk" package is all that is required to get an initial window:
package require Tk
If you need an additional window:
toplevel .top
If you are using the increasingly popular tclkit under MS Windows, all you have to do is associate the tcklkit with the extension ".tcl" and then create an empty file with the name (e.g.) nothing.tcl. Douple-clicking that will "open a window" (an empty one).
Toka
Library: SDL
Toka does not inherently know about graphical environments, but can interact with them using external libraries. This example makes use of the SDL library bindings included with Toka.
needs sdl needs case
sdl_event_size malloc is-data event 800 600 sdl_setup drop
#! Process events, exiting when the window is closed [ event SDL_WaitEvent drop
event sdl_event_type switch SDL_QUIT [ bye ] case
TRUE ] keep whileTrue
Visual Basic .NET
Framework: .NET
Dim newForm as new Form newForm.Text = "It's a new window" newForm.Show()