ControlFontZooming Event

Namespace: C1.Win.TouchToolKit

Assembly: C1.Win.TouchToolKit.8.dll

Syntax

public event EventHandler<ControlFontZoomingEventArgs> ControlFontZooming

Returns

Remarks

Examples

The following code example shows how to use this event.

This code example is part of a larger example provided for the ZoomFactorChanged event.

public class GcZoomEventDemo : Form
{
	private GcZoom _gcZoom1 = new GcZoom();

	public GcZoomEventDemo()
	{
		_gcZoom1.Target = this;
		_gcZoom1.AutoShowControl = true;
		_gcZoom1.ControlFontZooming += _gcZoom1_ControlFontZooming;
	}

	void _gcZoom1_ControlFontZooming(object sender, ControlFontZoomingEventArgs e)
	{
		ZoomFontInfo info = e.ZoomFontInfo;

		Console.WriteLine(e.TargetControl.ToString());
		Console.WriteLine(info.CurrentFontSize.ToString());

		// For complex control, user may want to change the control's inner element's font.
		// User can use ControlFontZooming to support complex control.
		if (e.TargetControl is TextBox)
		{
			e.TargetControl.Font = new Font(e.TargetControl.Font.FontFamily, e.ZoomFontInfo.CurrentFontSize);

			// If set to true, default zoom logic for this control will be canceled.
			e.Handled = true;
		}

		// If target control has children controls and wan't to use default zoom logic for children 
		// controls, set e.ChildrenHandled property to true.
		// e.ChildrenHandled = true; 
	}
}

Public Class GcZoomEventDemo
	Inherits Form
	Private _gcZoom1 As New GcZoom()

	Public Sub New()
		_gcZoom1.Target = Me
		_gcZoom1.AutoShowControl = True
		AddHandler _gcZoom1.ControlFontZooming, AddressOf _gcZoom1_ControlFontZooming
	End Sub

	Private Sub _gcZoom1_ControlFontZooming(sender As Object, e As ControlFontZoomingEventArgs)
		Dim info As ZoomFontInfo = e.ZoomFontInfo

		Console.WriteLine(e.TargetControl.ToString())
		Console.WriteLine(info.CurrentFontSize.ToString())

		' For complex control, user may want to change the control's inner element's font.
		' User can use ControlFontZooming to support complex control.
		If TypeOf e.TargetControl Is TextBox Then
			e.TargetControl.Font = New Font(e.TargetControl.Font.FontFamily, e.ZoomFontInfo.CurrentFontSize)

			' If set to true, default zoom logic for this control will be canceled.
			e.Handled = True
		End If

		' If target control has children controls and wan't to use default zoom logic for children 
		' controls, set e.ChildrenHandled property to true.
		' e.ChildrenHandled = true; 
	End Sub
End Class