fgControls-Library

Discussion in 'Additional Libraries' started by Filippo, Nov 27, 2007.

  1. Filippo

    Filippo Expert Licensed User

    hi,

    the fgControls.dll is a Library with the following Controls:

    1. fgTextBox
    2. fgLabel
    3. fgCalender(DateTimePicker)

    An example exists in the Zip file.


    Version 1.07 with fgMaskedEdit and fgMouseEvents
    (all Updates are included)

    Control fgTextBox with 5 new Property:
    1. OnlyNumber
    2. OnlyLetter
    3. OnlyDecimal
    4. AllowNegative
    5. Decimals

    Version 1.071 ;error fixed in fgTextbox.IgnoreKey

    Version 1.072 ; with 2 new Controls
    1. fgImageList
    2. fgFileInfo

    Version 1.074 ; with 2 new Controls
    1. fgToolbar (with VGA support)
    2. fgToolBarButton
    3. Control fgFileInfo renamed to fgSystemIo

    an example, with fgImageList, fgSystemIo, fgToolBar and fgToolBarButton, can be found at this link: http://www.basic4ppc.com/forum/share-your-creations/2511-fgexplorer.html#post13867


    Version 1.075 ; with 1 new Control and new function
    1. fgInputBox
    2. new function by control "fgSystemIo"
    An example exists in the Zip file


    Version 1.076 ; with 1 new Control and new function
    1. fgSystemColor (This allows to set the system-color for all objects)
    2. new function by control "fgSystemIo" (GetLastWriteTime, SetLastWriteTime)
    3. fgCalender whit CustomFormat


    Version 1.077 ; with 2 new Control
    1. fgGetAsyncKeyState (The fgGetAsyncKeyState function determines whether a key is up or down in a Form)
    2. fgChangeOrientation (The ChangeOrientationg function allowing the automatic orientation of the display)

    Version 1.0791 ; Controls with new Property
    1. fgLabel with Transparent-Property
    2. fgMouseEvents with Border, BorderColor and Movable

    Version 1.0792 ;error fixed in fgMouseEvents.Border

    Version 1.080 ; with 2 new Control
    1. fgDirChooser Treeview-Control
    2. fgFileChooser Treeview-Control with Listview-Control


    Version 1.081 ; with 1 new Control
    1. fgChangeToVGA The following control changes automatically the layout of all controls to match the VGA screen

    Version 1.082 ; with 1 new Control
    1. fgChangeToQVGA The following control changes automatically the layout of all controls from VGA to QVGA screen


    Version 1.083 ;error(Samsung i900 Omnia) fixed in fgDirChooser and fgFileChooser


    Version 1.084 ;
    1. the control fglabel is deleted (no longer compatible with Basic4ppc)
    2. Change in fgDirChooser:
      1. the property SearchPattern is extended, there may be several patterns ( "*. dll;*. txt")
      2. Initialdirectory property added


    Version 1.086 ;
    1. change in control fgDirChooser: Menu in 4 languages
    2. change in control fgFileChooser: menu and Listview-headar is in 4 languages
    3. Languages: German, Italian, French and English

    Version 1.087 ;
    1. The event "TextChanged" in control "fgTextbox" added.


    Everything always without warranty. :cool:
     

    Attached Files:

    Last edited: Jun 6, 2010
  2. PepSoft

    PepSoft Member Licensed User

    Is very interisting.
    There are Help File?
     
  3. Filippo

    Filippo Expert Licensed User

    I haven`t finished with the help file yet.
     
  4. Filippo

    Filippo Expert Licensed User

    hi,

    here is my Library-update with help file and Example.

    Attention .Net 2.0 is requisite.


    Ciao,
    Filippo
     

    Attached Files:

  5. Filippo

    Filippo Expert Licensed User

    Hi,

    I have a new Property and a new Metode in the fgLibrary added:

    Metode: MoveEvents
    Property: Dock

    The Metode MoveEvents automatically creates a black outline around a control and the control (Form, Panel, ...) can be used with the mouse or stylus moved.

    The Dock-property is fgTextBox and fgLabel added. Call or determines how the tax element to its overall control to be docked
     

    Attached Files:

  6. alfcen

    alfcen Well-Known Member Licensed User

    Brilliant, Filippo!
    All methods work fine. I do like the docking :)
    I assume the next new method to TextBoxEx will be

    TextBoxEx.Wrap
    TextBoxEx.NoWrap

    Ausgezeichnet, Filippo!
    Alle Befehle arbeiten einwandfrei. Das Docking gefaellt mir sehr :)
    Ich nehme an die naechsten neuen Befehle sind

    TextBoxEx.Wrap
    TextBoxEx.NoWrap

    Ciao
    Roberto
     
  7. Filippo

    Filippo Expert Licensed User

    Hallo Robert,

    Mission Accomplished!

    Auftrag ausgeführt!


    Ciao,
    Filippo
     

    Attached Files:

  8. alfcen

    alfcen Well-Known Member Licensed User

    Hallo Filippo,

    I haven't had the slightest doubt. Works like a charm.

    Ich hatte nicht den geringsten Zweifel. Funktioniert wie ein Wunder.

    Mille Gracie!!!

    Roberto
     
  9. klaus

    klaus Expert Licensed User

    Hallo Filippo
    I have already used part of your library in the Expense Tracker program. Your library adds pretty good new properties to the standard ones.
    Good Job !

    In the helpfile I saw folling explanation for the Dock property.

    Call or determines how the tax element to its overall control to be docked.
    Syntax: Dock= DockStyle
    I suspect that at the origin it was Steuer Element and the translation has become tax element instead of control element

    Ich habe Deine Library schon Teilweise in dem Expense Tracker Programm genützt. Diese Library erlaubt gute verbesserung der Eigenschaften von Standard Controls.
    Good Job !

    In dem Helpfile habe ich folgenden Satz gefunden:
    Call or determines how the tax element to its overall control to be docked.
    Syntax: Dock= DockStyle
    Ich nehme an dass es Steuer Element war und in tax element übersetzt wurde anstatt control element.
    Der Satz könnte folgend lauten
    Sets or gets the docking position of a control according to it's parent control
    Ist ein Vorschlag.

    Ciao

    Klaus
     
  10. Filippo

    Filippo Expert Licensed User

    Hallo Klaus,

    many thanks for the proposal, you have certainly right!
    I have read the help file corrected.

    vielen Dank für den Vorschlag, du hast bestimmt Recht!
    Ich habe die Hilfe-Datei korrigiert.

    Ciao,
    Filippo
     

    Attached Files:

  11. kavka

    kavka Member Licensed User

    Hello!

    These controls are just what I need, but don't know how to write the code. Here is the problem:

    In Textbox1 max length is 2. When that condition is true textbox2 must be focused. A short code please.

    THX Kavka
     
  12. specci48

    specci48 Well-Known Member Licensed User

    Hello Kavka,

    try this:
    Code:
    Sub Globals
    End Sub

    Sub App_Start
        fgTextBox.New1(
    "TextBox1",0)   
        fgTextBox.MaxLength = 
    2
        TextBox1.Focus
        Form1.Show
    End Sub

    Sub TextBox1_KeyPress (key)
        
    ' backspace pressed ?
        If Asc(key) = 8 Then
       
    Return
        
    End If
        
    If StrLength(TextBox1.Text & key) = 2 Then
       TextBox2.Focus
        
    End If
    End Sub

    specci48
     
  13. kavka

    kavka Member Licensed User

    specci48, tried that, but does not work. It says:

    "Object must first be created using New method."
     
  14. specci48

    specci48 Well-Known Member Licensed User

    Ok, seems that you don't know how to handle with external libraries in basic4ppc yet. :(
    You can take he beginning of this thread http://www.basic4ppc.com/forum/showthread.php?t=1093 as an example for that.

    As an addition, I provided my full example with this post.


    Hope that helps you to little... :)

    specci48
     

    Attached Files:

  15. kavka

    kavka Member Licensed User

    Your code works. I did all the same (library and all). I don't know what the problem is.

    THX, Kavka
     
  16. Bobbes

    Bobbes Active Member Licensed User

    Hi Kavka,
    here is a little programm. I hope it is usefull for you.

    Bobbes
     

    Attached Files:

  17. kavka

    kavka Member Licensed User

    Bobbes! Thanx for the code. My next question is: Is it possible to define maxlenght for each textbox separately. (Textbox1 maxlenght is 2, Textbox2 maxlenght is 5).

    Thx, Kavka
     
  18. specci48

    specci48 Well-Known Member Licensed User

    Add a second fgTextBox object (e.g. fgTextBox2) to the project and this additionally
    Code:
    fgTextBox2.New1("TextBox2",0)   
        fgTextBox2.MaxLength = 
    5
    e.g. to the App_Start sub.


    specci48
     
  19. kavka

    kavka Member Licensed User

    Thx, Kavka
     
  20. Bobbes

    Bobbes Active Member Licensed User

    Hi Kavka,
    the frist prog was very buggy, here is the Update

    Best wishes
    Bobbes
     

    Attached Files:

Loading...