Hello ...
I have question about rotator ...
can rotator insert with other form (in this case i have 3 forms, and i want to insert it all) that i have made
i have form with gridview, can it be insert into rotator...
can i have the example ? please
Thanks before.
I'm adding RadWebBrowserElement items to my rotator at run time.
To make it easier, I added a sample at design time and set up the properties for the embedded web browser in the property designer, eg suppressing errors, disabling links etc. I planned to copy/paste these from the designer.cs file into my factory, but I can only see the properties associated to the RadWebBrowserElement itself in the designer.cs file.
Where are they stored please?
Why is the radrotator seem to be poor at updating at it's defined intervals? The same thing also happens in First Look.
I thought that maybe the webbrowser element was slowing things down if it sensed it needed to update and repaint, but Im finding that using a rotator with 2 png files can take many seconds to recover after resizing a window, if it ever recovers (I get bored waiting after a minute or two) as it appears to stall.
Are there any hints to improve performance and prevent stalling please? I can't use the control if I can't rely on it working reliably.
Hi.
Using VS2017 with Telerik control set version 2018.1.116.40
I'm following the help document Telerik simple example for using the radrotator control and am having design time problems with script errors generated in visual studio every time I attempt to use the radwebbrowser item in the rotator.. I'm setting it to http://www.telerik.com. I've not tried any other URL. I've not had a chance to test suppressing script errors at runtime as I've no clue how to get beyond the design time problem :D
The errors are thrown by VS2017 itself and I can't break out of the constant stream of exception messages. I have to close it using task manager each time. Once VS reloads all sorts of corruptions seem to occur in VS's settings.
My only option is to go into the x.designer.cs file and delete references and code for the webbrowser item.
If its easily solveable then it might be useful to document this in the example so that users can fix it before it happens.
Can you help please?
Hi,
I'm currently using Telerik controls 2017.1, and i have a problem with RadRotator.
I have a control RadRotator, and 2 buttons (cf screenshot),
- right button code is only a "RadRotator1.Next()"
- left button code is only a "RadRotator.Previous()"
If i click really quickly many times on a button, my image disapears like screenshot.
If i put a stop point in my code, i see that the currentitem is the good, with the good index, but no image displayed.
An idea ? Thanks :)
Hi guys,
I am having some trouble trying to remove the border from the radRotator control in a WinForms project. The control is on a normal form, and I have gone through all of the properties. I have set the BorderThickness property to '0', yet it still displays.
Any help would be appreciated!
Regards,
Mike
I've got a lot of images I need to load in from a directory into a project where I display a full-screened radrotator on a secondary monitor. I want to be able to show a slideshow of pictures, but I need them to properly fit the screen, and I'd like ones that are strange sizes to be horizontally and vertically centered. All of this seems to be working with my code so far except the centering part...
Here is my code:
Imports
System.Windows.Forms
Imports
Telerik.WinControls.UI
Imports
System.IO
Imports
System.Security.Cryptography
Public
Class
formSlideshow
Private
Sub
ShapedForm1_Load(sender
As
Object
, e
As
EventArgs)
Handles
Me
.Load
Me
.FormBorderStyle = FormBorderStyle.None
Me
.Bounds = GetSecondaryScreen().Bounds
Dim
screensize
As
New
Drawing.Size(
Me
.Width,
Me
.Height)
RadRotator1.Size = screensize
RadRotator1.Interval = (
CInt
(Val(formSettings.Interval)) * 1000)
If
LoadImages() =
True
Then
RadRotator1.Start()
End
Sub
'--Get size and location of secondary monitor
Public
Function
GetSecondaryScreen()
As
System.Windows.Forms.Screen
For
Each
windowscreen
As
System.Windows.Forms.Screen
In
System.Windows.Forms.Screen.AllScreens
If
Not
windowscreen
Is
System.Windows.Forms.Screen.PrimaryScreen
Then
Return
windowscreen
End
If
Next
Return
Screen.PrimaryScreen
End
Function
'--Load images into radRotator
Public
Function
LoadImages()
As
Boolean
Try
Dim
imageslist
As
New
List(Of
String
)
'--Get employees personal images
For
Each
employeeimage
As
String
In
Directory.GetFiles(formSettings.EmployeeDir)
If
Path.GetExtension(employeeimage) =
".jpeg"
Or
Path.GetExtension(employeeimage) =
".png"
Or
Path.GetExtension(employeeimage) =
".jpg"
Then
imageslist.Add(employeeimage)
End
If
Next
'--Get default images
For
Each
defaultimage
As
String
In
Directory.GetFiles(formSettings.DefaultDir)
If
Path.GetExtension(defaultimage) =
".jpeg"
Or
Path.GetExtension(defaultimage) =
".png"
Or
Path.GetExtension(defaultimage) =
".jpg"
Then
imageslist.Add(defaultimage)
End
If
Next
'--Randomize order of images
imageslist.Sort(
New
Randomizer(Of
String
)())
'--Add images to radRotator item list
For
Each
imagefile
As
String
In
imageslist
Dim
newimage
As
Image = Image.FromFile(imagefile)
Dim
rotatoritem
As
New
RadImageItem()
rotatoritem.Image = ScaleImage(newimage, 768, 1366)
RadRotator1.Items.Add(rotatoritem)
Next
Return
True
Catch
ex
As
Exception
Return
False
End
Try
Return
False
End
Function
'--Shrink images to fit screen, proportionately
Public
Function
ScaleImage(
ByVal
OldImage
As
Image,
ByVal
TargetHeight
As
Integer
,
ByVal
TargetWidth
As
Integer
)
As
System.Drawing.Image
Try
Dim
NewHeight
As
Integer
= TargetHeight
Dim
NewWidth
As
Integer
= NewHeight / OldImage.Height * OldImage.Width
If
NewWidth > TargetWidth
Then
NewWidth = TargetWidth
NewHeight = NewWidth / OldImage.Width * OldImage.Height
End
If
Return
New
Bitmap(OldImage, NewWidth, NewHeight)
Catch
ex
As
Exception
Return
Nothing
End
Try
Return
Nothing
End
Function
End
Class
Public
Class
Randomizer(Of T)
Implements
IComparer(Of T)
'--Insures different instances are sorted in different orders
Private
Shared
Salter
As
New
Random()
'--Only as random as your seed
Private
Salt
As
Integer
Public
Sub
New
()
Salt = Salter.
Next
(
Integer
.MinValue,
Integer
.MaxValue)
End
Sub
Private
Shared
sha
As
New
SHA1CryptoServiceProvider()
Private
Function
HashNSalt(
ByVal
x
As
Integer
)
As
Integer
Dim
b()
As
Byte
= sha.ComputeHash(BitConverter.GetBytes(x))
Dim
r
As
Integer
= 0
For
i
As
Integer
= 0
To
b.Length - 1
Step
4
r = r
Xor
BitConverter.ToInt32(b, i)
Next
Return
r
Xor
Salt
End
Function
Public
Function
Compare(x
As
T, y
As
T)
As
Integer
_
Implements
IComparer(Of T).Compare
Return
HashNSalt(x.GetHashCode()).CompareTo(HashNSalt(y.GetHashCode()))
End
Function
End
Class
Hi,
I want to have rotator with sliding images (including animated GIFs) (like ticker - left to right rotation). Here is my scenario.
(1) Receive continuous data from socket (no need to implement in sample code) in a thread. This thread in turn will add predefined images in the rotator based on data received. This means that this thread will keep on adding images to rotator 24X7 while rotator is rotating.
(2) Will any overflow occur in rotator as end number of images will be added during day? If there is limit, code should remove items from rotator if limit breach.
(3) I also want some label on top of each image where I can set some text.
Can we add any control dynamically in rotator, and it rotate like ticker? If yes I need some sample code on that too please.
Best Regards
Chandrak