Lines Matching refs:AInfo

14 class procedure TGtkPrivateWidget.UpdateCursor(AInfo: PWidgetInfo);
19   Widget := AInfo^.CoreWidget;
25   if not (csAcceptsControls in TControl(AInfo^.LCLObject).ControlStyle) then
26     SetWindowCursor(Window, AInfo^.ControlCursor, True)
28     SetCursorForWindowsWithInfo(Window, AInfo);
31 class procedure TGtkPrivateWidget.SetDefaultCursor(AInfo: PWidgetInfo);
33   AInfo^.DefaultCursor := Screen.Cursors[crDefault];
59 class procedure TGtkPrivatePaned.UpdateCursor(AInfo: PWidgetInfo);
64   Widget := AInfo^.CoreWidget;
67   SetWindowCursor(Window, AInfo^.ControlCursor, False);
73 class procedure TGtkPrivateEntry.SetDefaultCursor(AInfo: PWidgetInfo);
75   AInfo^.DefaultCursor := Screen.Cursors[crIBeam];