StdFont -
isnt possible to store text to word.(i.e word="Hello").thanksDim word As New StdFont
Private Sub Command1_Click()
With word
.Bold = True
.Italic = True
.Size = 20
End With
Set Label1.Font = word
End Sub
Custom Control Font Property -
Can anyone tell me how to set the font property of a label control from a propertry on a usercontrol.
so that
public Property get Font() as stdFont
font = label1.font
end ptoperty
public property set Font(obj as stdFont)
label1.font = stdfont
end property
works
stdFont Object -
Has anybody had any fun with this object?
Some fonts it seems to reject (Defaulting to MS Sans Serif) when I attempt to assign it.
i.e.
stdFont.Font = "WingDings"
I know for a fact that it is on the system and I have spelt it correctly.
The problem is, occaisio
Incorrect data stored by StdFont type variable -
Hi All,
In my project, I have declared a variable say X as New StdFont. I am using it to store font properties like size, name, charset, etc. However, when I assign an integer as its size, it stores it the value incorrectly. For example, if I assign 5 to X.FontSize, it stores as
UserControl don't save properties... URGENT! -
found this code somewhere on the web, and it works only in Design Mode. when you play it, the font property return to it's default value.
Code:
Dim WithEvents mFont As StdFont
Private Sub UserControl_Initialize()
Set mFont = New StdFont
Set UserControl.Font = mFont
Using StdFont Object with Property Bag -
I'm using VB6 and want my developers to be able to edit properties of a graphic element I made. I added a Input variable called ObjectFont and set the Font property to the new variable.
Now when they use the element it defaults to MS Sans Serif and can be set to another font after
StdFont -
isnt possible to store text to word.(i.e word="Hello").thanks
Code:
Dim word As New StdFont
Private Sub Command1_Click()
With word
.Bold = True
.Italic = True
.Size = 20
End With
Set Label1.Font = word
End Sub
Assigning Object to value is not producing compiler error -
comiler is not throwing errorcase1)
=====================
private sub command1_click()
Dim x As new StdFont
x=2
end sub
Note :
====
In the above code i am creating an object for stdfont class & then i am assigning some value/string to that obj
Custom Functions... -
Hey all,
So, I've got this function that is supposed to just set pass a StdFont variable, after setting it's arguments from data in some arrays.
VB Code:
Private Function getGeneralFontData(intSectionIndex As Integer, intSizePosition As Integer) as StdFont Dim sFnt
Charset ... PLEASE HELP -
Hi,
Does anybody know how I can sit a textbox or a richtextbox to accept different charset's for different languages. For instatance, it is always set to US-ASCII , what if I want to use the Japanese or other character sets?
I tried:
dim X as New StdFont
X.charset="US-AS
Modules, FlexGrid, Wend and controlbox -
Ok, Here we go, Using "Si_the_geek's" FlexGrid_AutosizeColumns code I placed it into a module to use with all the flexgrids that will be in this program on the different forms, but I can't seem to get it to work. What am I forgeting to do to make this work? I'm putting the co
writing text with directx -
I am trying to draw text to a secondary surface used for blitting, using the surface.DrawText function. I have set up my font properly, that all works... However, regardless of what I set my x and y values to, the text gets drawn at 0,0.
Anyone know what's wrong?
Code:
Dim
Changing character set -
Hi everybody,
I have the problem to display the correct charset on some controls. The following code is used to change the character set of each control in a form:
Code:
Public Sub ChangeCharSet(frmActForm As Form)
Dim objCtrl As Control
Dim lCharSetCod
Font property not fully working -
Hi
I have added a Font property to my active x control so developers can change the font using vb's properties window
To do this I have the following code..
VB Code:
Public Property Set Font(ByVal oFont As StdFont) Debug.Print "1.Write Font Size: " &a
Error #91 -
When I run the following code I get the error message #91
VB Code:
Dim fnt As StdFontPrivate Sub Command1_Click()Set fnt.Name = "Impact"End Sub
What Shall I do.
font size issue -
dear all,
there's a little problem i can't seem to find my way through. i hope there's a well-willing helpful soul that will guide me out.
when setting a font size with something like:
VB Code:
Dim sFnt As StdFont Set sFnt = UserControl.RTBeditor.Font &nb
Email Formatting -
Hi Experts!
I am working on one project, wherein I am sending an emails through lotus notes using the VBA code. It is working absolutely fine, however I am facing trouble in formatting the email. Is there any possible way if I want to make few lines bold in my email.
Here is the
Rich Text Boxes (font) -
Hi all
I am trying for the life of me to get my RTB to display Bold font, I would also like to change size as well.
But the code gods are not favoring me today
VB Code:
Dim Fonter As StdFont With Fonter 'I know this looks funny now but one I get this.Bold = True
[DirectX 8] Error -
My error: Something about variable block set.
My error line: the line that has " 'error " on it.
My Code:
vb Code:
Dim Dx As DirectX8Dim D3d As Direct3D8Dim D As D3DX8Dim D3DDevice As Direct3DDevice8Dim MainFont As D3DXFontDim MainFontDesc As IFontDim TextRect As RECTDi
VB6 - Coloring of SQL statements ... Done !!!! :)) -
Put 2 Richtextboxes and a command button on a form and paste this code.
VB Code:
Option Explicit Dim m_objFont As New StdFont Private Sub Command1_Click()Dim l_objParse As New MSSQLParser.vbSQLParser rtbParsed.Text = l_objParse.Parse
Convert this code to .NET (Text to Image) -
Hi guys
I was converting my project into .net but about this part of code is like that VS 2003 and VS2005 are both unable to convert it.
Code:
Public CurrentSub As Integer
Public SelStream As Integer
Public myFont As New StdFont
Private Declare Function CreateCompatibleDC
VB: D3DX8; i cant draw text -- -
why wont it draw text?
VB Code:
Public Sub Draw() Dim Frames As Long Dim FTime As Long Do If Events(QS_INPUT) Then DoEvents &nbs
SetFont in RichTextBox with UTF-8 characters -
Hi,
I've modified the VBAccel. RichEdit box so that I could take advantage of the UTF-8 and Unicode support provided by Version 3+ of the control. However, I'm running into problems when I'm setting font for the control when the UTF-8 characterset is used. When in ANSI, the progr
loading a listview from db -
I am trying to insert a picture in teh database (pretty much covered) but when I make the category picture and make it OLE in the database, my listview messes up and makes all the column headers really wide and doesn't insert anything from teh DB into it. how can I block the picture fr
adding image to Access -
ok I was reading Beacons tutorial and found it interesting. but I want to do it a little different. I fill the form out first then push add. so when I push add it will load the dialogbox up to pic a picture and the when you click ok it saves the stuff to the database, but, the picture