Ada Programming/Libraries/GUI/QtAda
QtAda is an Ada2005 binding to the Qt libraries and associated tools. Under GPL and GMGPL (commercially supported) licenses.
QtAda Code Example edit
with Qt_Ada.Application;
with Qt4.Push_Buttons.Constructors;
with Qt4.Strings;
procedure Main is
Hello : Qt4.Push_Buttons.Q_Push_Button_Access;
begin
Qt_Ada.Application.Initialize;
Hello :=
Qt4.Push_Buttons.Constructors.Create
(Qt4.Strings.From_Utf_16 ("Hello world!"));
Hello.Resize (100, 30);
Hello.Show;
Qt_Ada.Application.Execute;
Qt_Ada.Application.Finalize;
end Main;