uses Gtk2; var FoAblak : pGtkWidget; begin gtk_init(@argc, @argv); FoAblak := gtk_window_new(GTK_WINDOW_TOPLEVEL); gtk_widget_show(FoAblak); gtk_main(); end.