|
|
Hi! I'm not a VB programmer and I wonder if there is any way of having a map, like map<...> in STL or CMap, or something like that.
Thank you in advance.
Sorry I forgot to say I'm working with VBA.
|
|
|
|
|
I found it.
Microsoft Scripting Runtime Library --> Dictionary
|
|
|
|
|
how to flip the screen/forms using c# or vb
lok
|
|
|
|
|
Define "flip"? What are you talking about?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I want to open my computer , control panel and other computer options through voice command. Urgently Required.
|
|
|
|
|
So what portion of this app are you having problems with?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I have an application that fills a combobox with the contents of an xml file.
The xml file represents superscript 4 with ⁴ which shows as: ⁴
I can change the font of the combobox so that the superscript 4 is shown but it doesn't work on all fonts and to be honest the ones where it does work look hideous.
I'm just looking for a way of displaying the superscript 4, does anyone have any ideas?
An optimist's glass is half full.
A pesimist's glass is half empty.
An engineer goes and gets the right size glass.
-- modified at 8:52 Friday 13th January, 2006
|
|
|
|
|
The html code for superscript is <sup>. I don't know how well that works in a combobox, though.
---
b { font-weight: normal; }
|
|
|
|
|
The problem I'm having is that I'm reading an xml file and have simple nodes with text so I can cast the node value to a string. If I use the <sup> tag I can't cast to a string and I would have to format the text in the combobox.
It seems that utf-8 encoded characters is the simplest method if I can just get the font issue right.
On the next message is a copy of the code I'm using to populate a collection of objects that is used as the datasource for the combobox.
The display member of the combobox can be either the Name or Abbreviation nodes.
An optimist's glass is half full.
A pesimist's glass is half empty.
An engineer goes and gets the right size glass.
-- modified at 8:51 Friday 13th January, 2006
|
|
|
|
|
<br />
Public Sub PopulateFromXML(ByVal fileName As String)<br />
<br />
'Collect the path for the dll<br />
Dim path As String<br />
path = System.Environment.GetFolderPath( _<br />
Environment.SpecialFolder.CommonApplicationData)<br />
<br />
'Read the xml file into a dataset<br />
Dim xmlFile As New System.Data.DataSet<br />
xmlFile.ReadXml(path & _<br />
System.IO.Path.DirectorySeparatorChar & _<br />
"Flowguard Limited " & _<br />
System.IO.Path.DirectorySeparatorChar & _<br />
"Engineering Dimensions" & _<br />
System.IO.Path.DirectorySeparatorChar & _<br />
fileName)<br />
<br />
'Collect the unit type<br />
Dim unitType As String<br />
unitType = Convert.ToString(xmlFile.Tables("DimensionUnits").Rows(0).Item("Type"))<br />
<br />
'Collect the units table<br />
Dim unitsTable As New System.Data.DataTable<br />
unitsTable = xmlFile.Tables("Unit")<br />
<br />
'Loop through each row of the units table, adding a new unit each time<br />
Dim rowEnum As IEnumerator<br />
rowEnum = unitsTable.Rows.GetEnumerator<br />
<br />
While rowEnum.MoveNext<br />
'Cast the enumerated object to a data row<br />
Dim currRow As DataRow<br />
currRow = CType(rowEnum.Current, System.Data.DataRow)<br />
'Create a new unit object<br />
Try<br />
Dim newUnit As New Unit(Convert.ToString(currRow("Name")), _<br />
Convert.ToString(currRow("Abbreviation")), _<br />
Convert.ToDouble(currRow("Factor")), _<br />
Convert.ToBoolean(currRow("IsMetric")), _<br />
Convert.ToBoolean(currRow("IsSIUnit")), _<br />
"Length")<br />
<br />
'Add the unit to the collection<br />
Me.Add(newUnit)<br />
Catch formatEx As System.FormatException<br />
'Provide a message string<br />
Dim origString As String = "There is a problem in the xml file "<br />
Dim msgString As String = ""<br />
<br />
'Identify which value has the problem<br />
If Not (TypeOf (currRow("Name")) Is String) Then<br />
If msgString.Length = 0 Then<br />
msgString = origString & " with the Name Field"<br />
Else<br />
msgString += ", the Name Field"<br />
End If<br />
End If<br />
<br />
If Not (TypeOf (currRow("Abbreviation")) Is String) Then<br />
If msgString.Length = 0 Then<br />
msgString = origString & " with the Abbreviation Field"<br />
Else<br />
msgString += ", the Abbreviation Field"<br />
End If<br />
End If<br />
<br />
If Not (TypeOf (currRow("Factor")) Is Double) Then<br />
If msgString.Length = 0 Then<br />
msgString = origString & " with the Factor Field"<br />
Else<br />
msgString += ", the Factor Field"<br />
End If<br />
End If<br />
<br />
If Not (TypeOf (currRow("IsMetric")) Is Boolean) Then<br />
If msgString.Length = 0 Then<br />
msgString = origString & " with the IsMetric Field"<br />
Else<br />
msgString += ", the IsMetric Field"<br />
End If<br />
End If<br />
<br />
If Not (TypeOf (currRow("IsSIUnit")) Is Boolean) Then<br />
If msgString.Length = 0 Then<br />
msgString = origString & " with the IsSIUnit Field"<br />
Else<br />
msgString += ", the IsSIUnit Field"<br />
End If<br />
End If<br />
<br />
'Inform the user<br />
System.Windows.Forms.MessageBox.Show( _<br />
msgString, "XML File Error!", _<br />
MessageBoxButtons.OK, MessageBoxIcon.Exclamation)<br />
Catch ex As System.Exception<br />
'Throw the exception<br />
Throw ex<br />
End Try<br />
<br />
End While<br />
<br />
'Raise the list changed event<br />
RaiseEvent ListChanged(Me, _<br />
New System.ComponentModel.ListChangedEventArgs( _<br />
System.ComponentModel.ListChangedType.Reset, 0))<br />
<br />
End Sub 'PopulateFromXML<br />
An optimist's glass is half full.
A pesimist's glass is half empty.
An engineer goes and gets the right size glass.
|
|
|
|
|
I don't see the problem with storing the tags in a string. Properly encoded in the xml file, it would look like this, as example:
<node>A value with <sup>superscript</sup> text.</node>
If you can't store the tags in the xml file, can't you replace the unicode character after you have gotten the data:
str = str.Replace("\x1234", "<sup>4</sup>")
---
b { font-weight: normal; }
|
|
|
|
|
The problem is that the text doesn't show in the combobox.
I presume (and I haven't tried it yet) that if I changed the text to "<sup>4</sup>" then this is what would show in the combobox and not the superscript character. The combobox isn't in a web browser its on a windows form.
What I've doen is set the default font to lucida sans unicode and everything is fine, I'm almost sure it is a font issue.
If i'm getting the wrong end of the stick poke me with the right end
An optimist's glass is half full.
A pesimist's glass is half empty.
An engineer goes and gets the right size glass.
|
|
|
|
|
Hi,
Anyone out there come across a dxf/dwg viewer component(activex) or dll that is free and compliant with the different cad versions, please let me know.
I've been searching till my fingers have been worn to the bone 
|
|
|
|
|
Autodesk used to do a viewer called voloview that was free. Autodesk include VBA in their CAD products so you may be able to use the voloview application as a com object.
Worth a look.
An optimist's glass is half full.
A pesimist's glass is half empty.
An engineer goes and gets the right size glass.
|
|
|
|
|
about 5 years ago i found one. It was free and worked really well for what we wanted. I am sorry but i really cant remember the name of it and i havent worked forthat company for a long time. Not really much help i know but all i can say is there is at least one out there. Keep searching.
Jon
|
|
|
|
|
hi,
I have 2 application. one is opening a port let say 2600 and listening to that port.
my 2nd program will tell me that port 2600 is open or not
what will be the code for that VB.
bye
Paritosh
|
|
|
|
|
You're second app whas to be told which port to use. The only way it can find out is if it scans all the ports (preferrably 1024-65535) and eventually connects to the correct one.
So how do other applications find the port? Easy, there are two of them. A control port that is well-known to the client app and doesn't change, and a data port that handles all data communications. The client would receive the data port number during some negotiation that you implement on the control port.
What an example fo this? FTP does this. Port 21 is the FTP control port, 20 is the default port that data is sent over.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hello, I'm developing a program to send mail, using VS2005, with then System.Net.Mail.SmtpClient and System.Net.Mail.MailMessage objects.
By now, It works properly, but now I have to let the user sign the message with a certificate... and that objects don't support it (the only support certificates to stablish a SSL connnection). The only way could be to use Outlook objects??
I don't have any idea, I think perhaps I could write the message in RFC822 format, and then sign and encript some parts, by I can't believe that I am the only man in the world with this trouble 
Any idea? Thanks in advance
|
|
|
|
|
Finally I will buy the Chilkat component, because it's worthless to use the Outlook objects, and I the other posibilities are more difficult than useful.
I recomend to other developers don't waste time in this, because there aren't alternatives (but buying a good component).
|
|
|
|
|
Hello,
i want to retrieve the actual! column width of the datagrid after the user has modified the width manually in the head of the grid. The dgMaster.TableStyles(0).GridColumnStyles property allways gives the programmed width before the modification.
Thx for help
|
|
|
|
|
Hmmmm...you may want to verify that. For me, the .TableStyles(0).GridColumnStyles property always returns the actual column width. But I'm only using the one Tablestyle. Do you have multiple styles defined? Also, are you referencing this property in response to a certain event being fired? I reference the property immediately after the user resizes a column in the MouseOver event.
Dean
|
|
|
|
|
Hi All,
Can someone tell me if there is a way to insert text at the cursor location in an Outlook mail. I saw the object browser for MailItem but could only find the "Body" property through with there is no way to find out the cursor location.
Thanks and Regards,
Anil
|
|
|
|
|
Dear Sir or Madam,
Now I use a datagrid and I want a column of this datagrid is the combobox.
I use DataGridTableStyle and I add a DataGridComboBoxColumnStyle in the column. The ComboBox has 3 field: DataSource, DisplayMember, ValueMember.
But now I have a problem: after I choose one value from ComboBox, it return ValueMember and display ValueMember on DataGrid. Don't display DisplayMember on the DataGrid.
I want after I choose one value from ComboBox, it will return ValueMember and display DisplayMember on the datagrid.
Thank you very much for any help !
And my code here:
Dim tableStyle As New DataGridTableStyle
With tableStyle
.MappingName = "ArrayList"
''Step 2:Mapping columns for TableStyle
Dim CheckedCol As New DataGridBoolColumn 'NoNullBoolColumn
With CheckedCol
.MappingName = "HasThisSkillItem"
.HeaderText = ""
.Width = 30
.AllowNull = False
End With
tableStyle.GridColumnStyles.Add(CheckedCol)
Dim column As New DataGridTextBoxColumn
With column
.MappingName = "SKILL_ITEM_NAME"
.ReadOnly = True
.HeaderText = "Item Name"
.Width = 200
End With
tableStyle.GridColumnStyles.Add(column)
column = New DataGridTextBoxColumn
With column
.MappingName = "DURING_EXP_YEARS"
.HeaderText = "Exp.Y"
.Width = 40
.NullText = ""
End With
tableStyle.GridColumnStyles.Add(column)
column = New DataGridTextBoxColumn
With column
.MappingName = "DURING_EXP_MONTHS"
.HeaderText = "Exp.M"
.Width = 40
.NullText = ""
End With
tableStyle.GridColumnStyles.Add(column)
column = New DataGridTextBoxColumn
With column
.MappingName = "LAST_USED_MONTH_YEAR"
.HeaderText = "Last uses M-Y"
.Width = 80
' .NullText = ""
End With
tableStyle.GridColumnStyles.Add(column)
Dim CboColumn As DataGridComboBoxColumnStyle
CboColumn = New DataGridComboBoxColumnStyle(LoadSkillLevels(), "CODENAME", "CODETYPEID")
With CboColumn
.MappingName = "SKILL_LEVEL_CODE"
.HeaderText = "Level"
.Width = 100
.NullText = ""
End With
tableStyle.GridColumnStyles.Add(CboColumn)
column = New DataGridTextBoxColumn
With column
.MappingName = "REMARK"
.HeaderText = "Remark"
.Width = 200
' .NullText = ""
End With
tableStyle.GridColumnStyles.Add(column)
End With
'Step 3: Add the tablestyle to the datagrid
'thanhphu
dtgSkill.DataSource = arrSkill
dtgSkill.TableStyles.Add(tableStyle)
Note: arrSkill is an arrayList of EmployeeSkill information.
Carollynn Ann
-- modified at 3:53 Friday 13th January, 2006
|
|
|
|
|
Dear all
I wondering Know how created a program which is connected to the database through out ODBC system,and what the procedure that I have to fulfil in order to make it runing well as I want to.
Could you please to sent me a program sample as well, thank you for your attention and your support in advance
best regrds
ICE
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
