CentOS下Fortran程序如何進行圖形化界面開發

在CentOS系統下進行Fortran程序的圖形化界面（GUI）開發，可以采用多種方法。以下是一些常見的選擇：

1. 使用GTK+

GTK+是一個跨平臺的圖形用戶界面庫，支持C、C++、Python等多種語言，也可以通過綁定用于Fortran。

步驟：

1. 安裝GTK+庫：

   sudo yum install gtk2-devel
   

2. 安裝Fortran綁定： 可以使用gtk-fortran庫，它提供了Fortran語言的GTK+綁定。

   sudo yum install gtk-fortran
   

3. 編寫Fortran代碼： 使用gtk-fortran庫編寫Fortran程序。

   program gtk_example
     use gtk
     implicit none
   
     type(GtkWindow) :: window
     type(GtkButton) :: button
   
     call gtk_init()
   
     window = gtk_window_new(GTK_WINDOW_TOPLEVEL)
     call gtk_window_set_title(GTK_WINDOW(window), "GTK+ Fortran Example")
     call gtk_container_set_border_width(GTK_CONTAINER(window), 10)
     call gtk_widget_set_size_request(window, 200, 200)
   
     button = gtk_button_new_with_label("Click Me")
     call gtk_container_add(GTK_CONTAINER(window), button)
   
     call gtk_widget_show_all(window)
   
     call gtk_main()
   
     call gtk_main_quit()
   end program gtk_example
   

4. 編譯和運行：

   gfortran -o gtk_example gtk_example.f90 `pkg-config --cflags --libs gtk+-2.0`
   ./gtk_example
   

2. 使用FLTK

FLTK（Fast Light Toolkit）是一個輕量級的跨平臺C++ GUI庫，也有Fortran綁定。

步驟：

1. 安裝FLTK庫：

   sudo yum install fltk-devel
   

2. 安裝Fortran綁定： 可以使用fltk-fortran庫，它提供了Fortran語言的FLTK綁定。

   sudo yum install fltk-fortran
   

3. 編寫Fortran代碼： 使用fltk-fortran庫編寫Fortran程序。

   program fltk_example
     use fltk
     implicit none
   
     type(Fl_Window) :: window
     type(Fl_Button) :: button
   
     call fl_initialize()
   
     window = fl_window_new(200, 200, "FLTK Fortran Example")
     button = fl_button_new(10, 10, 180, 30, "Click Me")
     call fl_window_end(window)
     call fl_add(window, button)
     call fl_set_object_callback(button, fltk_callback)
   
     call fl_show_window(window)
     call fl_run()
   
     call fl_destroy_window(window)
     call fl_terminate()
   end program fltk_example
   
   subroutine fltk_callback(widget, data)
     use fltk
     implicit none
   
     type(Fl_Widget), intent(in) :: widget
     integer, intent(in) :: data
   
     print *, "Button clicked!"
   end subroutine fltk_callback
   

4. 編譯和運行：

   gfortran -o fltk_example fltk_example.f90 `pkg-config --cflags --libs fltk`
   ./fltk_example
   

3. 使用Qt

Qt是一個功能強大的跨平臺C++ GUI庫，也有Fortran綁定。

步驟：

1. 安裝Qt庫：

   sudo yum install qt5-qtbase-devel
   

2. 安裝Fortran綁定： 可以使用qt-fortran庫，它提供了Fortran語言的Qt綁定。

   sudo yum install qt-fortran
   

3. 編寫Fortran代碼： 使用qt-fortran庫編寫Fortran程序。

   program qt_example
     use Qt5Core
     use Qt5Widgets
     implicit none
   
     type(QApplication) :: app
     type(QWidget) :: window
     type(QPushButton) :: button
   
     call QApplication_initialize(app)
   
     window = QWidget_new()
     call window_setWindowTitle(window, "Qt Fortran Example")
     call window_setGeometry(window, 100, 100, 200, 100)
   
     button = QPushButton_new("Click Me")
     call window_setLayout(window, QHBoxLayout_new())
     call QHBoxLayout_addWidget(HBoxLayout_window(window), button)
   
     call window_show(window)
     call QApplication_exec(app)
   
     call QApplication_destroy(app)
   end program qt_example
   

4. 編譯和運行：

   gfortran -o qt_example qt_example.f90 `pkg-config --cflags --libs Qt5Widgets`
   ./qt_example
   

總結

以上方法都提供了在CentOS系統下使用Fortran進行圖形化界面開發的方式。選擇哪種方法取決于你的具體需求和偏好。GTK+和FLTK相對輕量級，適合簡單的GUI應用；而Qt則功能更強大，適合復雜的應用。