fgControls-Library

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:
 

Attachments

Last edited:

Filippo

Expert
Licensed User
I haven`t finished with the help file yet.
 

Filippo

Expert
Licensed User
hi,

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

Attention .Net 2.0 is requisite.


Ciao,
Filippo
 

Attachments

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
 

Attachments

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
 

Filippo

Expert
Licensed User
Hallo Robert,

Mission Accomplished!

Auftrag ausgeführt!


Ciao,
Filippo
 

Attachments

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
 

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
 

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
 

Attachments

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
 

specci48

Well-Known Member
Licensed User
Hello Kavka,

try this:
B4X:
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
 

kavka

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

"Object must first be created using New method."
 

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
 

Bobbes

Active Member
Licensed User
Hi Kavka,
here is a little programm. I hope it is usefull for you.

Bobbes
 

Attachments

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
 

specci48

Well-Known Member
Licensed User
Add a second fgTextBox object (e.g. fgTextBox2) to the project and this additionally
B4X:
    fgTextBox2.New1("TextBox2",0)   
    fgTextBox2.MaxLength = 5
e.g. to the App_Start sub.


specci48
 

Bobbes

Active Member
Licensed User
Hi Kavka,
the frist prog was very buggy, here is the Update

Best wishes
Bobbes
 

Attachments

Top