ColorDialog for device

[agraham]

The Compact Framework lacks a ColorDialog. Here's one to make up for that lack, it also works on the desktop. Needs .NET 2.0. No help file as it is very simple and is documented in the demo source. No source for merging for the time being as I can't get it to compile for the device.

EDIT : Source for merging posted. I don't know why I couldn't get it to merge on the device before - finger trouble I guess!

[Erel]

Great work (as usual)
May I have your permission to use it in the device IDE ?

[agraham]

Originally Posted by Erel

May I have your permission to use it in the device IDE ?

Of course, though it's so simple I would have thought you could do much better

Do you want the VS2005 project or source code?

[Erel]

Please send me the source code.

[JJM]

Agraham,

Thank you for your dll.
Is it possible that the windows is smaller because I woul like get on my screen the window of chosing color and an other programm to compare the colors in the both programms?

Best regards

JJ M

[agraham]

Originally Posted by JJM

Is it possible that the windows is smaller

No. On a Pocket PC forms (which can host controls) are always full screen. As far as I know (someone please correct me if they know otherwise) there is no way of overcoming this. The only things that can be displayed smaller are Notifiers and MessageBoxes but they can't host controls.

[JJM]

Thank you Agraham

JJ M

[PatrikL]

Hi agraham,

thanx for good ColorDialog. But I want use this dialog in my programm, and my program is multilanguage. So its possible change dll and add possibility to change texts (also name of form) and color of form?

Example
colorDialog.Caption = "Hi"
colorDialog.txtRed = "Red"
colorDialog.txtGreen = "Green"
colorDialog.txtBlue = "Blue"
colorDialog.Color = frmmain.Color

Thanks.

[agraham]

Use the Door library. Obj1, Obj2 and Obj3 are Door library Objects

    Obj1.New1(False)
Obj2.New1(False)
Obj3.New1(False)

Form = "Couleur"
Red = "Rouge"
Green = "Vert"
Blue = "Bleu"
OK = "D'accord"
Cancel = "Annulez" 
Color = Rgb(250, 240, 230)

Obj1.FromLibrary("Main.ColorDialog", "dialog", B4PObject(2))
Obj1.SetProperty("Text", Form) ' Form text
  Obj2.CreateNew("System.Drawing.Color" & Obj2.System_Drawing)
  Obj1.SetProperty2("BackColor",Obj2.RunMethod2("FromArgb",Color,"System.Int32")) 'Color
    
Obj2.Value = Obj1.GetProperty("Controls")
Obj3.Value = Obj2.GetProperty2("Item", 13) 'Blue
Obj3.SetProperty("Text", Blue)    
Obj3.Value = Obj2.GetProperty2("Item", 14) 'Green
Obj3.SetProperty("Text", Green)
Obj3.Value = Obj2.GetProperty2("Item", 15) 'Red
Obj3.SetProperty("Text", Red)

Obj2.Value = Obj1.GetProperty("Menu")
Obj3.Value = Obj2.GetProperty("MenuItems") 
Obj3.Value = Obj3.GetProperty2("Item", 0) 'OK
Obj3.SetProperty("Text", OK)
Obj3.Value = Obj2.GetProperty("MenuItems") 
Obj3.Value = Obj3.GetProperty2("Item", 1) 'Cancel
Obj3.SetProperty("Text", Cancel)

[PatrikL]

Hi agraham,

thanks for door code, because I'm not so skilled programmer for using door library.
I copy your code into your colordialog demo. And doesn't work. I dont know why. Please look on it (or somebody who know how this work) where is mistake.

Thanks a lot.