[WIKI CGI SCRIPT]

* NEW: Do not use the cache anymore.

[EXAMPLES]
* BUG: Fix some form layout in the Database example.

[GB.DB.FORM]
* BUG: DataBrowser is correctly updated now when its DataSource changes.


git-svn-id: svn://localhost/gambas/trunk@4081 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2011-09-04 02:08:04 +00:00
parent 5b853ba5f3
commit db816a04e2
17 changed files with 5970 additions and 5719 deletions

View file

@ -36,10 +36,10 @@ SearchComment=False
SearchString=True
[OpenFile]
File[1]=".src/MMain.module:390.0"
Active=1
File[1]=".src/MMain.module:19.2"
File[2]="gambas.sourceforge.net/menu.html:81.71"
Active=3
File[3]="gambas.sourceforge.net/home.html.template:36.0"
File[3]="gambas.sourceforge.net/home.html.template:19.34"
Count=3
[Watches]

View file

@ -18,7 +18,7 @@ Sub InitVar()
$cVar["STABLE_VERSION_2"] = aStable[2]
$cVar["STABLE_VERSION_3"] = aStable[3]
$cVar["DEV_VERSION"] = "2.99.2"
$cVar["DEV_VERSION"] = "2.99.3"
'$cVar["DEV_VERSION_1"] = "1.9." & aDev[1]
'$cVar["DEV_VERSION_2"] = "1.9." & aDev[2]
'$cVar["DEV_VERSION_3"] = "1.9." & aDev[3]

View file

@ -16,10 +16,10 @@
<div class="release-notes" align="center"><a href="http://gambasdoc.org/help/doc/release/2.23.1?view&amp;$(LANG)">{Release Notes}</a></div>
</div>
<div>
<a class="download-orange" target="_blank" href="http://sourceforge.net/projects/gambas/files/gambas3/gambas3-2.99.2.tar.bz2/download">
{Download} <b>Gambas 3.0 RC2</b>
<a class="download-orange" target="_blank" href="http://sourceforge.net/projects/gambas/files/gambas3/gambas3-2.99.3.tar.bz2/download">
{Download} <b>Gambas 3.0 RC3</b>
</a>
<div class="release-notes" align="center"><a href="http://gambasdoc.org/help/doc/release/2.99.2?view&amp;$(LANG)">{Release Notes}</a></div>
<div class="release-notes" align="center"><a href="http://gambasdoc.org/help/doc/release/2.99.3?view&amp;$(LANG)">{Release Notes}</a></div>
</div>
</div>

View file

@ -17,7 +17,7 @@
</div>
<div>
<a class="download-orange" target="_blank" href="http://sourceforge.net/projects/gambas/files/gambas3/gambas3-$(DEV_VERSION).tar.bz2/download">
{Download} <b>Gambas 3.0 RC2</b>
{Download} <b>Gambas 3.0 RC3</b>
</a>
<div class="release-notes" align="center"><a href="http://gambasdoc.org/help/doc/release/$(DEV_VERSION)?view&amp;$(LANG)">{Release Notes}</a></div>
</div>

View file

@ -130,280 +130,280 @@ msgstr ""
msgid "This documentation page is not available."
msgstr ""
#: Main.module:2305
#: Main.module:2311
msgid "This symbol does not exist in version &1."
msgstr ""
#: Main.module:2308
#: Main.module:2314
msgid "This class does not exist in version &1."
msgstr ""
#: Main.module:2311
#: Main.module:2317
msgid "This component does not exist in version &1."
msgstr ""
#: Main.module:2594
#: Main.module:2600
msgid "DELETE ME"
msgstr ""
#: Main.module:2659
#: Main.module:2665
msgid "Save"
msgstr ""
#: Main.module:2659
#: Main.module:2665
msgid "Delete"
msgstr ""
#: Main.module:3182
#: Main.module:3188
msgid "New path"
msgstr ""
#: Main.module:3184
#: Main.module:3190
msgid "Rename children"
msgstr ""
#: Main.module:3185
#: Main.module:3191
msgid "Keep original"
msgstr ""
#: Main.module:3299
#: Main.module:3305
msgid "This documentation page already exists."
msgstr ""
#: Main.module:3361
#: Main.module:3367
msgid "&1 - History"
msgstr ""
#: Main.module:3452
#: Main.module:3458
msgid "No change"
msgstr ""
#: Main.module:3468
#: Main.module:3474
msgid "Creation"
msgstr ""
#: Main.module:3524
#: Main.module:3530
msgid "User management"
msgstr ""
#: Main.module:3535
#: Main.module:3541
msgid "Create user"
msgstr ""
#: Main.module:3537
#: Main.module:3543
msgid "Edit user"
msgstr ""
#: Main.module:3539
#: Main.module:3545
msgid "Delete user"
msgstr ""
#: Main.module:3546
#: Main.module:3552
msgid "Name"
msgstr ""
#: Main.module:3547
#: Main.module:3553
msgid "Password"
msgstr ""
#: Main.module:3548
#: Main.module:3554
msgid "Confirm"
msgstr ""
#: Main.module:3591
#: Main.module:3597
msgid "Database management"
msgstr ""
#: Main.module:3594
#: Main.module:3600
msgid "Download database"
msgstr ""
#: Main.module:3598
#: Main.module:3604
msgid "Purge temporary files"
msgstr ""
#: Main.module:3602
#: Main.module:3608
msgid "Clear page cache"
msgstr ""
#: Main.module:3629
#: Main.module:3635
msgid "Please enter a user name."
msgstr ""
#: Main.module:3631
#: Main.module:3637
msgid "Passwords do not match."
msgstr ""
#: Main.module:3633
#: Main.module:3639
msgid "Please enter a password."
msgstr ""
#: Main.module:3635
#: Main.module:3641
msgid "User already exists."
msgstr ""
#: Main.module:3639
#: Main.module:3645
msgid "User '&1' created."
msgstr ""
#: Main.module:3641
#: Main.module:3647
msgid "Cannot create user '&1'. Error code #&2."
msgstr ""
#: Main.module:3655
#: Main.module:3661
msgid "User '&1' modified."
msgstr ""
#: Main.module:3657
#: Main.module:3663
msgid "Cannot edit user '&1'. Error code #&2."
msgstr ""
#: Main.module:3666
#: Main.module:3672
msgid "Cannot delete user 'gambas'. This user is reserved."
msgstr ""
#: Main.module:3670
#: Main.module:3676
msgid "User '&1' deleted."
msgstr ""
#: Main.module:3672
#: Main.module:3678
msgid "Cannot delete user '&1'. Error code #&2."
msgstr ""
#: Main.module:3731
#: Main.module:3737
msgid "The page cache has been cleared."
msgstr ""
#: Main.module:3756
#: Main.module:3762
msgid "Return to administration page"
msgstr ""
#: Main.module:3768
#: Main.module:3774
msgid "Search with Google"
msgstr ""
#: Main.module:3829
#: Main.module:3835
msgid "Classes"
msgstr ""
#: Main.module:4035
#: Main.module:4041
msgid "Date"
msgstr ""
#: Main.module:4035
#: Main.module:4041
msgid "User"
msgstr ""
#: Main.module:4035
#: Main.module:4041
msgid "Page"
msgstr ""
#: Main.module:4071
#: Main.module:4077
msgid "State"
msgstr ""
#: Main.module:4337
#: Main.module:4343
msgid "Symbols"
msgstr ""
#: Main.module:4346
#: Main.module:4352
msgid "This class reimplements"
msgstr ""
#: Main.module:4348
#: Main.module:4354
msgid "This class inherits"
msgstr ""
#: Main.module:4354
#: Main.module:4360
msgid "in"
msgstr ""
#: Main.module:4370
#: Main.module:4376
msgid "Static&nbsp;properties"
msgstr ""
#: Main.module:4371
#: Main.module:4377
msgid "Static&nbsp;methods"
msgstr ""
#: Main.module:4373
#: Main.module:4379
msgid "Constants"
msgstr ""
#: Main.module:4390
#: Main.module:4396
msgid "Properties"
msgstr ""
#: Main.module:4391
#: Main.module:4397
msgid "Methods"
msgstr ""
#: Main.module:4392
#: Main.module:4398
msgid "Events"
msgstr ""
#: Main.module:4412
#: Main.module:4418
msgid "This class is &1."
msgstr ""
#: Main.module:4414
#: Main.module:4420
msgid ""
"This class can be used like an object by creating an hidden instance on "
"demand."
msgstr ""
#: Main.module:4418
#: Main.module:4424
msgid "creatable"
msgstr ""
#: Main.module:4421
#: Main.module:4427
msgid "This class is static."
msgstr ""
#: Main.module:4423
#: Main.module:4429
msgid "This class is not creatable."
msgstr ""
#: Main.module:4429
#: Main.module:4435
msgid "This class acts like a &1 / &2 array."
msgstr ""
#: Main.module:4429
#: Main.module:4435
msgid "read"
msgstr ""
#: Main.module:4429
#: Main.module:4435
msgid "write"
msgstr ""
#: Main.module:4431
#: Main.module:4437
msgid "This class acts like a &1 array."
msgstr ""
#: Main.module:4431
#: Main.module:4437
msgid "read-only"
msgstr ""
#: Main.module:4437
#: Main.module:4443
msgid "This class is &1 with the &2 keyword."
msgstr ""
#: Main.module:4437
#: Main.module:4443
msgid "enumerable"
msgstr ""
#: Main.module:4441
#: Main.module:4447
msgid "This class can be used as a &1."
msgstr ""
#: Main.module:4441
#: Main.module:4447
msgid "function"
msgstr ""
#: Main.module:5036
#: Main.module:5042
msgid "Only in &1 version"
msgstr ""
#: Main.module:5080
#: Main.module:5086
msgid "There are &1 classes and &2 symbols in all Gambas components."
msgstr ""

View file

@ -572,7 +572,7 @@ Private Function GetLink(sPath As String, Optional sMyTitle As String, Optional
Else If sMoreSuff = ">" Then
sMoreSuff = " align=\"right\""
Else
sMoreSuff = ""
sMoreSuff = " class=\"" & sMoreSuff & "\""
Endif
Endif
@ -2251,31 +2251,37 @@ Private Sub DisplayPage()
If $bImage Then
Print "<img border=\"1\" src=\"/image" &/ $sUri; "\" />"
Else If $bShow Then
Print MakePageWithoutHeader(rPage)
Else
If bRefresh And Not $bNew Then
sPage = MakePageWithoutHeader(rPage)
If $cGotSpecial.Count = 0 Then
rPage!sHTML = sPage
rPage!bRefresh = False
rPage.Update
Endif
Endif
If $bNoCache Or IsNull(rPage!sHTML) Then
If Not sPage Then sPage = MakePageWithoutHeader(rPage)
Print sPage
Else
Print rPage!sHTML
Endif
Print MakePageWithoutHeader(rPage)
Endif
' Else If $bShow Then
'
' Print MakePageWithoutHeader(rPage)
'
' Else
'
' If bRefresh And Not $bNew Then
' sPage = MakePageWithoutHeader(rPage)
' If $cGotSpecial.Count = 0 Then
' rPage!sHTML = sPage
' rPage!bRefresh = False
' rPage.Update
' Endif
' Endif
'
' If $bNoCache Or IsNull(rPage!sHTML) Then
' If Not sPage Then sPage = MakePageWithoutHeader(rPage)
' Print sPage
' Else
' Print rPage!sHTML
' Endif
'
' Endif
MakeFooter(rPage!dDate)
End

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

View file

@ -392,7 +392,7 @@ b
MoveTo
m
b
(iIndex)i
(Index)i
Update
m

View file

@ -82,35 +82,35 @@ msgstr ""
msgid "End"
msgstr ""
#: FMain.form:76
#: FMain.form:78
msgid "Id"
msgstr ""
#: FMain.form:81
#: FMain.form:83
msgid "Color"
msgstr ""
#: FMain.form:86
#: FMain.form:88
msgid "First Name"
msgstr ""
#: FMain.form:91
#: FMain.form:93
msgid "Name"
msgstr ""
#: FMain.form:96
#: FMain.form:98
msgid "Birth"
msgstr ""
#: FMain.form:101
#: FMain.form:103
msgid "Active"
msgstr ""
#: FMain.form:107
#: FMain.form:109
msgid "Comment"
msgstr ""
#: FMain.form:113
#: FMain.form:115
msgid "Salary"
msgstr ""

View file

@ -1,7 +1,7 @@
# Gambas Project File 3.0
# Compiled with Gambas 2.99.3
Title=Data bound controls
Startup=Main
Startup=FMain
Version=2.99.3
VersionProgram=gbx3 -V
Component=gb.image
@ -9,7 +9,7 @@ Component=gb.gui
Component=gb.form
Component=gb.db
Authors="Benoît Minisini"
Environment="GB_GUI=gb.gtk"
Environment="GB_GUI=gb.qt4"
TabSize=2
Translate=1
Language=en

View file

@ -216,12 +216,12 @@ Public Function MoveLast() As Boolean
End
Public Function MoveTo(iIndex As Integer) As Boolean
Public Function MoveTo(Index As Integer) As Boolean
If CheckModified() Then Return True
If iIndex = $iIndex Then Return
If Index = $iIndex Then Return
$iIndex = iIndex
$iIndex = Index
Redraw
End

View file

@ -99,7 +99,7 @@ Public Sub Update()
btnNew.Visible = bVisible
btnRemove.Visible = bVisible
dvwBrowser.Refresh
dvwBrowser.Update
If $hSrc And If Not bVisible Then btnFirst_Click

View file

@ -13,26 +13,28 @@
MoveScaled(1,5,69,87)
Expand = True
Arrangement = Arrange.Vertical
Spacing = True
Connection = Connections["Connection2"]
Table = "color"
{ DataBrowser2 DataBrowser
MoveScaled(2,1,59,14)
MoveScaled(7,3,54,14)
Control = False
}
{ DataSource1 DataSource
MoveScaled(1,19,62,65)
MoveScaled(2,19,62,67)
Expand = True
Arrangement = Arrange.Vertical
Spacing = True
Table = "test"
{ DataBrowser1 DataBrowser
MoveScaled(2,2,59,18)
MoveScaled(2,6,59,16)
Font = Font["-2"]
Expand = True
Columns = ["id", "active", "color", "firstname", "salary", "comment"]
Orientation = Align.Top
Editable = True
}
{ HBox1 HBox
MoveScaled(2,21,59,43)
MoveScaled(2,23,59,43)
Spacing = True
{ VBox2 VBox
MoveScaled(1,1,12,35)

View file

@ -22,21 +22,21 @@
}
}
{ DataSource1 DataSource
MoveScaled(0,6,66,52)
MoveScaled(1,6,55,30)
Expand = True
Arrangement = Arrange.Vertical
Spacing = True
Connection = Connections["Connection1"]
Table = "Client"
{ DataComboView1 DataComboView
MoveScaled(7,9,29,4)
MoveScaled(2,6,29,4)
Table = "TypeClient"
Field = "idTypeClient"
Header = True
Grid = True
}
{ DataBrowser1 DataBrowser
MoveScaled(6,19,55,30)
MoveScaled(2,11,52,18)
Expand = True
Labels = ["Identificateur", "Type", "Nom", "Téléphone"]
}

View file

@ -1,5 +1,5 @@
# Gambas Project File 3.0
# Compiled with Gambas 2.99.1
# Compiled with Gambas 2.99.3
Title=Database example
Startup=FMain
Icon=database.png

View file

@ -5,7 +5,7 @@
Text = ("Bound controls example")
Arrangement = Arrange.Fill
Spacing = True
Padding = 8
Margin = True
{ DataSource2 DataSource
MoveScaled(1,1,65,90)
Arrangement = Arrange.Vertical