Subject |
Author |
Date |
|
Omar Naser
|
Mar 11, 2015 - 2:34 PM
|
Hello
Iam usig Elegant Ribbon As registered customer
We develop application using Elegant Ribbon Our application is RTL
When minimized the application to Taskbar , and keep it for some time in task bar
When try to restore it , you will failed
this case and my customer suffer from this point
best regard omar naser
|
|
Omar Naser
|
Mar 17, 2015 - 12:26 PM
|
Hello This case is in my application Let me prepare example and send it to you best regard omar naser
|
|
Art Wilkes
|
Mar 16, 2015 - 8:52 AM
|
Prof-UIS Support
The problem can be reproduced in prof-uis sample applications ? Which one? If not, please ask for a demo application reproducing the problem.
|
|
James Standen
|
Feb 9, 2015 - 3:33 PM
|
Hello,
I am evaluating the ribbon control, and am having an issue- when the application is maximized it can not be moved (it is a forms application and has a main form)
IE maximize the form, and grabbing the top of the form and click dragging does not have the form minimize and move as it normally does.
|
|
Art Wilkes
|
Feb 10, 2015 - 9:20 AM
|
Modify ProcessButtonDown method from FormFrameSkinner.cs in Elegant.Ui.Common (red is the color for modification):
private bool ProcessButtonDown(ref Message m) { if (GlassEnabled) return false;
MouseButtons button = MouseButtons.None;
switch(m.Msg) { case WinApi.WM_NCLBUTTONDOWN: if (Form.WindowState == FormWindowState.Maximized && m.WParam == (IntPtr)StandardFrameItemType.Caption) { if (Form != Form.ActiveForm) Form.Activate();
return false; } button = MouseButtons.Left; break; case WinApi.WM_NCMBUTTONDOWN: button = MouseButtons.Middle; break; case WinApi.WM_NCRBUTTONDOWN: button = MouseButtons.Right; break; case WinApi.WM_NCXBUTTONDOWN: if(m.WParam == (IntPtr) WinApi.XBUTTON1) button = MouseButtons.XButton1; else button = MouseButtons.XButton2; break; }
Point screenPoint = new Point(m.LParam.ToInt32());
IFormFrameItem frameItemAtPoint = GetFormFrameItemAtPoint(screenPoint); if(DesignMode && frameItemAtPoint is FormFrameCaptionButton) return false;
Control control = GetHandlefulControlAtPoint(screenPoint); if(control == null) return false;
Point point = PointToClient(control, screenPoint); control.InvokeMouseDown( new MouseEventArgs(button, 0, point.X, point.Y, 0));
if (Form.WindowState == FormWindowState.Maximized) { IFormFrameItem formFrameItem = control as IFormFrameItem; if (formFrameItem != null && formFrameItem.FrameItemType == StandardFrameItemType.Caption) return true; } if(!(frameItemAtPoint is FormFrameCaptionButton)) return false;
return true; }
Return false on WM_NCLBUTTONDOWN message when click point is on caption and frame state is maximized.
|
|
Art Wilkes
|
Feb 9, 2015 - 4:47 PM
|
I have forwarded this to the support group we should hear in a day or two. Sales at Prof-UIS
|
|
d a
|
Feb 2, 2015 - 5:28 AM
|
It’s been a while since I have had to post here as the Version 4 Ribbon Bar is very reliable and any issue we have had have been fixed extremely quickly. But (and this is a big BUT) we have just hit a situation where the Ribbon Bar licencing control appears to try and make some network connection using LDAP Connection (can be seen via Wire shark trace). The problem here is one of our customers has a high Latency Network eg can be in the region of 100ms it causes our application to hang on start up and the initialisation of the Ribbon Bar Is there any way to switch this feature/check off ? Does the later versions of this product have the same issues? What’s more is this still a supported product at any version as it seems there have been no updates for nearly 2 years?
|
|
Art Wilkes
|
Feb 4, 2015 - 10:30 AM
|
Dave Great work We will update the libraries this month. Sales at Prof-UIS
|
|
d a
|
Feb 4, 2015 - 3:09 AM
|
Further investigation led me to this article on the infraluation support forums
http://www.infralution.com/phpBB2/viewtopic.php?t=688&highlight=rsa+slow
I know we could download and evaluate the latest version, but as this issue only arises when the license key is provided, this makes it difficult for us to confirm via testing,
Can you confirm whether the latest version has the fix? Thanks
|
|
d a
|
Feb 3, 2015 - 11:48 AM
|
An update for you. The Ribbon Bar does not appear to make a connection directly, but when we call var = new Elegant.Ui.RibbonTabPage
the RibbonTabPage makes a call to CheckRuntimeLicense - which calls through the Infralution Library to the underlying Cryptography( see stack trace below) and this is slow.
When I said we had a latency of 100ms, that was an understatement, we actually have to work across a GPRS network and this License check is crippling as we have to work with on average of 500ms latency/512Kb Link with up to 50% packet lose. And the machine needs to be part of an Active Directory Domain
crypt32.dll!_CryptFindOIDInfo@12()
[Managed to Native Transition]
mscorlib.dll!System.Security.Cryptography.X509Certificates.X509Utils.FindOidInfo(System.Security.Cryptography.X509Certificates.OidKeyType keyType, string key, System.Security.Cryptography.X509Certificates.OidGroup group) + 0x124 bytes
mscorlib.dll!System.Security.Cryptography.X509Certificates.X509Utils.GetAlgIdFromOid(string oid, System.Security.Cryptography.X509Certificates.OidGroup oidGroup) + 0x86 bytes
mscorlib.dll!System.Security.Cryptography.Utils.ObjToAlgId(object hashAlg, System.Security.Cryptography.X509Certificates.OidGroup group) + 0xb0 bytes
mscorlib.dll!System.Security.Cryptography.RSACryptoServiceProvider.VerifyData(byte[] buffer, object halg, byte[] signature) + 0x1a bytes
Elegant.Ui.Common.dll!Infralution.Licensing.EncryptedLicenseProvider.LoadLicense(System.ComponentModel.LicenseContext context, System.Type type, string licenseKey) + 0x32b bytes
Elegant.Ui.Common.dll!Infralution.Licensing.EncryptedLicenseProvider.ValidateLicenseKey(string licenseParameters, string licenseKey) + 0x4d bytes
Elegant.Ui.Common.dll!Elegant.Ui.LicenserUtilities.ValidateLicenseKey(Elegant.Ui.Product product, System.Version version, string licenseKey) + 0xf9 bytes
Elegant.Ui.Common.dll!Elegant.Ui.LicenserUtilities.CheckRuntimeLicence(Elegant.Ui.Product product, string productDisplayName, System.Version productVersion, string licenseKey) + 0x7e bytes
Elegant.Ui.Common.dll!Elegant.Ui.Control.CheckRuntimeLicense() + 0x9d bytes
Elegant.Ui.Common.dll!Elegant.Ui.Control.Control() + 0x8c bytes
Elegant.Ui.Ribbon.dll!Elegant.Ui.RibbonTabPage.RibbonTabPage(bool ) + 0x7c bytes
Elegant.Ui.Ribbon.dll!Elegant.Ui.RibbonTabPage.RibbonTabPage() + 0x38 bytes
Symmetry.exe!G4T.KMPlugin.ClientApplication.Framework.MainFrame.InitializeComponent() Line 32 + 0x15 bytes C#
Symmetry.exe!G4T.KMPlugin.ClientApplication.Framework.MainFrame.MainFrame() Line 70 C#
Symmetry.exe!G4T.KMPlugin.ClientApplication.Framework.Program.CreateMainFrame() Line 270 + 0x15 bytes C#
Symmetry.exe!G4T.KMPlugin.ClientApplication.Framework.Program.DoMainCore() Line 115 C#
G4T.KMPlugin.Native.dll!G4T::KMPlugin::Native::NativeExceptionAdapter::Execute(System::Objectˆ callback, System::Objectˆ callbackData) Line 66 C++
G4T.KMPlugin.Native.dll!G4T::KMPlugin::Native::NativeExceptionAdapter::Execute(G4T::KMPlugin::Native::NativeExceptionAdapter::Callbackˆ callback) Line 34 + 0xb bytes C++
Symmetry.exe!G4T.KMPlugin.ClientApplication.Framework.Program.DoMain(string[] args) Line 51 + 0x27 bytes C#
Symmetry.exe!G4T.KMPlugin.ClientApplication.Framework.Program.Main(string[] args) Line 378 C#
mscoreei.dll!__CorExeMain@0() + 0x71 bytes
mscoree.dll!_ShellShim__CorExeMain@0() + 0x227 bytes
mscoree.dll!__CorExeMain_Exported@0() + 0x8 bytes
kernel32.dll!@BaseThreadInitThunk@12() + 0x12 bytes
ntdll.dll!___RtlUserThreadStart@8() + 0x27 bytes
ntdll.dll!__RtlUserThreadStart@8() + 0x1b bytes
Please see Microsoft Knowledge base article http://support.microsoft.com/kb/948080
Regards Dave
|
|
Art Wilkes
|
Feb 2, 2015 - 9:29 AM
|
This item has been forwarded to support. I did not know the licensing made contact with a website. We are considering updating the C# libraries this year. We will be reviewing Windows 10 to see what will be our best approach. Thanks Prof-UIS Sales
|
|
waleed hm
|
Dec 10, 2014 - 3:59 PM
|
When using right to left in the 2013 Theme Group curvature problem only in theme 2013 with the Right-to-left direction www.fullscreen.com.sa/DemoFile/Ashampoo_Snap_2014.12.10_23h43m35s_003_.png
|
|
Ian Hinde
|
Nov 14, 2014 - 2:58 PM
|
I have a group with several button. If the window is reduced in size, the group resizes and all the buttons appear in a dropdown box, but the icon for the group is empty. How do I add an icon to the group when it reduces in size?
Ian
|
|
Art Wilkes
|
Nov 14, 2014 - 3:34 PM
|
We will have to turn this over to support. We will try to get back to you Monday or Tuesday. Thanks Prof-UIS
|
|
Heiko Faiss
|
Oct 24, 2014 - 9:33 AM
|
Dear Support, i use several default themes who are deployed with the elegant ribbon (z.B. Office 2010 Black, Office 2010 Blue, aso...) MyQuestion: how can i change the forecolor in the theme dll for all controls? Office 2010 Black is my default template, but the forecolor is black and i want to change it to whitesmoke. Greetings Heiko
|
|
Art Wilkes
|
Oct 27, 2014 - 10:15 AM
|
It does not look like there is a universal command but. You can add this method in Control.cs:
public override Color ForeColor { get { return Color.FromArgb(245, 245, 245); } }
From Elegant.Ui.Common in each control class you want to change forecolor.
Prof-UIS Support
|
|
Art Wilkes
|
Oct 25, 2014 - 9:04 AM
|
Hi We will check this for you. I’ll send this on to support. TSELLC Support
|
|
Heiko Faiss
|
Oct 17, 2014 - 12:54 AM
|
Hi Support-Team, i have created a ribbon with severel Tabpages. How can i change the TabPages for ex. i want the TabPage 4 on position 3? Greetings Heiko
|
|
Art Wilkes
|
Oct 17, 2014 - 8:54 AM
|
If you have “ribbon1” as a ribbon class in C# app you can remove a ribbon tab page with: “ribbon1.TabPages.RemoveAt(index);” with index your page order (0-based) and insert that page with “ribbon1.TabPages.Insert(newindex, item);” with ‘newindex’ the new order in ribbon and ‘item’ is the ribbon tab page.
Prof-UIS support
|
|
Pierrick COMBREAU
|
Sep 15, 2014 - 8:24 AM
|
Hi,
I struggled a long time on this issue because some customers report that in place of the buttons, they sometimes see a large red cross meaning that controls are not rendered at all. After several investigations, it appears that this is connected to some rare printer drivers. When we read. In the form_load event, we have this code:
Private Sub LoadPrinters(installedPrinters As System.Drawing.Printing.PrinterSettings.StringCollection) Dim pkInstalledPrinters As String
PrinterNames.Clear() Try Dim printdoc As New PrintDocument() Dim printDocPrinterName As String = printdoc.PrinterSettings.PrinterName
’ Find all printers installed For Each pkInstalledPrinters In installedPrinters PrinterNames.Add(pkInstalledPrinters) If pkInstalledPrinters = printDocPrinterName Then If printdoc.PrinterSettings.IsDefaultPrinter Then SelectedPrinter = pkInstalledPrinters End If End If Next pkInstalledPrinters Catch ex As Exception MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Exclamation) End Try End Sub
Which simply fills a combo (an Elegant.UI one) with printer names. When we don’t do that or when we select a default pinter driver which has no problem, if works well and we see the buttons but as soon as we select a wrong driver (happens with some very new printer drivers too), we get the red cross.
Have you ever heard anything like this? The selection of a default printer could corrupt something and prevent EG from rendering?
Best Regards,
|
|
Art Wilkes
|
Sep 15, 2014 - 9:03 AM
|
Prof-UIS Support No I have not heard of that. I Googled it and there was not a previous mention of the problem. I’ll ask the support staff for there input. Thanks
|
|
Yasser Abdallah
|
Apr 27, 2014 - 10:58 PM
|
I am using elegant ribbon and when I built the app and trying to run it from exe in another pc , it’s not working. so how I can run my app exe in pc without setup the ribbon?
|
|
Art Wilkes
|
May 7, 2014 - 9:02 AM
|
Report from the support software group I was able to run the exe (untitled.png) from debug directory that you sent me but it’s not compile. The assembly Syncfusion.Core and Syncfusion.Shared.Base are missing. I suggest to tell to your customer to change copy local flag from false to true for custom references like in reference.png (in debug or release directory he will see the syncfusion… dll’s).
Prof-UIS Support
|
|
Art Wilkes
|
Apr 28, 2014 - 9:02 AM
|
We need a little more explanation? Were you using a .dll and if you were did you transport it to the second pc. Are you using a library? Thanks Prof-UIS Support
|
|
Roland v.’t Kruys
|
Apr 17, 2014 - 10:00 AM
|
Hi,
I having the following issue. I have a main form (MDI Parent) set up with the Elegant Ribbon and three MDI Children. On the Elegant Ribbon, I have one button to clear any contents of the TextBox component. On one MDI Child, I have a Elegant Ribbon TextBox component. When I click the button, it does nothing. The content in the TextBox still remains.
Now, I wanted to check if the MDI Child is active or not. But this does not work either.
Private Sub btnNew_Click(sender As Object, e As EventArgs) Handles btnNew.Click Dim NewMDIChild As New frmCLA() Dim activeChild As Form = Me.ActiveMdiChild
If (Not activechild Is Nothing) Then MsgBox("No active MDI Child", MsgBoxStyle.Exclamation) Else MsgBox("Active MDI Child: " & NewMDIChild.Name, MsgBoxStyle.Information) End If End Sub
The source code shows whether or not the MDI Child is active and it gives constantly "No active MDI Child".
What am I doing wrong or missing?
Roland
|
|
Roland v.’t Kruys
|
Apr 19, 2014 - 3:48 AM
|
Update: found the solution... problem solved...
|
|
Roland v.’t Kruys
|
Apr 15, 2014 - 10:37 AM
|
Hi,
Can you help me out with the following? I want to use the ProgressBar with the .step and .performstep() properties. But your progressbar component doesn’t have these. How can I enable or modify the progressbar to make it work, with the source code below?
Private Sub CopyWithProgress(ByVal ParamArray filenames As String()) ’ Display the ProgressBar control. pBar1.Visible = True ’ Set Minimum to 1 to represent the first file being copied. pBar1.Minimum = 1 ’ Set Maximum to the total number of files to copy. pBar1.Maximum = filenames.Length ’ Set the initial value of the ProgressBar. pBar1.Value = 1 ’ Set the Step property to a value of 1 to represent each file being copied. pBar1.Step = 1
’ Loop through all files to copy. Dim x As Integer for x = 1 To filenames.Length - 1 ’ Copy the file and increment the ProgressBar if successful. If CopyFile(filenames(x - 1)) = True Then ’ Perform the increment on the ProgressBar. pBar1.PerformStep() End If Next x End Sub
With kind regards, Roland
|
|
Roland v.’t Kruys
|
Sep 8, 2015 - 7:09 AM
|
Hi,
I know it has been a while, but I was .... no, hoping if you have the update ready for the: Elegant Ribbon (.NET)? I will assume to will be the 4.4 version.
With kind regards, Roland
|
|
Roland v.’t Kruys
|
May 11, 2017 - 2:40 AM
|
ok, long absence :) due to moving to another country and employer. And now I am starting to develop again and I thought about you guys.
What is the latest on version 4.4 and the ProgressBar issue?
|
|
Roland v.’t Kruys
|
Jun 19, 2015 - 4:14 AM
|
Gentlemen, It has been a long time. And I am very curious on how you are doing with the new update? I am still dealing with that issue regarding the ProgressBar. With kind regards, Roland
|
|
Roland v.’t Kruys
|
Apr 8, 2015 - 3:26 AM
|
Hi, Any news on the update? With kind regards, Roland
|
|
Art Wilkes
|
Feb 6, 2015 - 9:42 AM
|
Hi We are scheduling an update for the Elegant line in Late February or Early March. Your Progress bar update should be in the new update.. Sales at Prof-UIS
|
|
Roland v.’t Kruys
|
Feb 6, 2015 - 4:53 AM
|
Gentlemen, It has been a while and I was wondering when the update becomes available? Any news? With kind regards, Roland
|
|
Roland v.’t Kruys
|
Jul 15, 2014 - 4:53 AM
|
Hi,
Can you please provide me with any feedback or progression on the ProgressBar component?
With kind regards, Roland
|
|
Art Wilkes
|
May 28, 2014 - 8:57 AM
|
We are reviewing you request. I’m sure we will put it in the next release. We are still analyzing the products to see what we need to do. Thanks Prof-UIS Support Team
|
|
Art Wilkes
|
May 9, 2014 - 10:25 AM
|
Please tell him to use pBar1.Value++ to increment current value or pBar1.Value=x to move progress bar position to x (x must be between minim and maxim of progress) instead of pBar.SetBar(x)
|
|
Roland v.’t Kruys
|
May 28, 2014 - 3:51 AM
|
Hi,
Any progress on the matter?
PS: I have purchased the product.
With kind regards, Roland
|
|
Art Wilkes
|
May 9, 2014 - 10:22 AM
|
Please tell him to use pBar1.Value++ to increment current value or pBar1.Value=x to move progress bar position to x (x must be between minim and maxim of progress) instead of pBar.SetBar(x).
|
|
Roland v.’t Kruys
|
May 10, 2014 - 5:27 AM
|
Hi,
Your suggested approach did not solve the issue. Maybe you like to reproduce the issue yourself? Know this, I am extremely satisfied with your product. But I like to see this feature being active in my next version. The old version has a working ProgressBar and Label.
Find below the source code used in the application having the Elegant Ribbon product installed.
Components used: - Button "btnUnpack" > on Ribbon (For starting the unpack process) - Button "btnOpenFILE" > on form (For browsing for the zipped file) - RadioButton "rbPrepFILE" - TextBox "tbST" (For having the serial number) - TextBox "tbFILE" (For displaying the complete path and filename) - Background Worker "bwFILE" - OpenFileDialog "ofdLogFile" - StatusBar (within here using: Label "tsslInfo" & ProgressBar "pbFILE")
I am using Ionic.Zip for unpacking the files. Now bear in mind, the initial unpacking with the Background Worker in my MDI application is working fine. Faster than I ever hoped, compared to my previous SDI application. The only issue is, displaying the current progress using the Label "tsslInfo" & ProgressBar "pbFILE": both components are not showing anything. The pbFILE.Step and pbFILE.PerformStep() is working for the original Microsoft ProgressBar component.
*******************************************
Private Sub btnOpenFILE_Click(sender As Object, e As EventArgs) Handles btnOpenFILE.Click Select Case True Case rbPrepFILE.Checked ofdLogFile.Filter = "FILE files (*.zip)|*.zip" Case rbPrepTTY.Checked ofdLogFile.Filter = "TTY files (*.log)|*.log|TTY files (*.txt)|*.txt" Case rbPrepRAID.Checked ofdLogFile.Filter = "Controller_x (*.log)|*.log|Controller_x (*.txt)|*.txt|TTY files (*.log)|*.log" End Select
ofdLogFile.Title = "Please select a FILE or TTY Log..." ofdLogFile.FileName = ""
If frmOptions.tbFILELocation.TextLength > 0 Then ofdLogFile.InitialDirectory = frmOptions.tbFILELocation.Text Else ofdLogFile.InitialDirectory = "C:\" End If
ofdLogFile.ShowDialog() ApplicationCommands.cmdUnpack.Enabled = True
Select Case True Case ApplicationCommands.cmdPrepare.Enabled ApplicationCommands.cmdPrepare.Enabled = False Case ApplicationCommands.cmdReview.Enabled ApplicationCommands.cmdReview.Enabled = False End Select End Sub Private Sub btnUnpack_Executed(ByVal sender As Object, ByVal e As CommandExecutedEventArgs) Select Case True Case rbPrepFILE.Checked Dim destFolder As String = "C:\DIRECTORY\Logs\" frmMain.tsslPhoneRegion.Text = ""
If tbST.Text = "" Then frmMain.tsslInfo.Text = "Please enter the Serial Number..." Else If tbFILE.Text.Length > 0 Then ApplicationCommands.cmdUnpack.Enabled = True frmMain.pbFILE.Visible = True frmMain.tsslInfo.Text = "Unpacking FILE.ZIP..." Me.bwFILE.RunWorkerAsync() Else ApplicationCommands.cmdUnpack.Enabled = False frmMain.tsslInfo.Text = "FILE.ZIP missing..." End If End If Case rbPrepTTY.Checked ’ this needs to be checked, something is not right here... possibly wrong place Dim TTY As String TTY = ofdLogFile.FileName
frmMain.tsslPhoneRegion.Text = ""
If tbST.Text = "" Then frmMain.tsslInfo.Text = "Please enter the Serial Number..." Else My.Computer.FileSystem.CopyFile(TTY, "C:\DIRECTORY\Logs\" & tbST.Text & "\raid.log", FileIO.UIOption.OnlyErrorDialogs, FileIO.UICancelOption.DoNothing) End If
fileReader = My.Computer.FileSystem.ReadAllText("C:\DIRECTORY\Logs\" & tbST.Text & "\raid.log") End Select
’Entry = Date.Now & " | " & username & " | " & tbST.Text & " | FILE unpacked..." & linea1 ’Caselog_Entry() End Sub
Private Sub bwFILE_DoWork(sender As Object, e As DoWorkEventArgs) Handles bwFILE.DoWork Select Case True Case rbPrepFILE.Checked Dim extractPath As String = "C:\DIRECTORY\" & tbST.Text Dim zipPath As String = tbFILE.Text
Using zip As New ZipFile(zipPath) frmMain.pbFILE.Minimum = 1 frmMain.pbFILE.Maximum = zip.Entries.Count frmMain.pbFILE.Value = 1 >> frmMain.pbFILE.Step = 1 << this is not applicable in the Elegant ProgressBar component
Dim x As ZipEntry
For Each x In zip If (x.UsesEncryption) Then x.Password = "P@ssw0rd" x.Extract(extractPath, ExtractExistingFileAction.OverwriteSilently) Else x.Extract(extractPath, ExtractExistingFileAction.OverwriteSilently) End If >> frmMain.pbFILE.PerformStep() << this is not applicable in the Elegant ProgressBar component
’ {0} = pbFILE.Value ’ {1} = pbFILE.Maximum ’ {2} = (CDbl(pbFILE.Value) / (0.01 * pbFILE.Maximum)) ’ {3} = zipPath ’ {4} = extractPath
If tbFILE.TextLength > 40 Then >> frmMain.tsslInfo.Text = String.Format("Copying FILE.ZIP to {4} - {2:N0}% complete", frmMain.pbFILE.Value, frmMain.pbFILE.Maximum, (CDbl(frmMain.pbFILE.Value) / (0.01 * frmMain.pbFILE.Maximum)), zipPath, extractPath) << Does not show any information Else >> frmMain.tsslInfo.Text = String.Format("Copying {1} items from {3} to {4} - {2:N0}% complete", frmMain.pbFILE.Value, frmMain.pbFILE.Maximum, (CDbl(frmMain.pbFILE.Value) / (0.01 * frmMain.pbFILE.Maximum)), zipPath, extractPath) << Does not show any information End If Next End Using
Entry = Date.Now & " | " & username & " | " & tbST.Text & " | FILE.ZIP unpacked" & linea1 ’Caselog_Entry()
If My.Computer.FileSystem.FileExists(extractPath & ".zip") Then My.Computer.FileSystem.DeleteFile(extractPath & ".zip") My.Computer.FileSystem.CopyFile(zipPath, extractPath & ".zip") Else My.Computer.FileSystem.CopyFile(zipPath, extractPath & ".zip") End If
Entry = Date.Now & " | " & username & " | " & tbST.Text & " | FILE.ZIP copied to " & tbST.Text & ".ZIP" & linea1 ’Caselog_Entry() End Select End Sub
Private Sub bwFILE_ProgressChanged(sender As Object, e As ProgressChangedEventArgs) Handles bwFILE.ProgressChanged frmMain.pbFILE.Value = e.ProgressPercentage End Sub
Private Sub bwFILE_RunWorkerCompleted(sender As Object, e As RunWorkerCompletedEventArgs) Handles bwFILE.RunWorkerCompleted frmMain.tsslInfo.Text = "FILE Report unpacked..."
If My.Computer.FileSystem.FileExists("C:\DIRECTORY\" & tbST.Text & "\report.hta") Then LinkLabel2.Visible = True LinkLabel2.Text = "FILE Report" LinkLabel5.Visible = True LinkLabel5.Text = "DCV - FILE Upload" Else LinkLabel2.Visible = False End If
ApplicationCommands.cmdPrepare.Enabled = True TTY_FileCheck() End Sub
With kind regards, Roland
|
|
Roland v.’t Kruys
|
Apr 16, 2014 - 10:46 AM
|
Thank you for the fast response. But the SetBar(x) is not existing within ELegant Ribbon. At least I can’t find it. But ok, here is the thing.
Scenario: MDI Parent - 2x MDI Childs (for now) Within the MDI Child, a process will be executed for unpacking .zip files. A ProgressBar and Label component on the MDI Parent will be used to update the user with the current process.
MDI Parent - frmMain: one button (located in Ribbon Bar) for starting the process, Label (tsslInfo) and ProgressBar (pbFILE) located in the StatusBar MDI Child - frmLog: source code (as shown below), TextBox component, Button component (for browsing to the file), OpenFileDialog component and BackGroundWorker component
Dim extractPath As String = "C:\REPOSITORY\FILE\" & tbST.Text Dim zipPath As String = tbFILE.Text
Using zip As New ZipFile(zipPath) frmMain.pbFILE.Minimum = 1 frmMain.pbFILE.Maximum = zip.Entries.Count frmMain.pbFILE.Value = 1 ’frmMain.pbFILE.Step = 1 >> research on this to activate it again
Dim x As ZipEntry
For Each x In zip If (x.UsesEncryption) Then x.Password = "secret" x.Extract(extractPath, ExtractExistingFileAction.OverwriteSilently) Else x.Extract(extractPath, ExtractExistingFileAction.OverwriteSilently) End If ’frmMain.pbFILE.PerformStep() >> research on this to activate it again
’ {0} = frmMain.pbFILE.Value ’ {1} = frmMain.pbFILE.Maximum ’ {2} = (CDbl(frmMain.pbFILE.Value) / (0.01 * frmMain.pbFILE.Maximum)) ’ {3} = zipPath ’ {4} = extractPath
If tbFILE.Text.Length > 40 Then frmMain.tsslInfo.Text = String.Format("Copying FILE.ZIP to {4} - {2:N0}% complete", frmMain.pbFILE.Value, frmMain.pbFILE.Maximum, (CDbl(frmMain.pbFILE.Value) / (0.01 * frmMain.pbFILE.Maximum)), zipPath, extractPath) Else frmMain.tsslInfo.Text = String.Format("Copying {1} items from {3} to {4} - {2:N0}% complete", frmMain.pbFILE.Value, frmMain.pbFILE.Maximum, (CDbl(frmMain.pbFILE.Value) / (0.01 * frmMain.pbFILE.Maximum)), zipPath, extractPath) End If Next End Using I am sorry, if I was not clear in what I try to do or achieve. But the process worked for me in my old project.
|
|
Art Wilkes
|
Apr 16, 2014 - 9:35 AM
|
What we would suggest is to change the code to perform your own step function something like: pBar.SetBar(x); I’m not sure what the Setbar function is in the code you are using.
|
|
Roland v.’t Kruys
|
Dec 10, 2018 - 12:20 PM
|
Hi,
Ok, the issue (or puzzle, if you may call it) is still remaining. The goal is, I think, simple: how to display the unpacked files with the progress bar, using Ionic.Zip?
With kind regards, Roland
|
|
Roland v.’t Kruys
|
May 9, 2014 - 5:52 AM
|
Hi,
After reproducing the issue, I am not able to have the progressbar working. the "pBar.SetBar(x)" options is not in use in my application, nor did it work for me. The event is not known.
Please advise.
With kind regards, Roland
PS: I am still waiting for your response, which I have send by email.
|
|
Alex Ramisch
|
Apr 11, 2014 - 12:21 PM
|
Hi, I do not find the documentation how to use. It is clear to add items (e.g. pairs of caption and long filenames) which works. I also know how to bind to the ItemClick Event. But then I need: 1) how can I tell the control, that the file was loaded successsfully and that it should be moved to first position of list of files? 2) how can I hanlde errors opening the file (e.g. not available any more) which should lead to removing the item? Thanks Alex
|
|
Roland v.’t Kruys
|
Apr 11, 2014 - 8:07 AM
|
Hi,
I am currently working with the Elegant Ribbon (trial version) under VB.NET 2012 and VB.NET 2013. I am developing a Ribbon-enabled MDI application and it works perfectly. But I have some suggestions and requests for the Elegant Ribbon.
- LinkLabel component: is it possible to add this to the Elegant Ribbon? Similar to the standard LinkLabel component of Visual Studio. - Checked and CheckBox property: Can or is this be added to the DateTimePicker component? Similar to the standard DateTimePicker of Visual Studio.
Can you provide me with feedback, on short notice, if possible?
With kind regards, Roland
|
|
Roland v.’t Kruys
|
May 7, 2014 - 6:36 AM
|
Hi,
Any update on my requests?
With kind regards, Roland
|
|
Art Wilkes
|
Apr 11, 2014 - 8:58 AM
|
Prof-UIS is pleased to announce that TSELLC will provide the maintenance and management of the Prof-UIS (.NET) product line. Sales and support contacts will remain the same, sales@Prof-UIS.com and Support@Prof-UIS.com.
I’ve forwarded you request to the appropriate support engineer. I should get a response in the next day or two. Prof-UIS Support
|
|
Roland v.’t Kruys
|
Apr 16, 2014 - 10:50 AM
|
Current request:
- LinkLabel component: is it possible to add this to the Elegant Ribbon? Similar to the standard LinkLabel component of Visual Studio. - Checked and CheckBox property: Can or is this be added to the DateTimePicker component? Similar to the standard DateTimePicker of Visual Studio.
Updated request: - Is it possible to merge Ribbon Bars, in case of MDI projects?
With kind regards, Roland
|
|
Tarık İNCE
|
Mar 2, 2014 - 7:12 AM
|
I tried to install this program but it was not installed well. An error occured. It was saying File not found in end. But I use Visual Studio 2012 .. Please help me. How can add these controls and use them ? And How can i resize buttons ? (Before this i was used a few years ago)
|
|
Art Wilkes
|
Mar 3, 2014 - 9:08 AM
|
Hi Did the error occur in the installer. Or when you were compiling the program. Prof-UIS Support.
|
|
Robert Romano
|
Nov 21, 2013 - 2:11 PM
|
Will there be a new version for Visual Studio 2013, if so when do you anticipate a release date? We would like to upgrade our VS2008 to current version.
Thanks in advance,
|
|
Art Wilkes
|
Mar 3, 2014 - 9:16 AM
|
Hi; TSELLC has just reached an agreement with Prof-UIS to manage, market and maintenance this product. The product was updated late last year. When we first acquire a product we try to make sure we reply to all support inquiries for the product. During this time we try to fix all outstanding issues. After bring the product up to our standards we then see what our customers would like to see in the product. We have just completed our assessment of the products. They seem quite good.
I would assume we would update the product for errors in the next couple of months and then add features toward the end of the year. Pro-UIS Support.
|
|
Matthew Boeke
|
Oct 10, 2013 - 5:29 PM
|
Hello,
I have an application that is using the Elegant Ribbon control, and we are experiencing a display issue in Windows XP. When you click on the Minimixe/Maximize/Close buttons in the upper right corner, the unthemed buttons appear. This does not happen in other operating systems.
The code to set the theme is [assembly: DefaultTheme(EmbeddedTheme.Windows7)] in AssemblyInfo.cs.
The following assemblies are in the install directory: Elegant.UI.Common.dll Elegant.UI.Common.Theme.Windows7.dll Elegant.UI.Ribbon.dll Elegant.UI.Ribbon.Theme.Windows7.dll
Is there something I am missing? Are there known compatibility issues with XP?
Thank you for any guidance.
|
|
Art Wilkes
|
Mar 3, 2014 - 9:19 AM
|
TSELLC has just reached an agreement with Prof-UIS to manage, market and maintenance this product. In general the support for XP has been dropped by Windows. Is there some special reason that you need support for XP Prof-UIS Support
|
|
Jaime Guerrero
|
Sep 6, 2013 - 2:20 PM
|
Hello, I wish to load from a database several dates and show them in a year calendar... Is it possible to select multiple dates in the calendar control? Thanks a lot BR, Jaime
|
|
Omar Naser
|
Aug 20, 2013 - 4:07 PM
|
Hello I have Elegant Rubbon 4.2 I use Gdpicture Tool to read scanning paper We use this function to read from scanner
oGDPictureImaging.WiaAcquireToGdPictureImage()
--------------------------------------------------------------- When use Form containing Elegant Ribbon The excustion hang after read all page , but do not return any scanning page On other hand , When use Windows Form control The function read and return scanning image ( work fine ) ----------------------------------------------------------------- Does Elegant Ribbon hold any process / or interupt execution ? If you want this sample I can send to you For your information , I use WinDbg , Alwayes show me the execution stop after finish scan , but do not call any DLL after that ( when use ElegantRibbon ) best regard omar naser
|
|
Omar Naser
|
Aug 24, 2013 - 11:39 AM
|
Hello Any one can answer I have project , and my customer contact me daily about this problem best regard omar naser
|
|
Jiří Konečný
|
Aug 20, 2013 - 4:54 AM
|
Hi if you can please help me. I created combobox as color picker it works well in dropdown list but when I select something then only a string is shown (not the colors). I tried to use images but the problem was the same.
Items are normal strings with color names
public void FillDraw() { comboBox1.Items.Add("Blue"); comboBox1.Items.Add("Green"); comboBox1.Items.Add("Orange"); }
and I’m using DrawItem event like this:
protected void comboBox1_DrawItem(object sender, Elegant.Ui.DrawComboBoxItemEventArgs e) { Graphics g = e.Graphics; Rectangle rect = e.Bounds;
if (e.ItemIndex < 0) return;
string col = ((Elegant.Ui.ComboBox)sender).Items[e.ItemIndex].ToString(); Font f = new Font("Arial", 9.75f, FontStyle.Regular);
if (e.IsSelected) e.PaintSelectedBackground();
if (e.ItemIndex >= 0) { Color c = Color.FromName(col); Brush b = new SolidBrush(c); Pen p = new Pen(Color.Black); g.DrawString(col, f, Brushes.Black, rect.X, rect.Top); g.FillRectangle(b, rect.X + 50, rect.Y + 2, rect.Width - 20, rect.Height - 4); g.DrawRectangle(p, rect.X + 50, rect.Y + 2, rect.Width - 20, rect.Height - 4); } }
I changed ComboBox properties DrawMode to OwnerDrawFixed and Editable to False.
Thank you for reply.
|
|
Jiří Konečný
|
Aug 20, 2013 - 5:08 AM
|
Image version now working correctly (I forget to set SelectedImageSize) but if someone know how to draw items directly it will be better for my solution.
|
|
Noel Hawat
|
Jul 25, 2013 - 9:18 AM
|
Hello,
I know it’s a stupid question but how can I make the buttons smaller in the ribbon? I can’t modify the size :(
Thank you :D
|
|
Technical Support
|
Jul 25, 2013 - 4:31 PM
|
|
|
Noel Hawat
|
Jul 26, 2013 - 9:01 AM
|
|