I'm just getting started with QtAda, and I'm trying to use a Push_Button.
here's a code fragment that creates and connects one:
in the spec of Book_Widgets:
type Book_Widget is limited new Qt4.Widgets.Directors.Q_Widget_Director
with record
...
end record;
procedure Delete (Self : not null access Book_Widget'Class);
pragma Q_Slot (Delete, "delete()");
in the body:
Button := Qt4.Push_Buttons.Constructors.Create (+"Delete", Widget);
Self.Actions.Delete := Create (+"&Delete", Self);
Connect
(Self.Actions.Delete,
Qt4.Signal ("clicked()"), Self, Qt4.Slot ("delete()"));
As far as I can tell, this is similar to the tutorials that use buttons,
and assistant-qt4 says there is a "clicked" signal for pushButton.
But at runtime, this gives an error:
Object::connect: No such signal QAction::clicked()
What am I doing wrong?
--
-- Stephe
_______________________________________________
qtada-users mailing list
[email protected]
http://box347.bluehost.com/mailman/listinfo/qtada-users_lists.qtada.com
