Just woke up. <Yawn!>

To duplicate "&cFFFFFF":

Dim v as Variant
v = Filestream.ReadLine
BevelButton1.Caption = "&&c" +right( v,6)

Terry

On 21-Jan-06, at 12:25 AM, Terry Ford wrote:


On 20-Jan-06, at 9:51 PM, Lennox Jacob wrote:

Hello,
I have an edit field with a backColor, say for example &cFFFFFF - white,
How do I get TextInputStream to read in a BackColor like

EditField1.text = Filestream.ReadLine for text
BevelButton1.caption = Filestream.ReadLine for BevelButton Caption
I tried
"&c" + Right(Cstr(EditField1.BackColor),6) = Filestream.ReadLine
but get a syntax error

Why not use a variant?

Dim v as Variant

//To write:

v = EditField1.BackColor
Filestream.WriteLine v

//To read:

v = Filestream.ReadLine
EditField1.BackColor = v

Works for Boolean conversions as well.
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to