Imports Leadtools.Windows.Controls
Imports Leadtools.Windows.Annotations
Public Sub AnnAudioObject_DefaultPicture(ByVal container As AnnContainer, ByVal viewer As ImageViewer, ByVal newAudioPicture As String)
' first add a new AnnAudioObject with the original picture
Dim obj As AnnAudioObject = New AnnAudioObject()
obj.Rect = New Rect(100, 100, 100, 100)
container.Children.Add(obj)
MessageBox.Show("An audio object with the original picture")
' now change the picture to one of our own
Dim picture As AnnPicture = New AnnPicture(New BitmapImage(New Uri(newAudioPicture)))
AnnAudioObject.DefaultPicture = picture
' at this point, all new AnnAudioObject objects will use this new picture
' add another audio object
obj = New AnnAudioObject()
obj.Rect = New Rect(100, 210, 100, 100)
container.Children.Add(obj)
MessageBox.Show("An audio object with the new picture")
' set the picture back to the original value
AnnAudioObject.UseOriginalPicture = True
' add another audio object
obj = New AnnAudioObject()
obj.Rect = New Rect(100, 320, 100, 100)
container.Children.Add(obj)
MessageBox.Show("An audio object with the original picture")
End Sub
using Leadtools.Windows.Controls;
using Leadtools.Windows.Annotations;
using Leadtools.Demos;
using Leadtools.Help;
public void AnnAudioObject_DefaultPicture(AnnContainer container, ImageViewer viewer, string newAudioPicture)
{
// first add a new AnnAudioObject with the original picture
AnnAudioObject obj = new AnnAudioObject();
obj.Rect = new Rect(100, 100, 100, 100);
container.Children.Add(obj);
MessageBox.Show("An audio object with the original picture");
// now change the picture to one of our own
AnnPicture picture = new AnnPicture(new BitmapImage(new Uri(newAudioPicture)));
AnnAudioObject.DefaultPicture = picture;
// at this point, all new AnnAudioObject objects will use this new picture
// add another audio object
obj = new AnnAudioObject();
obj.Rect = new Rect(100, 210, 100, 100);
container.Children.Add(obj);
MessageBox.Show("An audio object with the new picture");
// set the picture back to the original value
AnnAudioObject.UseOriginalPicture = true;
// add another audio object
obj = new AnnAudioObject();
obj.Rect = new Rect(100, 320, 100, 100);
container.Children.Add(obj);
MessageBox.Show("An audio object with the original picture");
}
using Leadtools.Windows.Controls;
using Leadtools.Windows.Annotations;
using Leadtools.Examples;
public void AnnAudioObject_DefaultPicture(AnnContainer container, ImageViewer viewer, string newAudioPicture)
{
// first add a new AnnAudioObject with the original picture
AnnAudioObject obj = new AnnAudioObject();
obj.Rect = new Rect(100, 100, 100, 100);
container.Children.Add(obj);
MessageBox.Show("An audio object with the original picture");
// now change the picture to one of our own
AnnPicture picture = new AnnPicture(new BitmapImage(new Uri(newAudioPicture)));
AnnAudioObject.DefaultPicture = picture;
// at this point, all new AnnAudioObject objects will use this new picture
// add another audio object
obj = new AnnAudioObject();
obj.Rect = new Rect(100, 210, 100, 100);
container.Children.Add(obj);
MessageBox.Show("An audio object with the new picture");
// set the picture back to the original value
AnnAudioObject.UseOriginalPicture = true;
// add another audio object
obj = new AnnAudioObject();
obj.Rect = new Rect(100, 320, 100, 100);
container.Children.Add(obj);
MessageBox.Show("An audio object with the original picture");
}
Imports Leadtools.Windows.Controls
Imports Leadtools.Windows.Annotations
Public Sub AnnAudioObject_DefaultPicture(ByVal container As AnnContainer, ByVal viewer As ImageViewer, ByVal newAudioPicture As String)
' first add a new AnnAudioObject with the original picture
Dim obj As AnnAudioObject = New AnnAudioObject()
obj.Rect = New Rect(100, 100, 100, 100)
container.Children.Add(obj)
MessageBox.Show("An audio object with the original picture")
' now change the picture to one of our own
Dim picture As AnnPicture = New AnnPicture(New BitmapImage(New Uri(newAudioPicture)))
AnnAudioObject.DefaultPicture = picture
' at this point, all new AnnAudioObject objects will use this new picture
' add another audio object
obj = New AnnAudioObject()
obj.Rect = New Rect(100, 210, 100, 100)
container.Children.Add(obj)
MessageBox.Show("An audio object with the new picture")
' set the picture back to the original value
AnnAudioObject.UseOriginalPicture = True
' add another audio object
obj = New AnnAudioObject()
obj.Rect = New Rect(100, 320, 100, 100)
container.Children.Add(obj)
MessageBox.Show("An audio object with the original picture")
End Sub